$foo = 42;
print "In foo.pl: \$foo = $foo\n"