my $filecontent = "Inhalt der Datei <Release>12</Release>";
my ($nr) = $filecontent =~ m!<Release>(\d+)</Release>!;