Select Code to Download

use strict;
use warnings;
...
sub upper {
  tr/a-z/A-Z/ for @_;
}

THIS IS STRING 1. STRING 2 THIS ONE IS.