c:\@Work\Perl\monks\undergradguy>perl rev_comp_2.pl dna.dat dna -> reverse complement 'ACTG' -> 'CAGT' dna -> reverse complement 'catgataaatttccc' -> 'gggaaatttatcatg' dna -> reverse complement 'tgac' -> 'gtca'