SVN: toys/rsget.pl/RSGet/Curl.pm

[sparky]

Author: sparky
Date: Mon Apr 11 21:53:36 2011
New Revision: 12225

Modified:
   toys/rsget.pl/RSGet/Curl.pm
Log:
- use WWW::CurlOO if available


Modified: toys/rsget.pl/RSGet/Curl.pm
==============================================================================
--- toys/rsget.pl/RSGet/Curl.pm	(original)
+++ toys/rsget.pl/RSGet/Curl.pm	Mon Apr 11 21:53:36 2011
@@ -10,6 +10,18 @@
 use RSGet::Tools;
 use RSGet::Line;
 use RSGet::Hook;
+BEGIN {
+	eval { require WWW::CurlOO::Compat; };
+	if ( $@ ) {
+		warn "\nERROR::Could not load WWW::CurlOO::Compat -- " .
+			"will use WWW::Curl instead\n";
+		warn "NOTE: future rsget.pl versions will require WWW::CurlOO to run,\n" .
+			"so make sure it is available in your operating system before " .
+			"that happens.\n\n";
+	} else {
+		print "Using WWW::CurlOO, woohoo !\n";
+	}
+}
 use WWW::Curl::Easy 4.00;
 use WWW::Curl::Multi;
 use URI::Escape;