summaryrefslogtreecommitdiff
path: root/rhimport.pl
diff options
context:
space:
mode:
Diffstat (limited to 'rhimport.pl')
-rwxr-xr-xrhimport.pl4
1 files changed, 3 insertions, 1 deletions
diff --git a/rhimport.pl b/rhimport.pl
index dab8d63..08063e0 100755
--- a/rhimport.pl
+++ b/rhimport.pl
@@ -66,6 +66,9 @@ $user or die "Username not found in environment";
# my $sth = $dbh->prepare($sql);
# $sth->execute();
my @allowed_dbs;
+push @allowed_dbs, { 'GROUP' => "groupa", 'PATH' => "/programm/dropboxA/" };
+push @allowed_dbs, { 'GROUP' => "groupb", 'PATH' => "/programm/dropboxB/" };
+push @allowed_dbs, { 'GROUP' => "groupc", 'PATH' => "/programm/dropboxC/" };
# while(my ($group, $path) = $sth->fetchrow_array()) {
# $path =~ s/\/\*$//;
# my $perm = {};
@@ -75,7 +78,6 @@ my @allowed_dbs;
# }
# $sth->finish();
-
if($LISTALLOWED) {
for my $href ( @allowed_dbs ) {
print "$href->{'PATH'}\n";