GeneName GeneType Regulation APOL4 protein_coding up CYP2C8 protein_coding down NAALADL2 protein_coding NA NANOS3 protein_coding up C20orf204 protein_coding up MIR429 miRNA up MIR200A miRNA down MIR200B miRNA down CFL1P4 processed_pseudogene down AC091607.1 processed_pseudogene up RPL19P20 processed_pseudogene up SREK1IP1P1 processed_pseudogene down CCT5P2 processed_pseudogene up CHTF8P1 processed_pseudogene NA FAR1P1 processed_pseudogene NA AC067940.1 processed_pseudogene up AL662791.1 lncRNA up #### open FILE1, "data.txt" or die; my %hash; while (my $line=<FILE1>) { chomp $line; (my $word1,my $word2) = split( /\s+/, $line); $hash{$word1} = $word2; } @values = values(%hash); print @values;