- or download this
my %hash2 =(
'1' => 2,
'3' => 5,
'4' => 2,);
- or download this
$VAR1 =
{
...
'1-4' => 4,
'4-4' => 2,#ends here
};
- or download this
use strict;
use warnings;
...
}
}
print Dumper \%spair;
- or download this
$VAR1 = {
'3-3' => 5,
...
'1-3' => 10,#repeat
'4-3' => 10 #repeat
};