Re^3: Pulling out an element from a function return without using an intermediate list

use strict;
use warnings;

my (undef, $param, undef, $other, @stuff) = dir();

print "undef, $param, undef, $other, @stuff";

sub dir {
    return (1, 2, 3, 4, 5, 6);
}
[download]

Prints:

undef, 2, undef, 4, 5 6
[download]

Works fine for me. What version of Perl are you using?

DWIM is Perl's answer to Gödel

Comment on Re^3: Pulling out an element from a function return without using an intermediate list Select or Download Code