&func ( $scalar, \@array );

sub func {
my $var = shift;
my @list = ???? #what the heck do I put here to get @list == @array?
# do stuff