2009-12-03T12:57:21 betterworld

Sieht zwar nicht mehr so schoen aus, aber ich wuerd das ja so schreiben:

Code (perl): (dl )

$var2 =~ /^\Q${var1}\EX*\z/;

\Q vermeidet Behandlung von Sonderzeichen in der Variable, \z matcht wirklich nur am String-Ende (ungeachtet von Newlines)