Subversion Repositories wimsdev

Rev

Rev 11480 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 11480 Rev 16933
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 ".";
6
use search ('out', 'sortuniq', 'hashdomain', 'treate_accent', 'treate_dict');
7
use search ('out', 'sortuniq', 'hashdomain', 'treate_accent', 'treate_dict');
7
 
8
 
8
my $dir='../../../log/classes/';
9
my $dir='../../../log/classes/';
9
my $dirdomain='domain';
10
my $dirdomain='domain';
10
## list of all domains in domain/domain
11
## list of all domains in domain/domain