X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=htetc%2Fhandler.pl;h=ad671d6c7c426aba413e7d2928ed364ebf775376;hb=e24adab0004e6dd1d77e8ed0ca39cfbb2ba4768f;hp=557ec02ed21185719e79c663c218e5b7c7d64542;hpb=9f9cfe720ba74e559ab669c68b28d9db820189aa;p=freeside.git diff --git a/htetc/handler.pl b/htetc/handler.pl index 557ec02ed..ad671d6c7 100644 --- a/htetc/handler.pl +++ b/htetc/handler.pl @@ -93,15 +93,20 @@ sub handler use Date::Format; use Date::Parse; use Time::Local; + use Time::Duration; use Tie::IxHash; + use URI::Escape; use HTML::Entities; use IO::Handle; use IO::File; + use IO::Scalar; use Net::Whois::Raw qw(whois); if ( $] < 5.006 ) { eval "use Net::Whois::Raw 0.32 qw(whois)"; die $@ if $@; } + use Text::CSV_XS; + use Spreadsheet::WriteExcel; use Business::CreditCard; use String::Approx qw(amatch); use Chart::LinesPoints; @@ -112,8 +117,9 @@ sub handler use FS::Conf; use FS::CGI qw(header menubar popurl table itable ntable idiot eidiot small_custview myexit http_header); + use FS::UI::Web; use FS::Msgcat qw(gettext geterror); - use FS::Misc qw( send_email ); + use FS::Misc qw( send_email send_fax ); use FS::Report::Table::Monthly; use FS::TicketSystem; @@ -159,6 +165,7 @@ sub handler use FS::rate; use FS::rate_region; use FS::rate_prefix; + use FS::XMLRPC; if ( %%%RT_ENABLED%%% ) { eval '