print time . "\n"; my @a = any {$_== 92} 1..100000000; print "\n"; print time;