Your IP : 216.73.216.155

Current Path : /usr/share/perl/5.10/Net/
Upload File :
Current File : //usr/share/perl/5.10/Net/Hostname.pm.eg

#

package Sys::Hostname;

use Net::Domain qw(hostname);
use Carp;

require Exporter;
@ISA = qw(Exporter);
@EXPORT = qw(hostname);

carp "deprecated package 'Sys::Hostname', use Net::Domain" if $^W;

1;