Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister

Re^4: Why does this sub grab the whole hash

by naturalsciences (Beadle)
on Nov 11, 2011 at 18:23 UTC ( #937647=note: print w/replies, xml ) Need Help??

in reply to Re^3: Why does this sub grab the whole hash
in thread Why does this sub grab the whole hash

Changing the subs code to..

sub revcompl { my (@dna) = @_; my @dr=(); foreach my $segment (@dna) { my $revcomp = reverse($segment); $revcomp =~ tr/ACGTacgtMKRYBDHVmkrybdhv/TGCAtgcaKMYRVHDBkmyrvhdb/; push @dr, $revcomp; } $done = join('',@dr); return $done; }

Worked out well. Thank you very much. The behaviour noticed before still weirds me out, guess it's time to study some more. Any more enlightening comments on what happened there are welcome by everybody :D

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://937647]
[haukex]: Discipulus: which one do you mean?
[choroba]: Hermit
[haukex]: Ah I see... looks like "under construction" or something :-)

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (10)
As of 2018-06-22 08:15 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (122 votes). Check out past polls.