my $sth = { NAME_uc => [ 1 .. 2 ] }; print join "\n" , $sth->{NAME_uc}[0 ,1 ]; __END__ 2