use 'use' instead of dynamic 'require', may affect performance a bit, but ignorable

git-svn-id: svn+ssh://svn.sourceforge.jp/svnroot/rec10@946 4e526526-5e11-4fc0-8910-f8fd03428081

diff --git a/rectool/trunk/rectool.pl b/rectool/trunk/rectool.pl
index e3e1e35..184170d 100755 (executable)
--- a/rectool/trunk/rectool.pl
+++ b/rectool/trunk/rectool.pl
@@ -9,6 +9,7 @@
 #use SVG;
 #use KCatch;
 use warnings;
 #use SVG;
 #use KCatch;
 use warnings;

+use utf8;

 use Algorithm::Diff qw(LCS);
 use Archive::Zip;
 use CGI;
 use Algorithm::Diff qw(LCS);
 use Archive::Zip;
 use CGI;


@@ -18,17 +19,21 @@ use Data::Dumper::Concise;
 use Date::Simple;
 use DateTime;
 use DBI;
 use Date::Simple;
 use DateTime;
 use DBI;

+use Encode;

 use File::Slurp;
 use File::Slurp;

+use List::Compare;
+use List::Util;

 use MIME::Base64;
 use Sort::Naturally;
 use MIME::Base64;
 use Sort::Naturally;

+use SVG;

 use Time::Piece;
 use Time::Seconds;
 use Time::Piece;
 use Time::Seconds;

+use Time::Simple;

 use Time::HiRes;
 use Tie::IxHash;
 use Time::HiRes;
 use Tie::IxHash;

+use XML::Atom;

 use XML::Generator::DBI;
 use XML::SAX::Writer;
 use XML::Generator::DBI;
 use XML::SAX::Writer;

-#require SVG Time::Simple XML::Atom Encode List::Compare List::Util
-use utf8;

 #%DB::packages = ( 'main' => 1 );
 
 
 #%DB::packages = ( 'main' => 1 );