blob: 4736c1a6ef22e72bbb95e062a453d9a98747621f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
#
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;
|