|
Added
Link Here
|
| 1 |
--- lib/Unix/Uptime.pm.orig 2009-01-19 13:22:27.000000000 -0200 |
| 2 |
+++ lib/Unix/Uptime.pm 2009-01-19 13:23:38.000000000 -0200 |
| 3 |
@@ -62,7 +62,8 @@ |
| 4 |
my $class = shift; |
| 5 |
|
| 6 |
my $boottime = `sysctl kern.boottime`; |
| 7 |
- my $boot_seconds = $boottime =~ /\s+sec\s+=\s+(\d+),/; |
| 8 |
+ $boottime =~ /\s+sec\s+=\s+(\d+),/; |
| 9 |
+ my $boot_seconds = $1; |
| 10 |
my $time = time(); |
| 11 |
my $uptime = $time - $boot_seconds; |
| 12 |
return $uptime; |