unlink downloadad mibs file
This commit is contained in:
@@ -110,6 +110,7 @@ sub deploy_mibs {
|
|||||||
if ($resp->{success}) {
|
if ($resp->{success}) {
|
||||||
my $ae = Archive::Extract->new(archive => $file, type => 'tgz');
|
my $ae = Archive::Extract->new(archive => $file, type => 'tgz');
|
||||||
$ae->extract(to => $ENV{HOME});
|
$ae->extract(to => $ENV{HOME});
|
||||||
|
unlink $file;
|
||||||
}
|
}
|
||||||
|
|
||||||
say 'MIBs update complete.';
|
say 'MIBs update complete.';
|
||||||
|
|||||||
Reference in New Issue
Block a user