In the past 20 hours and 20 minutes, one of perl.org's mail relays has seen (and stopped) the following viruses.
1 Trojan.Dropper.C
1 Worm.Gibe.F.UPX.2
2 Worm.Torvil.D
4 Worm.Dumaru.K
5 Worm.Sober.D
5 Worm.SomeFool.O
14 Worm.Bagle.Gen-2
21 Worm.SomeFool.M
23 Worm.Bagle.P
26 Worm.SomeFool.F
41 Worm.Dumaru.Y
44 Worm.Gibe.F
48 Worm.Mydoom.H
64 Worm.Bagle.Gen-1
134 Worm.Bagle.Gen-zippwd
181 Worm.Bagle.N
277 Worm.Bagle.Gen-zippwd-2
343 Worm.Mydoom.F
358 Worm.SomeFool.I
561 Worm.SCO.A
3336 Worm.SomeFool.Gen-2
8898 Worm.SomeFool.Gen-1