Re^2: failure to generate report file

i paste the code in and tried to run it with perl -wc but the error as below

Name "main::seen" used only once: possible typo at line 8
[download]

Comment on Re^2: failure to generate report file Download Code