while (1) {
   if (-f $fn) {
       ## a file was found, do something
       DoSomething();
       ## then break the loop
       break; ## <<-- not exit();
   }
   ## pause 5 minutes before checking again
   sleep 300;
}