Leser: 3
7 Einträge, 1 Seite |
1
2
3
4
5
6
7
# Eine evtl vorhandene Headline finden, h1, h2, h3
foreach(1..3){
last if(length($summary{$loop_file_basename}{'summary_headline'}) > 1); # Wenn schon gefunden ende
$loop_content =~ m/$[^\<h$_\>]*\<h$_\>([^\<\/h$_\>]+)\<\/h$_\>/is;
$summary{$loop_file_basename}{'summary_headline'} = $1;
push @output_html, "Habe h".$_." gefunden:'".$summary{$loop_file_basename}{'summary_headline'}."'<br>\n";#TEST
}
1
2
3
# Den oberen Teil rausfiltern. Angegebene Zeichenzahl aber erst bei Leerzeichen, die maximalanzahl kann also um die länge eines Wortes überschritten werden..
$loop_content =~ m/$(\Q$summary{$loop_file_basename}{'summary_headline'}\E)?(.{5,$summary_config{'summary_text_length'}})(\S+)\s/i;
$summary{$loop_file_basename}{'short_text'} = $1.$2;
7 Einträge, 1 Seite |