my $anrufernummer = '';
if ( m/(\d+)/ ) { $anrufernummer = $1 }