my $myname = myname(); # or print myname(), "\n"; #### sub myname { my $name = "bill"; } #### my $myname = myname(); print "my name is $myname\n"; sub myname { my $name = "bill"; # notice subtle change in variable name return $name; # not necessary, $myname works too } # but it is not the same $myname ;)