Report Perl

#!/usr/local/bin/perl 
$~ = "MYFORMAT"; 
write; 
format MYFORMAT = 
Here is the text I want to display. 
.