[oak perl] perl can bite me

George Woolley george at metaart.org
Tue Nov 26 11:29:42 CST 2002


David,
Oh, yeah, and thanks for posting!     :) George

On Tuesday 26 November 2002 8:01 am, David Wheeler wrote:
> On Monday, November 25, 2002, at 05:52  PM, cajun at cajuninc.com wrote:
> > my @beer= qw (good cold more);
> > foreach (@beer){
> >   print "$_ beer\n";
> > }
>
> my @beer = qw(good cold more);
> while (1) { map { print "$_ free beer\n" } @beer }
>
> :-)
>
> David




More information about the Oakland mailing list