Select Code to Download

print "What is your name?\n";
$input=<STDIN>;
...
    $s=chomp $input;
    return ($s);
}