diff options
author | Tim Bunce <Tim.Bunce@ig.co.uk> | 1997-06-11 12:00:00 +1200 |
---|---|---|
committer | Tim Bunce <Tim.Bunce@ig.co.uk> | 1997-06-11 12:00:00 +1200 |
commit | 3e3baf6d63945cb64e829d6e5c70a7d00f3d3d03 (patch) | |
tree | 0143be655536dc428f4fa3cc7d01f6bcffe14c01 /lib/ftp.pl | |
parent | 08aa1457cd52a368c210ab76a3da91cfadabea1a (diff) | |
parent | 3458556dd685b1767b760a72bd2e9007b5c4575e (diff) | |
download | perl-3e3baf6d63945cb64e829d6e5c70a7d00f3d3d03.tar.gz |
[differences between cumulative patch application and perl5.004_01]perl-5.004_01
[editor's note: The changes between this and 5.004 were processed from
the m1t2 release, which was a bad idea as it was the _01 release which
had the final corrected attributions. The differences between the
various m*t* releases do that; I considered it most valuable just to
look at the _NN releases. Many patches have been separated out and/or
applied from the p5p archives nonetheless.]
Diffstat (limited to 'lib/ftp.pl')
-rw-r--r-- | lib/ftp.pl | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/lib/ftp.pl b/lib/ftp.pl index 9528360da2..e671348105 100644 --- a/lib/ftp.pl +++ b/lib/ftp.pl @@ -88,7 +88,14 @@ # Initial revision # -require 'chat2.pl'; +eval { require 'chat2.pl' }; +die qq{$@ +The obsolete and problematic chat2.pl library has been removed from the +Perl distribution at the request of it's author. You can either get a +copy yourself or, preferably, fetch the new and much better Net::FTP +package from a CPAN ftp site. +} if $@ && $@ =~ /locate chat2.pl/; +die $@ if $@; eval "require 'socket.ph'" || eval "require 'sys/socket.ph'" || die "socket.ph missing: $!\n"; |