Consider using the WWW::Mechanize module. The documentaion is clear and it provides the functionality you require to solve your current problem.

You've been advised several times now to look at using a module such as WWW::Mechanize, it has great documentation. For some reason you aren't telling us you don't want to take this advice. If you do take this advice you'd find it an easy solution to your current problem.

Update: fixed link to WWW::Mechanize, thanks Corion.

Update 2: My mistake, updated reply.