if ($input =~ /[äöüß]/i)
{
mach was....
}