Help for this page
my @user_file_part1=(); my @user_file_part2=(); ... TEST <= \@test_file, TRIM <= \@trim_file, );
push(@{$main_file{"USER"}[0]}, $string);