#! perl -slw
use strict;

my $str = "abc123äöüß";

print $str;