Select Code to Download

{
    my $user_name=param('username');
...
    $user_name = "Bill";
    print "IN SUBROUTINE: user_name == $user_name<br>\n";
}