String Perl

#!/usr/local/bin/perl 
$line = 
print ("$line"); 
__END__ 
This is my line of data.