Small change for preparing get_pid_from_file() to work on a complete Iurt output log.

1 files changed, 1 insertions, 1 deletions

diff --git a/ulri b/ulri
index e585013..bbf2124 100755
--- a/ulri
+++ b/ulri
@@ -748,7 +748,7 @@ sub get_pid_from_file {
     my $pid;
     open my $FILE, $file || die "FATAL: can't open $file";
     local $_;
-    while (<$FILE>) { ($pid) = /PID=(\d+)/ }
+    while (<$FILE>) { last if ($pid) = /^PID=(\d+)/ }
 
     $pid;
 }