"i hope this code is fine"

What do you mean by this? Have you tested your code? Does it do what you want? Does it return some error? How do I post a question effectively?. Consider using strict and warnings to work out problems:

• perlintro
• http://learn.perl.org
• http://perldoc.perl.org
• The tutorials section of this site, Use strict warnings and diagnostics or die, Debugging and Optimization