Michael Robeson wrote:
I decided to use the if statement you posted:
only because I had to add a $count++ function within the else
statement (shown below) to accomplish another task within my larger
script:
if ( $aa eq '-' ) {
$hash3{$_} .= '---';
} else {
Michael S. Robeson II wrote:
Ok, well I think I can see the forest but I have little idea as to
what is actually going on here. I spent a few hours looking things
up and I have a general sense of what is actually occurring but I
am getting lost in the details that were posted in the last digest.
We
Bob Showalter wrote:
while () {
my ($key, $mask, $src) = split;
my @mask = $mask =~ /./g;
my @src = $src =~ /.../g;
print "$key: ";
print $_ eq '-' ? '---' : shift @src for @mask;
print "\n";
}
__DATA__
cat mfgdhf agtcatgcacactgatcg
Michael Robeson wrote:
**Sorry, if this is a repeat. Wasn't sure if the mail went through.
If you already replied can you re-send it to my e-mail address
above as well? Thanks!***
Aren't you subscribed to the list? And if there is a problem with your
receiving of email, how about checking the list
Michael Robeson wrote:
Don't post MIME or HTML to the list. Plain text only.
>
> I have two sets of data that have been stored in hashes. The first
> hash
> has amino-acid (protein) sequence data. The second hash has the
> corresponding DNA sequence of those amino-acids:
>
>
> Hash 1
> key: v
Michael S. Robeson II wrote:
I have two sets of data that have been stored in hashes. The first
hash has amino-acid (protein) sequence data. The second hash has
the corresponding DNA sequence of those amino-acids:
Hash 1
key:value:
cat = mfgdhf
doq = mfg--f
mouse = mf-d-f
Hash
