X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fhostname.pl;h=63eea8fee455608793535a49847d22cf80f8adf5;hb=ebb9462d35b8e2e4f8f628bc4e3e7af9194b146a;hp=5394c6ec693f0518032c84db05eb98347916222a;hpb=463ee0b2acbd047c27e8b5393cdd8398881824c5;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/hostname.pl b/lib/hostname.pl
index 5394c6e..63eea8f 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,$_);