#!/usr/local/bin/perl 

$line = <DATA>; 
print ("$line"); 
__END__ 
This is my line of data.