As for the code part in code tags, your linebreaks are preserved so no need for the BR tags. Also perl is case sensitive, which means your functions and control statements should be lower case (including typing them on here) but that may also be why the working version of this program is acting strange.

You will need to type in Randal exactly, including upper and lower case letters, to get the eq to match in it.

so if your match is

if($name eq "Randal")
[download]

you must type Randal and not RANDAL or randal to get a match.

Hope this helps and welcome to the monastery.