define the include path for Perl, as files under /var/lib/wims are used.
Index: wims-4.13b~dfsg1/wims/public_html/bases/sys/mkdomain.pl
===================================================================
--- wims-4.13b~dfsg1.orig/wims/public_html/bases/sys/mkdomain.pl
+++ wims-4.13b~dfsg1/wims/public_html/bases/sys/mkdomain.pl
@@ -15,6 +15,7 @@
 # domaindic.xx.tmp   : dictionnary for modind
 use warnings;
 use strict;
+use lib '/var/lib/wims/public_html/bases/sys';
 use search ('hashdomain', 'listdomain', 'out', 'sortuniq', 'treate_dict', 'treate_language','treate_accent');
 
 my $dir='domain';
Index: wims-4.13b~dfsg1/wims/public_html/bases/sys/mkwgrp.pl
===================================================================
--- wims-4.13b~dfsg1.orig/wims/public_html/bases/sys/mkwgrp.pl
+++ wims-4.13b~dfsg1/wims/public_html/bases/sys/mkwgrp.pl
@@ -3,6 +3,7 @@
 use warnings;
 use strict;
 use Encode qw(encode decode);
+use lib '/var/lib/wims/public_html/bases/sys';
 use search ('out', 'sortuniq', 'treate_accent', 'treate_language', 'treate_dict');
 
 #use Text::Balanced qw (extract_bracketed extract_tagged);
Index: wims-4.13b~dfsg1/wims/public_html/bases/sys/modindclass.pl
===================================================================
--- wims-4.13b~dfsg1.orig/wims/public_html/bases/sys/modindclass.pl
+++ wims-4.13b~dfsg1/wims/public_html/bases/sys/modindclass.pl
@@ -3,6 +3,7 @@
 
 use warnings;
 use strict;
+use lib '/var/lib/wims/public_html/bases/sys';
 use search ('out', 'sortuniq', 'hashdomain', 'treate_accent', 'treate_dict');
 
 my $dir='../../../log/classes/';
Index: wims-4.13b~dfsg1/wims/public_html/bases/sys/taxonomy/taxo.pl
===================================================================
--- wims-4.13b~dfsg1.orig/wims/public_html/bases/sys/taxonomy/taxo.pl
+++ wims-4.13b~dfsg1/wims/public_html/bases/sys/taxonomy/taxo.pl
@@ -1,6 +1,7 @@
 #!/usr/bin/perl
 use strict "vars";
 use strict "subs";
+use lib '/var/lib/wims/public_html/bases/sys';
 use search ('hashdomain', 'treate_dict', 'sortuniq', 'out', 'canonify', 'reverse_dic', 'treate_language');
 
 use locale;