Next pdx.pm meeting
MarkyMoon
markmoon at teleport.com
Wed Jan 9 18:52:21 CST 2002
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
More information about the Pdx-pm-list
mailing list