>perl -x <<END

bla bla bla ignored

#!perl

stuff_to_execute();

__END__

bla bla

END