1 2 3 4 5 6 7 8
#!/usr/bin/perl # This looks equally like a TAP file and a Perl executable. print <<'END_TESTS'; 1..1 ok 1 - source.pl END_TESTS