in reply to Can you help as to why I get this error?

Under strict, you can't use class names as first-class citizens. You have to quote them:
tie my @lines, 'Tie::File', $infile;

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord }map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,

Replies are listed 'Best First'.
Re^2: Can you help as to why I get this error?
by Anonymous Monk on Mar 17, 2016 at 16:25 UTC
    Damn! silly me... thank you very much!