fixed usage message
This commit is contained in:
parent
4e4e6bf042
commit
b38c18c0ff
|
@ -1,6 +1,6 @@
|
||||||
#!@@@perl@@@ -w
|
#!@@@perl@@@ -w
|
||||||
#
|
#
|
||||||
# $Id: agestat.pl,v 1.8 2007-02-09 15:36:37 hjp Exp $
|
# $Id: agestat.pl,v 1.9 2012-10-22 09:20:05 hjp Exp $
|
||||||
#
|
#
|
||||||
|
|
||||||
use strict;
|
use strict;
|
||||||
|
@ -9,7 +9,7 @@ use File::Find;
|
||||||
use Getopt::Long;
|
use Getopt::Long;
|
||||||
|
|
||||||
sub usage {
|
sub usage {
|
||||||
print STDERR "Usage: $0 [-atime|-mtime] [-scale=(k|M)]\n";
|
print STDERR "Usage: $0 [-atime|-mtime] [-scale=(k|M)] [-buckets=(cal|log2)]\n";
|
||||||
exit 1;
|
exit 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -106,6 +106,9 @@ for (my $i = 0; $i <= $#hist; $i++) {
|
||||||
}
|
}
|
||||||
|
|
||||||
# $Log: agestat.pl,v $
|
# $Log: agestat.pl,v $
|
||||||
|
# Revision 1.9 2012-10-22 09:20:05 hjp
|
||||||
|
# fixed usage message
|
||||||
|
#
|
||||||
# Revision 1.8 2007-02-09 15:36:37 hjp
|
# Revision 1.8 2007-02-09 15:36:37 hjp
|
||||||
# Automatically create GNUmakerules and GNUmakevars if they don't exist.
|
# Automatically create GNUmakerules and GNUmakevars if they don't exist.
|
||||||
# Print usage if unknown option is given.
|
# Print usage if unknown option is given.
|
||||||
|
|
Loading…
Reference in New Issue