Bugs

cgi-bin/kwicresort.pl: gawk is NOT given a path. On some installations, like OS-X it can live in locations that are not normal paths for perl to push a system command.

$thecommand = "sort -T $PHILOTMP -t\"\|\" $sf";
$thecommand .= "< $datafile | gawk -F\"\|\" '{ print \$NF }'....
^^^^ offender
Give it a path. Should be set on installation.

artfl_kwic.pl and artfl_sortedkwic.pl: these do not detect the absence of Unicode::String. Offending code block:

$PERL_HAS_UNICODE_STRING = eval { require Unicode::String; 1; };
if (!$PERL_HAS_UNICODE_STRING) {
print "<p>Perl module Unicode::String has not been installed.
This may result in odd line by line formatting. Please
contact $ERRORCONTACT.</p>";
}
else {
use Unicode::String qw(utf8);
}
I think the solution is indirect evaluation:
$PERL_HAS_UNICODE_STRING = eval { require Unicode::String; 1; };
if (!$PERL_HAS_UNICODE_STRING) {
print "<p>Perl module Unicode::String has not been installed.
This may result in odd line by line formatting. Please
contact $ERRORCONTACT.</p>";
}
else {
$theunicodecommand = "use Unicode::String qw(utf8);";
eval $theunicodecommand;
}
I have tested this on machines with and without Unicode::String and I believe it works. Comments please. MVO, Oct 28, 2005

October 2005: search3 (core): getting some SEG FAULT errors in 10 word or greater phrease searches which have many function words. Possibly a space leak or bumping into a memory limit.