exercism-perl5

Repository for my Perl 5 Exercism exercises
git clone git://git.samirparikh.com/exercism-perl5
Log | Files | Refs | README

RNA.pm (183B) - raw

      1 package RNA;
      2 use strict;
      3 use warnings;
      4 use Exporter qw<import>;
      5 our @EXPORT_OK = qw<to_rna>;
      6 
      7 sub to_rna {
      8   my ($dna) = @_;
      9   (my $rna = $dna) =~ tr/GCTA/CGAU/;
     10   return $rna;
     11 }
     12 
     13 1;