diff options
| author | Gisle Aas <gisle@aas.no> | 2005-08-15 14:05:22 -0700 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2005-08-16 07:36:58 +0000 |
| commit | 3db79780c8c68c9c0d40bc69eacba51360a89b19 (patch) | |
| tree | f9255b6ea28a5f5bf07e94327a8360d8f886df26 /ext | |
| parent | 5581d86f13e537e0ab3f5e15b08d24e955526bcc (diff) | |
| download | perl-3db79780c8c68c9c0d40bc69eacba51360a89b19.tar.gz | |
Time::HiRes::nanosleep support for Solaris [PATCH]
Message-ID: <lrk6imy1a5.fsf@caliper.activestate.com>
p4raw-id: //depot/perl@25295
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/Time/HiRes/hints/solaris.pl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/ext/Time/HiRes/hints/solaris.pl b/ext/Time/HiRes/hints/solaris.pl index 267cf580b1..6cc80e7bc5 100644 --- 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']; |