Help for this page
print FILE ">$giName $gssName $definition\n$sequence";
( my $giName, my $gssName, my $definition, my $sequence )
my ($giName,$gssName,$definition, $sequence )