my %annoyances = (
'phb' => "Friday I hawaiian shirt day... yeah...",
'scriptkiddie' => 'i hax0red j00! j00 teh sux0r1',
'aolpeople' => "a/s/l? omg! lol!",
'spam' => "Increase your BUST SIZE!!!! Act NOW!",
);

delete $annoyances{$_} foreach keys %annoyances;

$world++;