my @user_file_part1=();
my @user_file_part2=();
my @user_file_part3=();

my @test_file_part1=();
my @test_file_part2=();
my @test_file_part3=();

my @trim_file_part1=();
my @trim_file_part2=();
my @trim_file_part3=();

my @user_file=(\@user_file_part1,
               \@user_file_part2,
               \@user_file_part3);

my @test_file=(\@test_file_part1,
               \@test_file_part2,
               \@test_file_part3);

my @trim_file=(\@trim_file_part1,
               \@trim_file_part2,
               \@trim_file_part3);

my %main_file=(
                  USER <= \@user_file,
                  TEST <= \@test_file,
                  TRIM <= \@trim_file,
                  );