PC World 2005 June/PCWorld_2005-06_cd.bin/software/vyzkuste/firewally/firewally.exe/framework-2.3.exe/Hostname.eg

Text File | 2003-11-07 | 235b | 15 lines

# This is an example Hostname.pm.

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;