06-28-2008
Quote:
Originally Posted by
susja
hello,
I have to check the free space on the disk that would work both on Windows and Unix platform e.g on C: \ for Windows and / on Unix. I could use Unix command 'df ' ( my windows system has Unix emulator cygwin and could run 'df ' as well).
But I'd like not to rely on system command but rather on Perl.
Any suggestion how it could be implemented in Perl?
Thanks.
Use File::Find to recurse the disk and add up the file sizes, or detect the operating system and call df or dir as appropriate. The problem with File::Find is that it will not know the capacity of the disk, you will have to provide that data to know the difference between the total file sizes (used space) and the total disk capacity to calculate the estimated free space.
10 More Discussions You Might Find Interesting
1. Programming
I everybody!!
How can i use statvfs() to calculate disk usage and free disk space??
Im using this code:
/* Any file on the filesystem in question */
char *filename = "/home/nesto/test/test.cpp";
struct statvfs buf;
if (!statvfs(filename, &buf)) {
... (1 Reply)
Discussion started by: ninjanesto
1 Replies
2. Shell Programming and Scripting
I have a disk space check script that uses an exceptions file, the only issue with the script is that it does not work with values higher than the FSMAX=85 value. I have a file system that is at 92% and it doesn't change, so I would like to add it to the exceptions file. The exceptions file format... (0 Replies)
Discussion started by: maddhadder71
0 Replies
3. Shell Programming and Scripting
Hi all, I am needing a bash shell script to generate a list of the top 5 users using the most disk space. I am thinking that the du command would be used somehow but I am at a loss. Can anyone help? Thanks! (3 Replies)
Discussion started by: sytemx
3 Replies
4. AIX
Hello,
I would like to free some space to install gcc with is about 50M large, and I have no free space on my system. What can I delete?
Filesystem 1024-blocks Used Free %Used Iused Ifree %Iused Mounted on
/dev/hd4 262144 145436 116708 56% 7981 ... (10 Replies)
Discussion started by: aixn00b
10 Replies
5. UNIX for Dummies Questions & Answers
I'm just learning shell scripting and am new to Unix/Linux. For the past week I've been logging how much free mem is on my server by using the
'$ top' command, and the free disk space in a few directories by doing
'$ df -h'.
It sucks doing that every hour. Can you help me write a script... (2 Replies)
Discussion started by: enator45
2 Replies
6. Solaris
I'm getting ready to start a LU from Sol 9 to Solaris 10. I want to ensure that I have enough disk space for future upgrades. What I don't know is what free space Solaris requires.
If I have 10GB of free space in /opt, will Solaris 10 use that for a LU?
Or, do I need to allocate 10GB of space... (5 Replies)
Discussion started by: zeekstern
5 Replies
7. Shell Programming and Scripting
Hi,
I would like to create the new file system(mount point) in our unix server.
before that i would like to know the total free space available in /home directory.
Can you please let me know, how to find free space available for new filesystem?
Be careful with your spelling and... (2 Replies)
Discussion started by: koti_rama
2 Replies
8. Solaris
Version: Solaris 10 (August 2011) on VM
I am kind of new to Solaris.From VM workstation i allocated 35 GB to this Solaris VM's Disk
The disk was named
c1t0d0
Few basic slices for root(8gb), swap(517mb) and /export/home(494mb) were created by the solaris Installer during the... (18 Replies)
Discussion started by: polavan
18 Replies
9. Shell Programming and Scripting
i want to write a shell script,when disk uses is 90% then automatically send a email to distribution list (group member)...... (1 Reply)
Discussion started by: sonu pandey
1 Replies
10. Solaris
Hi,
I need about 500G space in one corporate solaris server.
However, I am not sure which command to use to check this.
There are few volume groups in the server, and I deleted unused, old volume groups to clear some space.
However, now I am not sure how to check the free space itself.
... (2 Replies)
Discussion started by: anaigini45
2 Replies
LEARN ABOUT OSX
perl::ostype
Perl::OSType(3pm) Perl Programmers Reference Guide Perl::OSType(3pm)
NAME
Perl::OSType - Map Perl operating system names to generic types
VERSION
version 1.002
SYNOPSIS
use Perl::OSType ':all';
$current_type = os_type();
$other_type = os_type('dragonfly'); # gives 'Unix'
DESCRIPTION
Modules that provide OS-specific behaviors often need to know if the current operating system matches a more generic type of operating
systems. For example, 'linux' is a type of 'Unix' operating system and so is 'freebsd'.
This module provides a mapping between an operating system name as given by $^O and a more generic type. The initial version is based on
the OS type mappings provided in Module::Build and ExtUtils::CBuilder. (Thus, Microsoft operating systems are given the type 'Windows'
rather than 'Win32'.)
USAGE
No functions are exported by default. The export tag ":all" will export all functions listed below.
os_type()
$os_type = os_type();
$os_type = os_type('MSWin32');
Returns a single, generic OS type for a given operating system name. With no arguments, returns the OS type for the current value of $^O.
If the operating system is not recognized, the function will return the empty string.
is_os_type()
$is_windows = is_os_type('Windows');
$is_unix = is_os_type('Unix', 'dragonfly');
Given an OS type and OS name, returns true or false if the OS name is of the given type. As with "os_type", it will use the current
operating system as a default if no OS name is provided.
SEE ALSO
o Devel::CheckOS
AUTHOR
David Golden <dagolden@cpan.org>
COPYRIGHT AND LICENSE
This software is copyright (c) 2010 by David Golden.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
perl v5.16.2 2012-10-11 Perl::OSType(3pm)