You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

14 lines
408 B

8 years ago
#!/usr/local/bin/perl
use strict;
use Env qw(UPDRAFTPLUSKEY);
if ($UPDRAFTPLUSKEY ne 'updraftplus') { die('Error'); }
BEGIN { unshift @INC, '/usr/local/cpanel'; }
use Cpanel::Quota ();
# Used, limit, remain, files used, files limit, files remain
my @homesize = ( Cpanel::Quota::displayquota( { 'bytes' => 1, 'include_sqldbs' => 1, 'include_mailman' => 1, }));
print 'RESULT: '.join(" ", @homesize)."\n";