Time::HiRes::nanosleep support for Solaris [PATCH]

Message-ID: <lrk6imy1a5.fsf@caliper.activestate.com>

p4raw-id: //depot/perl@25295

diff --git a/ext/Time/HiRes/hints/solaris.pl b/ext/Time/HiRes/hints/solaris.pl
index 267cf58..6cc80e7 100644 (file)
--- a/ext/Time/HiRes/hints/solaris.pl
+++ b/ext/Time/HiRes/hints/solaris.pl
@@ -1,6 +1,7 @@
-use POSIX qw(uname);
 # 2.6 has nanosleep in -lposix4, after that it's in -lrt
-if (substr((uname())[2], 2) <= 6) {
+my $r = `/usr/bin/uname -r`;
+chomp($r);
+if (substr($r, 2) <= 6) {
     $self->{LIBS} = ['-lposix4'];
 } else {
     $self->{LIBS} = ['-lrt'];