1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
package Qooxdoo::Services::Smokeping;
use strict;
sub GetAccessibility {
return "public";
}
sub method_get_tree
{
my $error = shift;
# $error->set_error(101,$err);
# return $error;
# b = branche
# i = in
# l = leave
# o = out
return [ ['fk1','Folder 1',
'fk1/f1','File 1',
'fk1/f2','File 2',
[ 'fk1/sf1','Sub Folder 2',
'fk1/sf1/f3','File 3',
'fk1/sf1/f4','File 4',
],
],
[ 'fk2','Folder 2'],
[ 'fk3','Folder 3',
'fk3/f3','File 33',
'fk3/f4','File 44'
]
]
}
1;
|