As in Create HTML files using perl on the fly (posted a mere five minutes earlier), your code does NOT compile (for example, line 29 lacks a semi, separator).

Since you're a new monk, may I suggest that you will get closer review (and you may get better help) if you demonstrate more care in removing easy-to-find errors like that before posting...
and if you are posting seeking comments, please post as SOPW; not as something an unwary noob may think is good code.