Help for this page

Select Code to Download


  1. or download this
    use 5.012.02;
    use strict;
    ...
    foreach my $key ( sort keys %base_stat ) {
        say "$key => $base_stat{$key}";
    }
    
  2. or download this
    Use of uninitialized value $temp_array[0] in join or string at test.pl
    + line 26.
    Use of uninitialized value $temp_array[0] in join or string at test.pl
    + line 26.
    ...
    4 =>  82 83 77 68
    5 =>  68 81
    6 =>  81
    
  3. or download this
    use 5.012.02;
    use strict;
    ...
    }
    
    say $_ for @output_array;
    
  4. or download this
    use 5.012.02;
    use strict;
    ...
    foreach my $key ( sort keys %output_hash ) {
        say "$key => $output_hash{$key}";
    }