#!/usr/bin/perl

use strict;
use warnings;
use Getopt::Long;
use Time::ParseDate qw(parsedate);
use Time::Local;
use POSIX qw(strftime);

use ConfigurationModule qw/set_directory get_date PARSE_CSV INTTOHEX/;
use TrunkCategoryModule qw/read_trunk_category/;
use CheckFilterModule qw/check_filter/;
use CheckProductTypeModule qw/assign_bgid assign_mbi_final/;
use CheckCallCategoryModule qw/assign_call_category/;
use NormalizeFieldModule qw/normalize_bnumber date_format check_error_code/;
use NormalizePointTargetModule qw/normalize_point_target/;
use NormalizeInbillModule qw/get_total_record get_startdate get_lastdate/;
use TiuMappingModule qw/tiu_mapping/;
...
...
...