if ($! == EAGAIN()) { print "\nEAGAIN is set\n"; last; } else { last; }