foreach (@lines) {
  $_ = uc; # ALL CAPS WOOOOOO
  s/$/!!!/; # EVERY LINE IS AN EXCLAMATION!!!
  print;
}