http://qs1969.pair.com?node_id=583170


in reply to process array with while loop

There are also other alternatives for foreach. My preferred one is map: 

@array = qw(blue red orange brown);

map print, @array;

[download]

map allows you to work loops as mathematical application (or functions), and this is the closest approach to my world model.

UPDATE:Many thanks to ww, ikegami, merlyn for their comments and corrections.

-- monsieur_champs

Replies are listed 'Best First'.
Re^2: process array with while loop
by blahblah (Friar) on Nov 09, 2006 at 18:27 UTC
    I was going to reply with "map in void context, for shame", but then I learned something!
[reply]
      Except that print is not a void context. Therefore the map will create a list. 
      #!/usr/bin/perl

use strict;
use warnings;

my $a = ( print "Hello world\n" );
print "The answer is $a\n";

__END__

      [download]
      See `perldoc -f print` for details.
[reply]
[d/l]
[select]
        Except that print is not a void context.

        I think you might be misunderstanding. blahblah wasn't talking about the call to print. He was talking about the call to map ("map in a void context"). And the call to map is in a void context - its return value doesn't go anywhere. But as he also pointed out, that's no longer a problem. Or, at least, it's not a problem from a technical point of view. I'd still argue that it's not the clearest way to write the code.

        --
        <http://dave.org.uk>

        "The first rule of Perl club is you do not talk about Perl club."
        -- Chip Salzenberg

[reply]
Re^2: process array with while loop
by chromatic (Archbishop) on Nov 09, 2006 at 19:37 UTC

    What advantage does this have over print @array;?

[reply]
[d/l]

      No advantage, I just like this construct. It can even not be the more advisable, nor the one everybody uses, but it is quite readable for me and TIMTOWTDI is important. ;-)

      -- monsieur_champs

[reply]

In Section Seekers of Perl Wisdom