foreach (@ARGV) { $Y{$y}++,next if $y eq $_;  }