I type 'perl diskfree.pl /' and nothing gets returned to the command line.
Anyone else get that to work? TIA.
--The GrandMaster
diskfree script doesn't seem to work.
Moderators: Developers, Moderators
-
- Posts: 17
- Joined: Tue Jul 23, 2002 5:53 pm
- Contact:
-
- Posts: 17
- Joined: Tue Jul 23, 2002 5:53 pm
- Contact:
More info, just FYI.
I'm using LVM on some of my volumes....but I would expect that that wouldn't cause the problem. / and /usr are not LVM, and they don't return anything either.
--The GrandMaster
--The GrandMaster
The problem you are having is due to the fact that 'diskfree.pl' expects a device file as input:
Should output something like:
-Ian
Code: Select all
perl diskfree.pl /dev/hda1
Code: Select all
4049868:30%
-
- Posts: 17
- Joined: Tue Jul 23, 2002 5:53 pm
- Contact:
Hrmmm...I tried that too...just after posting and looking at the code again..but nothing.
That's it, nothing else. really odd.
Here is the code of diskfree.pl that I've got on my system from 0.6.8:
TIA.
--The GrandMaster
Code: Select all
My HDA5:
/dev/hda5 2091648 258968 1832680 13% /
Execute script:
$perl diskfree.pl /dev/hda5
$
Here is the code of diskfree.pl that I've got on my system from 0.6.8:
Code: Select all
#!/usr/bin/perl
$ret = `df --block-size=1024 $ARGV[0] | grep -v Filesystem`;
$ret =~ s/($ARGV[0])(.* )(.*[0-9])(.* )(.*[0-9])(.* )(.*[0-9])(.* )(.*[0-9]%)(.*
)//;
print "$7:$9";
TIA.
--The GrandMaster
Who is online
Users browsing this forum: No registered users and 2 guests