foreach $nnn (sort { $virus{$b} <=> $virus{$a} } keys %virus) {
$out .= " $virus{$nnn} - $nnn\n";
}
Часто для меня мечта выглядит вот так. Чтобы отстали и поспать дали
Зашел по какой-то ссылке в ЖЖ и решил почитать ленту френдов. Ну и конечно же там остался единственный персонаж —…
Очень забавные ощущения. Меня тут порой поругивают за то, что не могу выражать свои мысли в одной строчки, например. Читать народ вообще разучился и…