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