Re^3: qw with anonomous list ref

[Aristotle]

Most often I use this to do something to several arrays at once:

my %silly_example;
for(\(@couple, @of, @arrays, @here)) {
    $silly_example{shift @$_}++;
    splice @$_, 7, 1;
    push @$_, shift @$_;
}

Occasionally it comes it handy for a similar use of map or some such.

Makeshifts last the longest.