Stobe02
Jungspund
Hallo ich habe eine Perl-Script geschrieben, diese funktioniert soweit auch ohne Probleme.
Es liest mir aus einem LDAP-Server die Quota aus und setzt diese mit setquota. Das funktoniert auch ohne Probleme und macht was es machen soll. Doch leider wenn das Script von Cron aufgerufen wird läuft es zwar auch durch aber leider ohne erfolg. Ich bekomme die Ausgaben auch als Mail in /var/mail/root rein. Das sagt mir ja das das Script durchgelaufen ist. Doch leider wird die Quota nicht gesetzt. Hier mal der essenzielle Teil aus meinem Script.
Kann mir evtl. jemand sagen warum die Quota nicht gesetzt wird.
Danke.
Es liest mir aus einem LDAP-Server die Quota aus und setzt diese mit setquota. Das funktoniert auch ohne Probleme und macht was es machen soll. Doch leider wenn das Script von Cron aufgerufen wird läuft es zwar auch durch aber leider ohne erfolg. Ich bekomme die Ausgaben auch als Mail in /var/mail/root rein. Das sagt mir ja das das Script durchgelaufen ist. Doch leider wird die Quota nicht gesetzt. Hier mal der essenzielle Teil aus meinem Script.
Code:
foreach ( @arrayOfDNs )
{
my $valref = $$href{$_};
my @arrayOfAttrs = sort keys %$valref; #use Attr hashes
my $attrName;
foreach $attrName (@arrayOfAttrs)
{
next if ( $attrName =~ /;binary$/ );
my $attrVal = @$valref{$attrName};
if($attrName eq "maxdirsize")
{
$help = "@$attrVal"*1024;
}
if($attrName eq "uid")
{
$user = "@$attrVal";
}
}
print "setquota -u $user $help $help $help $help -a \n";
`setquota -u $user $help $help $help $help -a`;
sleep(2);
$z++;
}
Kann mir evtl. jemand sagen warum die Quota nicht gesetzt wird.
Danke.