removed shebang from tests

t/01_compile.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Test that everything compiles, so the rest of the test suite can
 # load modules without having to check if it worked.
 

t/02_logon.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Tests basic login and pragma setting
 
 use strict;

t/03_create_table.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Tests simple table creation
 
 use strict;

t/04_insert.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/05_select.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/06_tran.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/07_error.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/08_busy.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Test that two processes can write at once, assuming we commit timely.
 
 use strict;

t/09_create_function.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use 5.00503;
 use strict;
 BEGIN {

t/10_create_aggregate.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/11_get_info.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
     $|  = 1;

t/12_unicode.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is a test for correct handling of the "unicode" database
 # handle parameter.
 

t/13_create_collation.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/14_progress_handler.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/15_ak_dbd.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/16_column_info.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/17_createdrop.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is a skeleton test. For writing new tests, take this file
 # and modify/extend it.
 

t/18_insertfetch.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is a simple insert/fetch test.
 
 use strict;

t/19_bindparam.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/20_blobs.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is a test for correct handling of BLOBS; namely $dbh->quote
 # is expected to work correctly.
 

t/21_blobtext.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/22_listfields.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is a test for statement attributes being present appropriately.
 
 use strict;

t/23_nulls.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is a test for correctly handling NULL values.
 
 use strict;

t/24_numrows.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This tests, whether the number of rows can be retrieved.
 
 use strict;

t/25_chopblanks.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Check whether 'ChopBlanks' works.
 
 use strict;

t/26_commit.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is testing the transaction support.
 
 use strict;

t/27_metadata.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/28_schemachange.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This test works, but as far as I can tell this doesn't actually test
 # the thing that the test was originally meant to test.
 

t/30_auto_rollback.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # I've disabled warnings, so theoretically warnings shouldn't be printed
 
 use strict;

t/31_bind_weird_number_param.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/32_inactive_error.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/33_non_latin_path.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Tests path containing non-latine-1 characters
 # currently fails on Windows
 

t/34_online_backup.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 use warnings;
 

t/35_table_info.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/36_hooks.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/37_regexp.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/38_empty_statement.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/39_foreign_keys.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/40_multiple_statements.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/41_placeholders.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/42_primary_key_info.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/43_fts3.t

@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 BEGIN {
 	$|  = 1;

t/44_rtree.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/45_savepoints.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/46_mod_perl.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/47_execute.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Trigger locking error and test prepared statement is still valid afterwards
 
 use strict;

t/48_bind_param_is_sticky.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Check data type assignment in bind_param is sticky
 
 use strict;

t/49_trace_and_profile.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/50_foreign_key_info.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/51_table_column_metadata.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/52_db_filename.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/53_status.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/54_literal_txn.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/55_statistics_info.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/56_open_flags.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/57_uri_filename.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/58_see_if_its_a_number_and_explicit_binding.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/59_extended_result_codes.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/60_readonly.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/61_strlike.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/62_regexp_multibyte_char_class.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/63_param_values.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/64_limit.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/65_db_config.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/cookbook_variance.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_106151_outermost_savepoint.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_106950_extra_warnings_with_savepoints.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_115465_column_info_with_spaces.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_15186_prepcached.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is a regression test for bug #15186:
 # http://rt.cpan.org/Public/Bug/Display.html?id=15186
 # About re-using statements with prepare_cached().

t/rt_21406_auto_finish.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_25371_asymmetric_unicode.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_25460_numeric_aggregate.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_25924_user_defined_func_unicode.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_26775_distinct.t

@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 use warnings;
 use DBI;

t/rt_29629_sqlite_where_length.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_31324_full_names.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_32889_prepare_cached_reexecute.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Tests that executing the same prepare_cached twice without a
 # finish in between does not prevent it being automatically cleaned
 # up and that it does not generate a warning.

t/rt_36836_duplicate_key.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is a simple insert/fetch test.
 
 use strict;

t/rt_36838_unique_and_bus_error.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_40594_nullable.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_48393_debug_panic_with_commit.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_50503_fts3.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_52573_manual_exclusive_lock.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl -w
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_53235_icu_compatibility.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
     $|  = 1;

t/rt_62370_diconnected_handles_operation.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_64177_ping_wipes_out_the_errstr.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_67581_bind_params_mismatch.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_71311_bind_col_and_unicode.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_73159_fts_tokenizer_segfault.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_73787_exponential_buffer_overflow.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_76395_int_overflow.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use warnings;
 use strict;
 BEGIN {

t/rt_77724_primary_key_with_a_whitespace.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_78833_utf8_flag_for_column_names.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_81536_multi_column_primary_key_info.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_88228_sqlite_3_8_0_crash.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/rt_96877_unicode_statements.t

@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 # According to the sqlite doc, the SQL argument to sqlite3_prepare_v2
 # should be in utf8, but DBD::SQLite does not ensure this (even with
 # sqlite_unicode => 1). Only bind values are properly converted.

t/rt_96878_fts_contentless_table.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # In a contentless FTS table, the columns are hidden from the schema,
 # and therefore SQLite has no information to infer column types, so
 # these are typed as SQLITE_NULL ... and this type conflicts with the

t/rt_97598_crash_on_disconnect_with_virtual_tables.t

@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;

t/virtual_table/00_base.t

@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 BEGIN {
 	$|  = 1;

t/virtual_table/01_destroy.t

@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 BEGIN {
 	$|  = 1;