| baseportal | |||
| English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
| 
 | 
| Ausgewählter Eintrag: | Zur Liste | 
substr($htm_mitte,index($htm_mitte,$ersetzung),length($ersetzung),$modul_htm);
| Alle Einträge zum Thema: | Zur Liste | 
__mod_zeigsperrmuell?zeig=falsch__
$ersetzung = " __mod_zeigsperrmuell?zeig=falsch__"; # dies wird aber dynamisch gebaut, es können alle alphanumerischen Zeichen sowie "-", "?", ".", "_", "$", "&", "@", und "*" da drin sein, vielleicht hab ich ja auch noch welche vergessen... my $ersetzung = "__".$include."__"; my $modul_htm = $$include; $htm_mitte = $s_hcontent if $htm_mitte eq ""; $htm_mitte =~ s/$ersetzung/$modul_htm/gi;
$htm_mitte = substr($htm_mitte,index($htm_mitte,$ersetzung),length($ersetzung),$modul_htm);
substr($htm_mitte,index($htm_mitte,$ersetzung),length($ersetzung),$modul_htm);
 sub clean_regex {
 my $t = shift;
 $t =~ s/\./\\./g;
 $t =~ s/\+/\\+/g;
 $t =~ s/\*/\\*/g;
 $t =~ s/\?/\\?/g;
 $t =~ s/\^/\\^/g;
 #$t =~ s/\$/\\$/g;
 $t =~ s/\|/\\|/g;
 #$t =~ s/\\/\\\/g;
 $t =~ s/\{/\\{/g;
 $t =~ s/\}/\\}/g;
 $t =~ s/\[/\\[/g;
 $t =~ s/\]/\\]/g;
 $t =~ s/\(/\\(/g;
 $t =~ s/\)/\\)/g;
 return $t;
}
...
 $ersetzung = &clean_regex($ersetzung);
 $htm_mitte =~ s/$ersetzung/$modul_htm/gie;
$ersetzung = s/(\W)/\\$1/g; $htm_mitte =~ s/$ersetzung/$modul_htm/gie;
$ersetzung = quotemeta($ersetzung); $htm_mitte =~ s/$ersetzung/$modul_htm/gie;
$ersetzung = quotemeta($ersetzung); $htm_mitte =~ s/$ersetzung/$modul_htm/gi;
| Liste der Einträge von 14100 bis 14250: | Einklappen | Zur Eingabe | 
| Neueste Einträge << 10 | 9 | 8 | 7 | 6 | 5 | 4 | 3 | 2 | Neuere Einträge < | Zur Eingabe | > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge | 
| © baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen |