my $ref = \ (1, 2, 3); print ${$ref}, "\n";