Hi, I would drop the use diagnostics from any code you see as worth posting. While it may be useful in development if you are new to Perl it is not needed in production code as slows loading and uses a chunk of memory for no good reason.

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print