develooper Front page | perl.beginners | Postings from May 2007

overriding posix::uname

Thread Next
From:
Ken Foskey
Date:
May 18, 2007 20:30
Subject:
overriding posix::uname
Message ID:
1179545473.5089.1.camel@localhost.localdomain

sub is_dev
{
    my ($server, $host) = POSIX::uname();

	if ($host eq "aixmbk10") {
		return 1;

I want to test this module in a test script.  SO I want to code the
various servers and check that it works.

Is there a way to override the call to POSIX::uname

Thanks
Ken


Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About