diff options
| author | David Leadbeater | 2015-01-10 17:26:59 +0000 |
|---|---|---|
| committer | David Leadbeater | 2015-01-10 17:26:59 +0000 |
| commit | 1bae3cffef57d4d46d0230aa4f44cc52c7671b93 (patch) | |
| tree | 03d3b85d868a72a6b162c7dca8ea7c0173510618 /scripts/uptime.pl | |
| parent | 6fa0cda4b3f7d54d5835fe580795e4f35980cc28 (diff) | |
| parent | 55e10f5aeb6d0559518623a432263d4a73d7614b (diff) | |
| download | scripts.irssi.org-1bae3cffef57d4d46d0230aa4f44cc52c7671b93.tar.bz2 | |
Merge pull request #83 from obfuscoder/perlcritic-s-z
Fix perlcritic issues for all scripts starting with s to z
Diffstat (limited to 'scripts/uptime.pl')
| -rw-r--r-- | scripts/uptime.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/uptime.pl b/scripts/uptime.pl index 114070c..6846fb1 100644 --- a/scripts/uptime.pl +++ b/scripts/uptime.pl @@ -37,11 +37,11 @@ sub uptime_linux { my($irssi_start); local(*FILE); - open FILE, "< /proc/uptime"; + open FILE, "<", "/proc/uptime"; $sys_uptime = (split " ", <FILE>)[0]; close FILE; - open FILE, "< /proc/$$/stat"; + open FILE, "<", "/proc/$$/stat"; $irssi_start = (split " ", <FILE>)[21]; close FILE; |