# # System Modules # use CGI; use HTML::Template; use File::stat; use File::Type; use File::Temp; use JSON; use Time::Local; use POSIX 'strftime'; use XML::Simple; use XML::Parser; use IO::Socket::INET; use Digest::MD5 qw(md5 md5_hex md5_base64); use Data::Dumper; use Net::SMTP; use Net::SMTP::TLS; use MIME::Base64; use Compress::Zlib; use URI::Escape; use Locale::Country; use Socket; use HTML::Entities; use List::Util qw[min max]; use IO::Uncompress::Gunzip qw(gunzip $GunzipError); use IO::Compress::Gzip qw(gzip $GzipError); 1;