my $count = time;

$_ = 'hello there';

while (/e/) {
  print "ooo, looping\n";
  die ('infinite loop') if ($count + 2 > time);
}