Help for this page

Select Code to Download


  1. or download this
    my (%H) = (1,100,2,200,3,300);
@A=  @H{ (1,3) };
  2. or download this
    my $Href = {1 => 100,3 =>300};
@A = @{$Href}->{ (1,3) };
  3. or download this
    $Href = {1 => 100,3 =>300};
%H = %{$Href};
@A = @H{ (1,3) };
  4. or download this
    $Href = {1 => 100,3 =>300};
my @A;
{ local %G;  *G = $Href; @A = @G->{ (1,3) } }