my $string = 'D:\meinPfad\datei.c 881: meine Nachricht mit Datei2.h 991: blabla';
my ($match) = $string =~ /^(.*?\d+:)/;
print $match;