X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=htetc%2Fhandler.pl;h=aeae3800f2b57e417186df44a216738d3861eef4;hb=0c52e96b47c207f73c68e9cdab0dc8c5654c4e5c;hp=67719b8fe5df3d1c641e88e48956bfb1e8785c7e;hpb=70dcaf5ee8a66d301e7fde72dd9514b22649ecb5;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;