#!/usr/bin/perl

$B = 'Hello World' ;
print "#!/usr/bin/perl\n\n" ;
print "\$B = '$B' ;\n" ;
print "$B\n" ;