$some_text = <>;
chomp($some_text);
$some_text =~ s/DNA/RNA/g;
print "$some_text\n";
