t/run/switchx.aux

   1 Some stuff that's not Perl
   2
   3 This CPP directive should not be read.
   4 #define BARMAR 1
   5
   6 #perl
   7
   8 Still not perl.
   9
  10 #!
  11
  12 still not perl
  13
  14 #!/something/else
  15
  16 still not perl
  17
  18 #!/some/path/that/leads/to/perl -l
  19
  20 print "1..1";
  21 print "ok 1";