substr($query, -1,1)='' if substr($query, -1,1) eq ',';
*note, I use substr($query, -1,1)='' instead of substr($query, -1,1,'') cause you never know how old the perl is ;)
MJD says you
can't just make shit up and expect the computer to know what you mean, retardo!
I run a Win32 PPM
repository for perl 5.6x+5.8x. I take requests.
** The Third rule of perl club is a statement of fact: pod is sexy.
|
| [reply] [d/l] |