Select Code to Download

my $myname = myname();
# or
print myname(), "\n";

sub myname {
    my $name = "bill";
}

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