$ cat echo.pl 
use warnings;
use strict;

print "hey!\n";

##</code><code>##

perl echo.pl | less

##</code><code>##

hey!