LinuxQuestions.org - [SOLVED] df script not working

Hi guys, I have a script that checks disk usage and emails if it is low but it keeps returning this error:

Use of uninitialized value in concatenation (.) or string at ./df.pl line 17.
tail: cannot open `+2' for reading: No such file or directory
Use of uninitialized value in addition (+) at ./df.pl line 20.
Use of uninitialized value in addition (+) at ./df.pl line 20.
Use of uninitialized value in division (/) at ./df.pl line 20.
Illegal division by zero at ./df.pl line 20.

Here's the script:

Code:

#!/usr/bin/perl

use strict;

use warnings;



# file system to monitor

my $target = shift;



# warning level

my $warning_level=10;



# email setup

my $to='myemail@email.com';

my $from='email@myemail.com.au';

my $subject='Low Disk Space Warning';



# get df

my ($fs_dev, $fs_type, $size, $used, $avail, $use, $mount) = split(" ", `df -PT $target | tail +2`);



# calculate

my $df_free = (($avail) / ($avail+$used)) * 100.0;



# compare

if ($df_free < $warning_level) {

my $out = sprintf("WARNING Low Disk Space on $target : %0.2f%% ()\n",$df_free);



# send email using UNIX/Linux sendmail

open(MAIL, "|/usr/sbin/sendmail -t");



## Mail Header

print MAIL "To: $to\n";

print MAIL "From: $from\n";

print MAIL "Subject: $subject\n";



## Mail Body

print MAIL $out;



close(MAIL);

}

Any ideas?