Daily WTF material
Not at work, thank god, but oh dear:
sub wait {
for ($y = 0; $y < 1000000; $y++) {
;
}
}
sub moment {
for ($y = 0; $y < 100000; $y++) {
;
}
}