Exercise 1. Changing DNA to RNA (Code Download: exec1.pl)

$DNA='ATGCATGC';
print "$DNA\n";

#variable name change
$RNA=$DNA;

#replacement of T to U
$RNA=~ s/T/U/g;
print "$RNA\n";