You did not disclose any specific details regarding your problem. Do you get error or warning messages? Do your variables contain unexpected data? Since we can not run your code, let us know.

Since you are new to Perl, perhaps the Basic debugging checklist can help.

By the way, the name of the language is Perl (not PERL).