in reply to Script failed with certain value in the variable

Adding to what marinersk said above, there's an easy to overlook typo: 

-    if (!defined(Suffix) && defined($version))
+    if (!defined($suffix) && defined($version))

[download]
perl -le'print map{pack c,($-++?1:13)+ord}split//,ESEL'

In Section Seekers of Perl Wisdom