while(defined ($line = $jobfh->getline)) 
  { # do something }