-l: sets the input and output record separators. here it has the effect of post-pending a newline at the end of the record.
-e: run the command afterwards.
$_ = "7P0>374;"; set $_ to the string 7P0>374;
tr[0->][ LEOR\!AUBGNSTY]; Apply the transliteration operator to $_. Translation map is:
take everything from 0 to > (ascii character range), and translate it to LEOR!AUBGNSTY.
i.e.
0 becomes ' ' (a single space)
1 become L
2 becomes E
3 becomes 0
4 -> R
5 -> !
6-> A
7-> U
8 -> B
9 -> G
: -> N
; -> S
< -> T
= ->Y
> -> Y (overflow since the trans array is one character longer than the replacements)
applying this to the string we get
7P0>374;
--------------
UP YOURS
On Monday, January 20, 2003, at 05:06 PM, Mat Harris wrote:
my boss emailed me this little snippet this morning and I have to confess it
has me stumped.
Please can someone break down this translation for me?
perl -le '$_="7P0>374;";tr[0->][ LEOR!AUBGNSTY];print'
thanks
--
Mat Harris OpenGPG Public Key ID: C37D57D9
[EMAIL PROTECTED] www.genestate.com
<mime-attachment>
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
