291 |
# return unless defined($l); |
# return unless defined($l); |
292 |
# return $l unless ($rec_regex && $f_nr); |
# return $l unless ($rec_regex && $f_nr); |
293 |
|
|
294 |
warn "## --> $f_nr ## $l\n"; |
$log->debug("-=> $f_nr ## $l"); |
295 |
|
|
296 |
# codepage conversion and recode_regex |
# codepage conversion and recode_regex |
297 |
# from_to($l, $code_page, $self->{'encoding'}); |
# from_to($l, $code_page, $self->{'encoding'}); |
298 |
from_to($l, $code_page, 'utf-8'); |
from_to($l, $code_page, 'utf-8'); |
309 |
} |
} |
310 |
} |
} |
311 |
|
|
312 |
warn "## <-- $f_nr ## $l\n"; |
$log->debug("<=- $f_nr ## $l"); |
313 |
return $l; |
return $l; |
314 |
}); |
}); |
315 |
|
|