#!/usr/bin/perl
use strict;
use warnings;
my %hash;
foreach ( 1 .. 10 ) {
$hash{$_} = $_;
}
foreach ( sort(keys %hash) ) {
print $_ . ": " . "$hash{$_}" . "\n" ;
}
Когда я выполняю приведенный выше код, результат будет следующим:
1: 1
10: 10
2: 2
3: 3
4: 4
5: 5
6: 6
7: 7
8: 8
9: 9
Я ожидаю, что "10: 10" будет последним напечатанным. Мне просто нужен кто-то, чтобы объяснить, почему Perl преподносит мне сюрприз в этом случае.