$variabel='-datei.dat';
$x =~ m/^([0-9]+)$variabel/i;