Folgende Meldung:
Useless use of greediness modifier '?' in regex; marked by <-- HERE in m/(\b\S{60}? <-- HERE )(\S.*?\b)/ at modules/override/PDF/Table.pm line 334.
Das .*? ersetzt durch .+
do {
$myone = 0;
# This RegEx will split any word that is longer than {25} symbols
do {
$myone = 0;
# This RegEx will split any word that is longer than {25} symbols
- $row->[$j] =~ s#(\b\S{$max_word_len}?)(\S.*?\b)# $1 $2#;
+ $row->[$j] =~ s#(\b\S{$max_word_len}?)(\S.+\b)# $1 $2#;
$myone = 1 if ( defined $2 );
} while( $myone );
$row->[$j] =~ s/^\s+//;
$myone = 1 if ( defined $2 );
} while( $myone );
$row->[$j] =~ s/^\s+//;