#!/usr/bin/perl
-# $Header: dus,v 3.0 89/10/18 15:13:43 lwall Locked $
+# $RCSfile: dus,v $$Revision: 4.1 $$Date: 92/08/07 17:20:11 $
# This script does a du -s on any directories in the current directory that
# are not mount points for another filesystem.