€one = @two;
@one = €two;
@one = @two;
€one = €two;
€one = \@two;

# is translated to

$one = @two;
@one = $two;
@one = @two;
$one = $two;
$one = \@two;

##</code><code>##

sub aref2list ($) { return  @{ $_[0] } }
aref2list($hash->{foo,bar}[2]);