Next meeting

Curtis Poe poec at
Wed Jan 9 15:57:12 CST 2002

Don't forget that the next meeting is this evening.  See for

If you're new to Perl, this meeting may get a bit hairy at times, but it should still be rather
informative.  Don't be afraid!

Curtis "Ovid" Poe

"Ovid" on
Someone asked me how to count to 10 in Perl:
push at A,$_ for reverse q.e...q.n.;for(@A){$_=unpack(q|c|,$_);@a=split//;
shift at a;shift at a if $a[$[]eq$[;$_=join q||, at a};print $_,$/for reverse @A

Do You Yahoo!?
Send FREE video emails in Yahoo! Mail!

More information about the Pdx-pm-list mailing list