> "David Golden" <[EMAIL PROTECTED]> wrote on 02/23/2008 03:00:19 PM:
> >   my $regex = join q{}, map { $num2chars[$_] } @digits;

The only thing I would object to is the q{}. There's really no point 
in using the q{} operator ... it just confuses the point here. 

my $regex = join '', map { $num2chars[$_] } @digits;

And it could actually just as well be written as

my $regex = join '', @[EMAIL PROTECTED];

which IMHO is even clearer. "Join together the chars that belong to 
the digits".

Jenda
===== [EMAIL PROTECTED] === http://Jenda.Krynicky.cz =====
When it comes to wine, women and song, wizards are allowed 
to get drunk and croon as much as they like.
        -- Terry Pratchett in Sourcery

_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to