I've seen this type of usage in several older Perl scripts. I think that when I learned Perl in 1994, having been converted from awk and bourne scripts, this was how I first saw usage messages embedded in the scripts. I am sure it is a carryover from shell scripts, which did a grep of the script file. -David