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
