X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=htetc%2Fglobal.asa;h=782e06223321565d05fba4591a82df57e7b7c651;hp=55cc8ed9465a591eee951c187bed3b1db3157f96;hb=eb4cf5563939a08eba1a10d8c2a8f52205f6535b;hpb=93a8bcc4ddde083b9da915986e32231530bbcb5e diff --git a/htetc/global.asa b/htetc/global.asa index 55cc8ed94..782e06223 100644 --- a/htetc/global.asa +++ b/htetc/global.asa @@ -15,6 +15,10 @@ use HTML::Entities; 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 Chart::LinesPoints;