home *** CD-ROM | disk | FTP | other *** search
/ PC World 2005 December (Special) / PCWorld_2005-12_Special_cd.bin / Bezpecnost / lsti / lsti.exe / framework-2.5.exe / Hostname.eg < prev    next >
Text File  |  2005-01-27  |  235b  |  15 lines

  1. # This is an example Hostname.pm.
  2.  
  3. package Sys::Hostname;
  4.  
  5. use Net::Domain qw(hostname);
  6. use Carp;
  7.  
  8. require Exporter;
  9. @ISA = qw(Exporter);
  10. @EXPORT = qw(hostname);
  11.  
  12. carp "deprecated package 'Sys::Hostname', use Net::Domain" if $^W;
  13.  
  14. 1;
  15.