http://www.perlmonks.org?node_id=1225258


in reply to Re^5: language translate
in thread language translate

Google translate used to be free for small data volumes, but they turned it off. IIRC five or six years ago.
($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,