Next pdx.pm meeting

[MarkyMoon]

This is kind of fitting tonight (snipped from The Official Guide to
Klingon Programming Etiquette):

@a = ("a".."z"," ","-","!","\n");foreach $b (
18,15,4,2,8,5,8,2,0,19,8,14,13,18,26,0,17,4,26,
5,14,17,26,19,7,4,26,22,4,0,10,26,0,13,3,26,19,
8,12,8,3,28) {print $a[$b]};print $a[29];

See you kids tonight!
MarkyMoon

Curtis Poe wrote:
> 
> Don't forget that the next pdx.pm meeting is this evening.  See http://portland.pm.org/ for
> details.
> 
> 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!
> 
> Cheers,
> Curtis "Ovid" Poe
> 
> =====
> "Ovid" on http://www.perlmonks.org/
> 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!
> http://promo.yahoo.com/videomail/
> TIMTOWTDI
TIMTOWTDI