my $test = "test eins";
eval {
	substr($test,12 ,2 , "xx");
};
print "Hallo";