use warnings; BEGIN {$test_count = 2} use Test::More tests => $test_count; ok(1); ok(3);