Help for this page
#!/usr/bin/perl ... ... 'z=s' => \my $opt_z, );
for my $i (<loop through all the options>) { die if ( ! $i ); }