perl - Obtain reference from keys() -

i have array :

my @y = keys(%{$table->{fields}}); 

i'd have reference of array :

$columns = \@y; 

is there way operation on single line ?

yes, can assign $columns anon array reference,

my $columns = [ keys %{$table->{fields}} ];