Crossposted to
StackOverflow. It's OK to crosspost, but it's considered polite to inform about crossposting to boost cooperation and to save people not attending both sites from unnecessary effort while hacking a problem already solved at the other end of the internet.
($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,