Subversion Repositories wimsdev

Rev

Rev 16933 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 16933 Rev 18106
Line 1... Line 1...
1 
#!/usr/bin/perl
 1 
#!/usr/bin/perl
2 
##example classes
 2 
##example classes
3 
 
 3 
 
4 
use warnings;
 4 
use warnings;
5 
use strict;
 5 
use strict;
- 
 
 6 
use lib '/var/lib/wims/public_html/bases/sys';
6 
use lib ".";
 7 
use lib ".";
7 
use search ('out', 'sortuniq', 'hashdomain', 'treate_accent', 'treate_dict');
 8 
use search ('out', 'sortuniq', 'hashdomain', 'treate_accent', 'treate_dict');
8 
 
 9 
 
9 
my $dir='../../../log/classes/';
 10 
my $dir='../../../log/classes/';
10 
my $dirdomain='domain';
 11 
my $dirdomain='domain';