@list = (\$a, \@b, \%c);
    @list = \($a, @b, %c);	# same thing!  

##</code><code>##

#!/usr/bin/perl -w
use Data::Dumper;

$ref=\(1..3);
$enum_list_ref=\(1,2,3);
@a=(\(1..3),\(5..9));

print "\n".Dumper($ref)."\n";
print "\n".Dumper($enum_list_ref)."\n";
print "\n".Dumper(\@a)."\n";