print DATEIHANDLE $a =~ /REGULÄRERAUSDRUCK/g;