Help for this page

Select Code to Download

Select or download this

  ...
  next unless $y;
  $Y{$y} += @ARGV ? (grep $y eq $_, @ARGV) : 1;