in somefile...
bla bla bal
#!perl
execute()
__END__
bla bla bla

##</code><code>##

> perl -x somefile