9 |
|
|
10 |
use WebPAC::Common 0.02; |
use WebPAC::Common 0.02; |
11 |
use WebPAC::Lookup; |
use WebPAC::Lookup; |
12 |
use WebPAC::Input::ISIS; |
use WebPAC::Input::ISIS 0.02; |
13 |
use WebPAC::Store 0.03; |
use WebPAC::Store 0.03; |
14 |
use WebPAC::Normalize::XML; |
use WebPAC::Normalize::XML; |
15 |
use WebPAC::Output::TT; |
use WebPAC::Output::TT; |
93 |
); |
); |
94 |
|
|
95 |
my $maxmfn = $isis->open( |
my $maxmfn = $isis->open( |
96 |
filename => $input->{path}, |
path => $input->{path}, |
97 |
code_page => $input->{encoding}, # database encoding |
code_page => $input->{encoding}, # database encoding |
98 |
); |
); |
99 |
|
|