Help for this page
# Command-line (my $x = shift) or die $syntax; (my $y = shift) or die $syntax;
die $syntax if ! defined (my $x = shift);