Good Morning!
I have this problem, i hope you can help me:
use strict;
use warnings;
use Data::Dumper;
open (FILE, "/Users/Pabli/Desktop/gene_association.goa_human");
open (FILE2, "/Users/Pabli/Desktop/go3.obo");
while(<FILE>) {
my @array_with_all_fields=split(/\t/);
if ($array_with_all_fields[2] eq "TP53"){
my $mio=$array_with_all_fields[4];
my %go_accession_hash=($mio,'');
my @test2= keys %go_accession_hash;
}
}
while(<FILE2>){
print "".$test2[0]."\n";
}
close FILE;
close FILE2;
When the compiler enter into the second while the variable "test2" is not seen!
I try to "play"with the declaration global/local...but the result is the same!
Can someone help me?
Thanks
Paola