open my $fh, "<", "Google_1.txt";
my @file_array = <$fh>;
chomp @file_array;