my($dir, $year, $start, $delay);

GetOptions (
	'dir=s'   => \$dir,
	'year=i'  => \$year,
	'start:i' => \$start,
	'delay:i' => \$delay
	);


##</code><code>##

scriptname --dir foo --delay 30 --year 2007 
Option year requires an argument