#!/usr/bin/perl -w

if (!@ARGV)
{
	print STDERR << "SYNTAX";
myprogram [option][filename]
            -x does something
            -y does something else
SYNTAX
	exit 1;
}