my @beatles = ('John', 'Paul', 'George', 'Ringo');
  @beatles =~ tr/A-Z/a-z/;  # <--- doesn't work !!!