| Server IP : 217.160.0.214 / Your IP : 216.73.216.182 Web Server : Apache System : Linux info 3.0 #1337 SMP Tue Jan 01 00:00:00 CEST 2000 all GNU/Linux User : ws67690508 ( 67690508) PHP Version : 8.1.34 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /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 ($backupdir, $filename) = $susshi->get_backuppath;
-f $filename or error_die("File does not exist: $filename", 2);
unlink $filename or error_die "Cannot unlink $filename: $!\n";
info "Removed $filename";
exit 0;