TIMTOWTDI

JStay at mediageneral.com JStay at mediageneral.com
Mon Aug 15 08:17:20 MDT 2005


Hopefully this doesn't spawn off another flame war, but for those of you
that do come across bad Perl code due to the TIMTOWTDI mentality of
Perl, this article from OSCON gives some great tips to make it right:

http://www.oreillynet.com/pub/wlg/7551

####################################
### Jesse Stay                   ###
### Lead Applications Developer  ###
### IMD Classifieds              ###
### Media General, Inc.          ###
### (804)649-6534                ###
####################################
#!/usr/bin/perl
$^=q;@!>~|{>krw>yn{u<$$<Sn||n<|}j=<$$<Yn{u<Qjltn{ > 0gFzD gD, 00Fz, 0,,(
0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{ rw}
>;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print 



More information about the PLUG mailing list