diff --git a/t/01_compile.t b/t/01_compile.t
index 23d27e9..eb47233 100644
--- a/t/01_compile.t
+++ b/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.
 
diff --git a/t/02_logon.t b/t/02_logon.t
index e2cf56e..7ddffaf 100644
--- a/t/02_logon.t
+++ b/t/02_logon.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Tests basic login and pragma setting
 
 use strict;
diff --git a/t/03_create_table.t b/t/03_create_table.t
index f6aa15f..758abf8 100644
--- a/t/03_create_table.t
+++ b/t/03_create_table.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Tests simple table creation
 
 use strict;
diff --git a/t/04_insert.t b/t/04_insert.t
index f3fb704..274d938 100644
--- a/t/04_insert.t
+++ b/t/04_insert.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/05_select.t b/t/05_select.t
index d450221..f1fe361 100644
--- a/t/05_select.t
+++ b/t/05_select.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/06_tran.t b/t/06_tran.t
index 0604f80..33dbce4 100644
--- a/t/06_tran.t
+++ b/t/06_tran.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/07_error.t b/t/07_error.t
index 92459c8..5af810b 100644
--- a/t/07_error.t
+++ b/t/07_error.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/08_busy.t b/t/08_busy.t
index d225e14..4d38cbd 100644
--- a/t/08_busy.t
+++ b/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;
diff --git a/t/09_create_function.t b/t/09_create_function.t
index f054bfe..e91f734 100644
--- a/t/09_create_function.t
+++ b/t/09_create_function.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use 5.00503;
 use strict;
 BEGIN {
diff --git a/t/10_create_aggregate.t b/t/10_create_aggregate.t
index 312d3e4..73e9dd5 100644
--- a/t/10_create_aggregate.t
+++ b/t/10_create_aggregate.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/11_get_info.t b/t/11_get_info.t
index 3477ff4..1cbe70d 100644
--- a/t/11_get_info.t
+++ b/t/11_get_info.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
     $|  = 1;
diff --git a/t/12_unicode.t b/t/12_unicode.t
index 9f245e2..173b011 100644
--- a/t/12_unicode.t
+++ b/t/12_unicode.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is a test for correct handling of the "unicode" database
 # handle parameter.
 
diff --git a/t/13_create_collation.t b/t/13_create_collation.t
index 5edf19a..e007b60 100644
--- a/t/13_create_collation.t
+++ b/t/13_create_collation.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/14_progress_handler.t b/t/14_progress_handler.t
index 3abe2ee..4dae78a 100644
--- a/t/14_progress_handler.t
+++ b/t/14_progress_handler.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/15_ak_dbd.t b/t/15_ak_dbd.t
index caaa465..9866ae4 100644
--- a/t/15_ak_dbd.t
+++ b/t/15_ak_dbd.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/16_column_info.t b/t/16_column_info.t
index eb078c3..864268a 100644
--- a/t/16_column_info.t
+++ b/t/16_column_info.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/17_createdrop.t b/t/17_createdrop.t
index 98c18fe..373b0ed 100644
--- a/t/17_createdrop.t
+++ b/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.
 
diff --git a/t/18_insertfetch.t b/t/18_insertfetch.t
index 79c0fe1..7031d16 100644
--- a/t/18_insertfetch.t
+++ b/t/18_insertfetch.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is a simple insert/fetch test.
 
 use strict;
diff --git a/t/19_bindparam.t b/t/19_bindparam.t
index 84efccb..0499d69 100644
--- a/t/19_bindparam.t
+++ b/t/19_bindparam.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/20_blobs.t b/t/20_blobs.t
index c0c6937..770c862 100644
--- a/t/20_blobs.t
+++ b/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.
 
diff --git a/t/21_blobtext.t b/t/21_blobtext.t
index cb35c61..5d303b9 100644
--- a/t/21_blobtext.t
+++ b/t/21_blobtext.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/22_listfields.t b/t/22_listfields.t
index 6a00009..1d9ae58 100644
--- a/t/22_listfields.t
+++ b/t/22_listfields.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is a test for statement attributes being present appropriately.
 
 use strict;
diff --git a/t/23_nulls.t b/t/23_nulls.t
index 197b64a..90297df 100644
--- a/t/23_nulls.t
+++ b/t/23_nulls.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is a test for correctly handling NULL values.
 
 use strict;
diff --git a/t/24_numrows.t b/t/24_numrows.t
index fc74a1c..b199875 100644
--- a/t/24_numrows.t
+++ b/t/24_numrows.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This tests, whether the number of rows can be retrieved.
 
 use strict;
diff --git a/t/25_chopblanks.t b/t/25_chopblanks.t
index 428b092..5acb15e 100644
--- a/t/25_chopblanks.t
+++ b/t/25_chopblanks.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Check whether 'ChopBlanks' works.
 
 use strict;
diff --git a/t/26_commit.t b/t/26_commit.t
index 3c65c62..4b8929d 100644
--- a/t/26_commit.t
+++ b/t/26_commit.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is testing the transaction support.
 
 use strict;
diff --git a/t/27_metadata.t b/t/27_metadata.t
index 3cd4a20..a9c6e63 100644
--- a/t/27_metadata.t
+++ b/t/27_metadata.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/28_schemachange.t b/t/28_schemachange.t
index ea434ec..7b8c038 100644
--- a/t/28_schemachange.t
+++ b/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.
 
diff --git a/t/30_auto_rollback.t b/t/30_auto_rollback.t
index 3ae39a5..7ee4c82 100644
--- a/t/30_auto_rollback.t
+++ b/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;
diff --git a/t/31_bind_weird_number_param.t b/t/31_bind_weird_number_param.t
index 24ecf3f..c581177 100644
--- a/t/31_bind_weird_number_param.t
+++ b/t/31_bind_weird_number_param.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/32_inactive_error.t b/t/32_inactive_error.t
index a8fecc7..781527f 100644
--- a/t/32_inactive_error.t
+++ b/t/32_inactive_error.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/33_non_latin_path.t b/t/33_non_latin_path.t
index 64895cc..183844d 100644
--- a/t/33_non_latin_path.t
+++ b/t/33_non_latin_path.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Tests path containing non-latine-1 characters
 # currently fails on Windows
 
diff --git a/t/34_online_backup.t b/t/34_online_backup.t
index 5b817ba..efa5fbb 100644
--- a/t/34_online_backup.t
+++ b/t/34_online_backup.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 use warnings;
 
diff --git a/t/35_table_info.t b/t/35_table_info.t
index 26b3f53..711b7af 100644
--- a/t/35_table_info.t
+++ b/t/35_table_info.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/36_hooks.t b/t/36_hooks.t
index 180e351..53b561d 100644
--- a/t/36_hooks.t
+++ b/t/36_hooks.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/37_regexp.t b/t/37_regexp.t
index ada0d8e..c85ef58 100644
--- a/t/37_regexp.t
+++ b/t/37_regexp.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/38_empty_statement.t b/t/38_empty_statement.t
index 8ec9af7..4a8b712 100644
--- a/t/38_empty_statement.t
+++ b/t/38_empty_statement.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/39_foreign_keys.t b/t/39_foreign_keys.t
index f1f0641..7aa18ee 100644
--- a/t/39_foreign_keys.t
+++ b/t/39_foreign_keys.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/40_multiple_statements.t b/t/40_multiple_statements.t
index 3f1845d..3168d6a 100644
--- a/t/40_multiple_statements.t
+++ b/t/40_multiple_statements.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/41_placeholders.t b/t/41_placeholders.t
index c9102c2..e07ebcd 100644
--- a/t/41_placeholders.t
+++ b/t/41_placeholders.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/42_primary_key_info.t b/t/42_primary_key_info.t
index b3fc64b..16b937a 100644
--- a/t/42_primary_key_info.t
+++ b/t/42_primary_key_info.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/43_fts3.t b/t/43_fts3.t
index f18dc8a..9c8464b 100644
--- a/t/43_fts3.t
+++ b/t/43_fts3.t
@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/44_rtree.t b/t/44_rtree.t
index 77d0135..d3516c8 100644
--- a/t/44_rtree.t
+++ b/t/44_rtree.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/45_savepoints.t b/t/45_savepoints.t
index ba1235d..3a3e455 100644
--- a/t/45_savepoints.t
+++ b/t/45_savepoints.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/46_mod_perl.t b/t/46_mod_perl.t
index c20b606..b0dfab8 100644
--- a/t/46_mod_perl.t
+++ b/t/46_mod_perl.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/47_execute.t b/t/47_execute.t
index 13b0e7a..e5faab2 100644
--- a/t/47_execute.t
+++ b/t/47_execute.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # Trigger locking error and test prepared statement is still valid afterwards
 
 use strict;
diff --git a/t/48_bind_param_is_sticky.t b/t/48_bind_param_is_sticky.t
index bcb9b55..7fdf3cd 100644
--- a/t/48_bind_param_is_sticky.t
+++ b/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;
diff --git a/t/49_trace_and_profile.t b/t/49_trace_and_profile.t
index 7fb85a2..394a15f 100644
--- a/t/49_trace_and_profile.t
+++ b/t/49_trace_and_profile.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/50_foreign_key_info.t b/t/50_foreign_key_info.t
index e448d43..41c3495 100644
--- a/t/50_foreign_key_info.t
+++ b/t/50_foreign_key_info.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/51_table_column_metadata.t b/t/51_table_column_metadata.t
index 17b8c0e..cb9712b 100644
--- a/t/51_table_column_metadata.t
+++ b/t/51_table_column_metadata.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/52_db_filename.t b/t/52_db_filename.t
index 6f1da51..55b08cf 100644
--- a/t/52_db_filename.t
+++ b/t/52_db_filename.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/53_status.t b/t/53_status.t
index 7001f48..e8b5f3f 100644
--- a/t/53_status.t
+++ b/t/53_status.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/54_literal_txn.t b/t/54_literal_txn.t
index d00e7e4..762096a 100644
--- a/t/54_literal_txn.t
+++ b/t/54_literal_txn.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/55_statistics_info.t b/t/55_statistics_info.t
index 7e6df67..785b141 100644
--- a/t/55_statistics_info.t
+++ b/t/55_statistics_info.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/56_open_flags.t b/t/56_open_flags.t
index 9f68d65..91f5c37 100644
--- a/t/56_open_flags.t
+++ b/t/56_open_flags.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/57_uri_filename.t b/t/57_uri_filename.t
index d0043c5..f00476a 100644
--- a/t/57_uri_filename.t
+++ b/t/57_uri_filename.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/58_see_if_its_a_number_and_explicit_binding.t b/t/58_see_if_its_a_number_and_explicit_binding.t
index 464b9c4..362d7dd 100644
--- a/t/58_see_if_its_a_number_and_explicit_binding.t
+++ b/t/58_see_if_its_a_number_and_explicit_binding.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/59_extended_result_codes.t b/t/59_extended_result_codes.t
index 72ce9a8..77cf4a5 100644
--- a/t/59_extended_result_codes.t
+++ b/t/59_extended_result_codes.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/60_readonly.t b/t/60_readonly.t
index d80ee35..c3748b9 100644
--- a/t/60_readonly.t
+++ b/t/60_readonly.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/61_strlike.t b/t/61_strlike.t
index de9d6f2..2ce7571 100644
--- a/t/61_strlike.t
+++ b/t/61_strlike.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/62_regexp_multibyte_char_class.t b/t/62_regexp_multibyte_char_class.t
index b506638..3a7492a 100644
--- a/t/62_regexp_multibyte_char_class.t
+++ b/t/62_regexp_multibyte_char_class.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/63_param_values.t b/t/63_param_values.t
index 0acb54c..8d153c3 100644
--- a/t/63_param_values.t
+++ b/t/63_param_values.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/64_limit.t b/t/64_limit.t
index 2aa28db..25ec53f 100644
--- a/t/64_limit.t
+++ b/t/64_limit.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/65_db_config.t b/t/65_db_config.t
index 6820736..1203d2d 100644
--- a/t/65_db_config.t
+++ b/t/65_db_config.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/cookbook_variance.t b/t/cookbook_variance.t
index 26fb415..33e64b0 100644
--- a/t/cookbook_variance.t
+++ b/t/cookbook_variance.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_106151_outermost_savepoint.t b/t/rt_106151_outermost_savepoint.t
index 8bfa02e..017444a 100644
--- a/t/rt_106151_outermost_savepoint.t
+++ b/t/rt_106151_outermost_savepoint.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_106950_extra_warnings_with_savepoints.t b/t/rt_106950_extra_warnings_with_savepoints.t
index 8afdd12..5669579 100644
--- a/t/rt_106950_extra_warnings_with_savepoints.t
+++ b/t/rt_106950_extra_warnings_with_savepoints.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_115465_column_info_with_spaces.t b/t/rt_115465_column_info_with_spaces.t
index 5fdab01..6190eb8 100644
--- a/t/rt_115465_column_info_with_spaces.t
+++ b/t/rt_115465_column_info_with_spaces.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_15186_prepcached.t b/t/rt_15186_prepcached.t
index 9258380..04a7853 100644
--- a/t/rt_15186_prepcached.t
+++ b/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().
diff --git a/t/rt_21406_auto_finish.t b/t/rt_21406_auto_finish.t
index fe9fdc5..7afa02b 100644
--- a/t/rt_21406_auto_finish.t
+++ b/t/rt_21406_auto_finish.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_25371_asymmetric_unicode.t b/t/rt_25371_asymmetric_unicode.t
index 0d4e21c..f500a5e 100644
--- a/t/rt_25371_asymmetric_unicode.t
+++ b/t/rt_25371_asymmetric_unicode.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_25460_numeric_aggregate.t b/t/rt_25460_numeric_aggregate.t
index b6d9aca..c814c98 100644
--- a/t/rt_25460_numeric_aggregate.t
+++ b/t/rt_25460_numeric_aggregate.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_25924_user_defined_func_unicode.t b/t/rt_25924_user_defined_func_unicode.t
index bc62803..e89f534 100644
--- a/t/rt_25924_user_defined_func_unicode.t
+++ b/t/rt_25924_user_defined_func_unicode.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_26775_distinct.t b/t/rt_26775_distinct.t
index 024fbfe..181fcde 100644
--- a/t/rt_26775_distinct.t
+++ b/t/rt_26775_distinct.t
@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 use warnings;
 use DBI;
diff --git a/t/rt_29629_sqlite_where_length.t b/t/rt_29629_sqlite_where_length.t
index 7f33f80..fac86d5 100644
--- a/t/rt_29629_sqlite_where_length.t
+++ b/t/rt_29629_sqlite_where_length.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_31324_full_names.t b/t/rt_31324_full_names.t
index 374ba3e..96f394d 100644
--- a/t/rt_31324_full_names.t
+++ b/t/rt_31324_full_names.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_32889_prepare_cached_reexecute.t b/t/rt_32889_prepare_cached_reexecute.t
index f51927a..01cf171 100644
--- a/t/rt_32889_prepare_cached_reexecute.t
+++ b/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.
diff --git a/t/rt_36836_duplicate_key.t b/t/rt_36836_duplicate_key.t
index 8839d88..0c0ac11 100644
--- a/t/rt_36836_duplicate_key.t
+++ b/t/rt_36836_duplicate_key.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 # This is a simple insert/fetch test.
 
 use strict;
diff --git a/t/rt_36838_unique_and_bus_error.t b/t/rt_36838_unique_and_bus_error.t
index ab9846a..13e6aba 100644
--- a/t/rt_36838_unique_and_bus_error.t
+++ b/t/rt_36838_unique_and_bus_error.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_40594_nullable.t b/t/rt_40594_nullable.t
index d92296e..1b5682b 100644
--- a/t/rt_40594_nullable.t
+++ b/t/rt_40594_nullable.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_48393_debug_panic_with_commit.t b/t/rt_48393_debug_panic_with_commit.t
index 75bf399..dbbfae3 100644
--- a/t/rt_48393_debug_panic_with_commit.t
+++ b/t/rt_48393_debug_panic_with_commit.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_50503_fts3.t b/t/rt_50503_fts3.t
index 182c7b2..7573bd1 100644
--- a/t/rt_50503_fts3.t
+++ b/t/rt_50503_fts3.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_52573_manual_exclusive_lock.t b/t/rt_52573_manual_exclusive_lock.t
index 48dd1e7..2ad876e 100644
--- a/t/rt_52573_manual_exclusive_lock.t
+++ b/t/rt_52573_manual_exclusive_lock.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl -w
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_53235_icu_compatibility.t b/t/rt_53235_icu_compatibility.t
index be86860..8c33a4e 100644
--- a/t/rt_53235_icu_compatibility.t
+++ b/t/rt_53235_icu_compatibility.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
     $|  = 1;
diff --git a/t/rt_62370_diconnected_handles_operation.t b/t/rt_62370_diconnected_handles_operation.t
index d61db18..cc548cf 100644
--- a/t/rt_62370_diconnected_handles_operation.t
+++ b/t/rt_62370_diconnected_handles_operation.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_64177_ping_wipes_out_the_errstr.t b/t/rt_64177_ping_wipes_out_the_errstr.t
index 0e9e969..d2c4ee0 100644
--- a/t/rt_64177_ping_wipes_out_the_errstr.t
+++ b/t/rt_64177_ping_wipes_out_the_errstr.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_67581_bind_params_mismatch.t b/t/rt_67581_bind_params_mismatch.t
index 4ff2079..a51155a 100644
--- a/t/rt_67581_bind_params_mismatch.t
+++ b/t/rt_67581_bind_params_mismatch.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_71311_bind_col_and_unicode.t b/t/rt_71311_bind_col_and_unicode.t
index e741460..b351f3e 100644
--- a/t/rt_71311_bind_col_and_unicode.t
+++ b/t/rt_71311_bind_col_and_unicode.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_73159_fts_tokenizer_segfault.t b/t/rt_73159_fts_tokenizer_segfault.t
index 7069813..b289c3b 100644
--- a/t/rt_73159_fts_tokenizer_segfault.t
+++ b/t/rt_73159_fts_tokenizer_segfault.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_73787_exponential_buffer_overflow.t b/t/rt_73787_exponential_buffer_overflow.t
index a77c66a..1954471 100644
--- a/t/rt_73787_exponential_buffer_overflow.t
+++ b/t/rt_73787_exponential_buffer_overflow.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_76395_int_overflow.t b/t/rt_76395_int_overflow.t
index 06fcf83..c69b00a 100644
--- a/t/rt_76395_int_overflow.t
+++ b/t/rt_76395_int_overflow.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use warnings;
 use strict;
 BEGIN {
diff --git a/t/rt_77724_primary_key_with_a_whitespace.t b/t/rt_77724_primary_key_with_a_whitespace.t
index 681b61b..1649e4a 100644
--- a/t/rt_77724_primary_key_with_a_whitespace.t
+++ b/t/rt_77724_primary_key_with_a_whitespace.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_78833_utf8_flag_for_column_names.t b/t/rt_78833_utf8_flag_for_column_names.t
index 277ebdb..8350fea 100644
--- a/t/rt_78833_utf8_flag_for_column_names.t
+++ b/t/rt_78833_utf8_flag_for_column_names.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_81536_multi_column_primary_key_info.t b/t/rt_81536_multi_column_primary_key_info.t
index b7aa5f1..39e413d 100644
--- a/t/rt_81536_multi_column_primary_key_info.t
+++ b/t/rt_81536_multi_column_primary_key_info.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_88228_sqlite_3_8_0_crash.t b/t/rt_88228_sqlite_3_8_0_crash.t
index e9d4fb2..144e5b7 100644
--- a/t/rt_88228_sqlite_3_8_0_crash.t
+++ b/t/rt_88228_sqlite_3_8_0_crash.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/rt_96877_unicode_statements.t b/t/rt_96877_unicode_statements.t
index 2e2f6af..af19ddf 100644
--- a/t/rt_96877_unicode_statements.t
+++ b/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.
diff --git a/t/rt_96878_fts_contentless_table.t b/t/rt_96878_fts_contentless_table.t
index 1d04473..7f5d4cb 100644
--- a/t/rt_96878_fts_contentless_table.t
+++ b/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
diff --git a/t/rt_97598_crash_on_disconnect_with_virtual_tables.t b/t/rt_97598_crash_on_disconnect_with_virtual_tables.t
index bea7c41..771675f 100644
--- a/t/rt_97598_crash_on_disconnect_with_virtual_tables.t
+++ b/t/rt_97598_crash_on_disconnect_with_virtual_tables.t
@@ -1,5 +1,3 @@
-#!/usr/bin/perl
-
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/virtual_table/00_base.t b/t/virtual_table/00_base.t
index 6259555..b9e6c6e 100644
--- a/t/virtual_table/00_base.t
+++ b/t/virtual_table/00_base.t
@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/virtual_table/01_destroy.t b/t/virtual_table/01_destroy.t
index 117adfd..8bc5cc0 100644
--- a/t/virtual_table/01_destroy.t
+++ b/t/virtual_table/01_destroy.t
@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/virtual_table/02_find_function.t b/t/virtual_table/02_find_function.t
index 70418e0..3b8b5d1 100644
--- a/t/virtual_table/02_find_function.t
+++ b/t/virtual_table/02_find_function.t
@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/virtual_table/10_filecontent.t b/t/virtual_table/10_filecontent.t
index dcc74f5..eec27ce 100644
--- a/t/virtual_table/10_filecontent.t
+++ b/t/virtual_table/10_filecontent.t
@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/virtual_table/11_filecontent_fulltext.t b/t/virtual_table/11_filecontent_fulltext.t
index 0a0304f..1d9df04 100644
--- a/t/virtual_table/11_filecontent_fulltext.t
+++ b/t/virtual_table/11_filecontent_fulltext.t
@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/virtual_table/20_perldata.t b/t/virtual_table/20_perldata.t
index 3454915..eda6994 100644
--- a/t/virtual_table/20_perldata.t
+++ b/t/virtual_table/20_perldata.t
@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/virtual_table/21_perldata_charinfo.t b/t/virtual_table/21_perldata_charinfo.t
index 71484b8..060908b 100644
--- a/t/virtual_table/21_perldata_charinfo.t
+++ b/t/virtual_table/21_perldata_charinfo.t
@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 BEGIN {
 	$|  = 1;
diff --git a/t/virtual_table/rt_124941.t b/t/virtual_table/rt_124941.t
index 705096a..94331f5 100644
--- a/t/virtual_table/rt_124941.t
+++ b/t/virtual_table/rt_124941.t
@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 BEGIN {
         $|  = 1;
diff --git a/t/virtual_table/rt_99748.t b/t/virtual_table/rt_99748.t
index 206680e..1d6bf6d 100644
--- a/t/virtual_table/rt_99748.t
+++ b/t/virtual_table/rt_99748.t
@@ -1,4 +1,3 @@
-#!/usr/bin/perl
 use strict;
 BEGIN {
 	$|  = 1;