And to get international characters working in searches AND to get searches within directories working, I did in addition:
1. Find:
$pod_dir =~ s/%([\dA-Fa-f]{2})/pack("C", hex($pod_1))/eisg;
Comment it out, and add
$pod_dir = pod_unescape($pod_dir);
(Was stripping out high order characters rather than replacing them. Also doing the same with forward slashes, needed for searches within directories)
2.
Find:
$pod_line = &pod_unescape($pod_line);
After it, add:
### might be double byte
# uppercase
$pod_line =~ s/À//g;
$pod_line =~ s/Á//g;
$pod_line =~ s/Â//g;
$pod_line =~ s/Ã//g;
$pod_line =~ s/Ä//g;
$pod_line =~ s/Å//g;
$pod_line =~ s/Æ//g;
$pod_line =~ s/Ç//g;
$pod_line =~ s/È//g;
$pod_line =~ s/É//g;
$pod_line =~ s/Ê//g;
$pod_line =~ s/Ë//g;
$pod_line =~ s/Ì//g;
$pod_line =~ s/Í//g;
$pod_line =~ s/Î//g;
$pod_line =~ s/Ï//g;
$pod_line =~ s/Ð//g;
$pod_line =~ s/'//g;
$pod_line =~ s/'//g;
$pod_line =~ s/"//g;
$pod_line =~ s/"//g;
$pod_line =~ s/Õ//g;
$pod_line =~ s/-//g;
$pod_line =~ s/-//g;
$pod_line =~ s/Ø//g;
$pod_line =~ s/Ù//g;
$pod_line =~ s/Ú//g;
$pod_line =~ s/Û//g;
$pod_line =~ s/Ü//g;
$pod_line =~ s/Ý//g;
$pod_line =~ s/Þ//g;
$pod_line =~ s/ß//g;
# lowercase
$pod_line =~ s/ //g;
$pod_line =~ s/á//g;
$pod_line =~ s/â//g;
$pod_line =~ s/ã//g;
$pod_line =~ s/ä//g;
$pod_line =~ s/å//g;
$pod_line =~ s/æ//g;
$pod_line =~ s/ç//g;
$pod_line =~ s/è//g;
$pod_line =~ s/é//g;
$pod_line =~ s/ê//g;
$pod_line =~ s/ë//g;
$pod_line =~ s/ì//g;
$pod_line =~ s/*//g; # hidden character in this line
$pod_line =~ s/î//g;
$pod_line =~ s/ï//g;
$pod_line =~ s/ð//g;
$pod_line =~ s/ñ//g;
$pod_line =~ s/ò//g;
$pod_line =~ s/ó//g;
$pod_line =~ s/ô//g;
$pod_line =~ s/õ//g;
$pod_line =~ s/ö//g;
$pod_line =~ s/÷//g;
$pod_line =~ s/ø//g;
$pod_line =~ s/ù//g;
$pod_line =~ s/ú//g;
$pod_line =~ s/û//g;
$pod_line =~ s/ü//g;
$pod_line =~ s/ý//g;
$pod_line =~ s/þ//g;
$pod_line =~ s/ÿ//g;
# some oddities:
$pod_line =~ s/ //g;
$pod_line =~ s/'//g;
$pod_line =~ s/š//g;
$pod_line =~ s/"//g;
$pod_line =~ s/Ÿ//g;
###
This works on both MSIE, NS4 and NS6 on my PC, running Windows 98 (English)
The alterations in my previous post are also required.
I'm well aware it could be improved, but that is beyond my skills!
|