It might be that tr (see Quote and Quote like Operators) will perform your reverse complement.

knoppix@Microknoppix:~$ perl -E '
> $seq = q{ACTGTGGCGTCAACTG};
> say $seq;
> ( $revSeq = $seq ) =~ tr{ATCG}{TAGC};
> say $revSeq;'
ACTGTGGCGTCAACTG
TGACACCGCAGTTGAC
knoppix@Microknoppix:~$
[download]

I hope this is helpful.