print "The string is $foo\n"; #### my $foo; # some code print "The string is $foo\n";