my $s = '\s'; my $test = 'Hallo\s'; say $test =~ /$s/ ? 'JA' : 'NEIN';