| Server IP : 74.208.236.79 / Your IP : 216.73.217.111 Web Server : Apache System : Linux infongp-us50 4.4.400-icpu-108 #2 SMP Wed Feb 11 10:12:42 UTC 2026 x86_64 User : u93192080 ( 6162215) PHP Version : 8.4.22 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /kunden/lib/susshi/exec/ |
Upload File : |
#!/usr/bin/perl
use warnings;
use strict;
use lib '/usr/lib/susshi/exec';
use Susshi;
use IPC::Run qw( run timeout );
my $susshi = Susshi->new ( -read_input => 1 );
my $directory = $susshi->get_directory( 'directory', -mandatory => 1, -must_exist => 1 );
my @cmd=( 'du', '-bs', $directory );
my $output;
eval {
my ($err,$out)=('','');
run \@cmd, '>', \$out, '2>', \$err, timeout (3600) or die $err;
my ($size, undef) = split /\s+/, $out;
$output->{size}=$size;
};
error_die($@) if $@;
info("@cmd: $output->{size}");
send_json_output($output) if $output;
exit 0;