hostname.pm.eg

来自「视频监控网络部分的协议ddns,的模块的实现代码,请大家大胆指正.」· EG 代码 · 共 15 行

#

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;