i'd rather get the values as well, if possible.

#!/usr/bin/perl -w
use strict;
$|++;

use Data::Dumper;

sub foo { [5, 3], 17 };

my $count = my (@values) = foo();

print $count, "\n";
print Dumper @values;
[download]

puts out:

2
$VAR1 = [
          5,
          3
        ];
$VAR2 = 17;
[download]

but this line: my $count = my (@values) = foo(); is ugly, usually i'd declare the variables first.

~Particle