Sign in
android
/
toolchain
/
perl
/
1121daca35c6c692602621eab28d4de19f0b347d
/
.
/
perl-5.16.2
/
cpan
/
libnet
/
Hostname.pm.eg
blob: 4736c1a6ef22e72bbb95e062a453d9a98747621f [
file
] [
log
] [
blame
]
#
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
;