my @file_name;
while (<FH>) {
    push (@file_name, $_);
}