Help for this page
no strict; if (defined $$newvarname) { $$var = $$newvarname; }
my %hash = ( qw/ foo 1 bar 2 baz 3 / ); ... return "username => $name" if defined $name; die "no name for $one "; }