$ echo 13 > lucky.pl
 $ perl -l
print do 'lucky.pl';
print require 'lucky.pl';
print do 'lucky.pl';
__END__
13
1
13
 $