Help for this page
script.pl -x opt1 -x opt2 -x opt3
my @x; my @y; ... #two options required 'y=s' => sub { shift(); push(@y, shift, shift(@ARGV)); }, 'z=s' => \$z) or die ("Invalid arguments");