($line =~ /^>(\S+)\s*(.*)\s*(.*)\s*(.*)/ );
my $daisy_cow = $3;
my $shawn_the_sheep = $4;