Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...

my %k = test(); 
print Dumper(\%k);
  2. or download this
    $VAR1 = {
          '1' => undef,
          '3' => undef,
          '2' => undef
        };
  3. or download this
    use strict;
use warnings;
...
          '3' => '0.0436435554447634',
          '2' => '0.220397240555943'
        };
  4. or download this
    use strict;
use warnings;
...
          '3' => '0.0419468023619665',
          '2' => '0.199076903824793'
        };