in reply to Link not working in Perl script

You have a bug somewhere. Maybe on line 23. Maybe somewhere else.

Considering you show no code, and no useful error report, what else do you expect as an answer?