Open DiskSpace.pl with your favorite text editor.
Set $StartDir to the top-level directory you want DiskSpace to search in and below.
Example: $StartDir = 'f:/InetPub/wwwroot';
Set $ShowDirList to '1' (one) if you would like DiskSpace to also print a list of every subdirectory found. Set this value to '0' (zero) if you wish to skip the list.
Example: $ShowDirList = 1;
Now save the modified DiskSpace.pl.
Upload DiskSpace.pl to your Windows NT/2000 platform web server as an ASCII text file. Make sure your web server is configured to execute Perl scripts from the directory you upload DiskSpace.pl to (e.g. as in a /cgi-bin directory).
Now, anytime you want to checkup on your disk space utilization, simply call DiskSpace.pl:
Example: http://www.yoursite.com/cgi-bin/DiskSpace.pl
Open DiskSpace.pl with your favorite text editor.
Edit the first line in DiskSpace.pl (the line beginning "#!/usr/bin/perl") to reflect the actual location of your web server's Perl 5 executable.
Set $StartDir to the top-level directory you want DiskSpace to search in and below.
Example: $StartDir = 'f:/InetPub/wwwroot';
Set $ShowDirList to '1' (one) if you would like DiskSpace to also print a list of every subdirectory found. Set this value to '0' (zero) if you wish to skip the list.
Example: $ShowDirList = 1;
Now save the modified DiskSpace.pl.
Upload DiskSpace.pl to your Unix platform web server as an ASCII text file. Set file permissions to 755 via chmod (i.e. 'chmod 755 DiskSpace.pl') Make sure your web server is configured to execute Perl scripts from the directory you upload DiskSpace.pl to (e.g. as in a /cgi-bin directory).
Now, anytime you want to checkup on your disk space utilization, simply call DiskSpace.pl:
Example: http://www.yoursite.com/cgi-bin/DiskSpace.pl
Note: If your web server requires CGI scripts end with a *.cgi extension, simply rename this script to DiskSpace.cgi (and change the above example to reflect the .cgi extension)