in reply to Re^3: Making a regex case insensitive
in thread Making a regex case insensitive
Sure there is!
s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/
A lowercase "--" is "__" and a lowercase ";" is ",".
</tongue-in-cheek>
s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/
|
---|
In Section
Seekers of Perl Wisdom