my $s = 'äöü';
print $s;