/(.*?)\s*=\s*(.*)/ and $var{$1} = $2 while <FILE>;
did u mean ?
/(.*?)\s*=\s*(.*)/ and $var->{$1} = $2 while <FILE>;
-Pradeep
-----Original Message-----
From: Jeff 'japhy' Pinyan [mailto:[EMAIL PROTECTED]]
Sent: Tuesday, February 05, 2002 12:33 PM
To: Kevin Werckman
Cc: [EMAIL PROTECTED]
Subject: Re: Study group for motivated people wanting to learn Perl.
On Feb 5, Kevin Werckman said:
>I'm hoping to get a small study group together that are interested in
>making some serious progress learning perl. I also need a few good
>volunteers willing to torture the group with some challenging quizes.
I think the biggest obstacle for people learning Perl is grasping Perl's
idioms -- the things that you can do in Perl that you can't really do so
simply in other languages (well, except for Ruby...).
Stuff like:
@unique = grep !$seen{$_}++, @original;
and
/(.*?)\s*=\s*(.*)/ and $var{$1} = $2 while <FILE>;
I'd be happy to assist in the breaking down of such idioms and helping
people grok[1] them.
[1] "Stranger in a Strange Land", Robert Heinlein
--
Jeff "japhy" Pinyan [EMAIL PROTECTED] http://www.pobox.com/~japhy/
RPI Acacia brother #734 http://www.perlmonks.org/ http://www.cpan.org/
** Look for "Regular Expressions in Perl" published by Manning, in 2002 **
<stu> what does y/// stand for? <tenderpuss> why, yansliterate of course.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
