Readability wasn't a concern with making this obfu. I did want to show that it worked with "use strict;" so I put that on a seperate line. Original Monks post below.
Joel Calaban on Monks #!c:\perl\perl.exe -w use strict; my $A="a";for(0..285074){$A++;}print"$A"; > -----Original Message----- > From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] > Sent: Thursday, January 10, 2002 9:47 AM > To: Hanson, Robert > Cc: [EMAIL PROTECTED]; 'zentara' > Subject: RE: interesting JAPH, how does this work? > > > > Try this: > > #!/opt/local/bin/perl > #!/usr/bin/perl > my $A="a"; > for(0..285074){ > $A++; > print" $A:"; > } > print"\n\n$A\n"; > > -------------------------------------- > This reemphasizes a mail I just read from someone on this > list about the need to write "clearly readable" codes. > > > > __________________ > > William Ampeh (x3939) > Federal Reserve Board > > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]