Help for this page

Select Code to Download


  1. or download this
    my @hash_refs = keys %{$VAR1};
    
  2. or download this
    #!/usr/bin/perl -w
    use strict;
    ...
    
    my %tmp = %$VAR1;
    print "'bar' in '365' is: ".$tmp{'365'}->{bar}."\n";