Help for this page

Select Code to Download


  1. or download this
    my $sth = { NAME_uc => [ 1 .. 2 ] };
print join "\n" , $sth->{NAME_uc}[0 ,1 ];
__END__
2
  2. or download this
    my $sth = { NAME_uc => [ 1 .. 2 ] };
print join "\n" , @$sth->{NAME_uc}[0 ,1 ];
__END__
Not an ARRAY reference at - line 3.
  3. or download this
    my $sth = { NAME_uc => [ 1 .. 2 ] };
print join "\n" , @{ $sth->{NAME_uc} } [0 ,1 ];
__END__
1
2
  4. or download this
    my $sth = { NAME_uc => [ 1 .. 2 ] };
print join "\n" , @{ $$sth{NAME_uc} } ,''
__END__
1
2