std subify

1 files changed, 2 insertions, 3 deletions

diff --git a/ulri b/ulri
index 7b83389..975092a 100755
--- a/ulri
+++ b/ulri
@@ -758,7 +758,7 @@ exit();
 #
 
 sub get_pid_from_file {
-    my $file = shift;
+    my ($file) = @_;
 
     my $pid;
     open my $FILE, $file || die "FATAL: can't open $file";
@@ -786,8 +786,7 @@ sub read_line {
 }
 
 sub check_file_timeout {
-    my $file = shift;
-    my $time = shift;
+    my ($file, $time) = @_;
 
     my $i = 0;
     while ($i < $time && (!-f $file || -z $file)) { sleep 1; $i++ }