Select Code to Download

#!/usr/bin/perl

...
  $string = join '',@string_array;
  return $string;
}

./test.pl für_elise
###Before replacement### f
...
###After replacement ### e
Old name: 'für_elise'
New name: 'für_elise'