summaryrefslogtreecommitdiff
path: root/lib/hostname.pl
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-07-26 05:12:24 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-07-26 05:12:24 +0000
commita6d7165678aed89f828954d0fcb2e714844ad7d6 (patch)
tree80ae7cc1149278634c955c1f15c9bae2d6e8306d /lib/hostname.pl
parent4802d5d799ab971f97d7df94b7f1637c213350a8 (diff)
downloadperl-a6d7165678aed89f828954d0fcb2e714844ad7d6.tar.gz
add disclaimer about perl 4 libraries (modified version of
patch suggested by Clinton Pierce <cpierce1@ford.com>) p4raw-id: //depot/perl@3759
Diffstat (limited to 'lib/hostname.pl')
-rw-r--r--lib/hostname.pl10
1 files changed, 9 insertions, 1 deletions
diff --git a/lib/hostname.pl b/lib/hostname.pl
index 5394c6ec69..63eea8fee4 100644
--- a/lib/hostname.pl
+++ b/lib/hostname.pl
@@ -1,5 +1,13 @@
# From: asherman@fmrco.com (Aaron Sherman)
-
+#
+# This library is no longer being maintained, and is included for backward
+# compatibility with Perl 4 programs which may require it.
+#
+# In particular, this should not be used as an example of modern Perl
+# programming techniques.
+#
+# Suggested alternative: Sys::Hostname
+#
sub hostname
{
local(*P,@tmp,$hostname,$_);