Array Perl

@a = (1, 2, 3);
$arrayref = "a";
print "@$arrayref";