1 Some stuff that's not Perl
3 This CPP directive should not be read.
18 #!/some/path/that/leads/to/perl -l
20 # The -l switch should be applied from the #! line.
21 # Unfortunately, -P has a bug whereby the #! line is ignored.
22 # If this test suddenly starts printing blank lines that bug is fixed.
27 # define YAR "not ok 2\n"