#!/usr/bin/perl

$m = "Das hier ist ein Muster";

if ($m =~ /Das\shier.*/)
{
	print "Gefunden!\n";
}