X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=htetc%2Fhandler.pl;h=aeae3800f2b57e417186df44a216738d3861eef4;hb=99e7fe7d18b91fb886f684a01df2f4efe02b34eb;hp=67719b8fe5df3d1c641e88e48956bfb1e8785c7e;hpb=6787d5247619f651cba138779fc93f016be9bcee;p=freeside.git

diff --git a/htetc/handler.pl b/htetc/handler.pl
index 67719b8fe..aeae3800f 100644
--- a/htetc/handler.pl
+++ b/htetc/handler.pl
@@ -72,6 +72,10 @@ sub handler
       use IO::Handle;
       use IO::File;
       use Net::Whois::Raw qw(whois);
+      if ( $] < 5.006 ) {
+        eval "use Net::Whois::Raw 0.32 qw(whois)";
+        die $@ if $@;
+      }
       use Business::CreditCard;
       use String::Approx qw(amatch);
       use HTML::Widgets::SelectLayers 0.03;