What does the following mean?

[sdslrn123]

print FILE if ++$count{$_} < 2;

Does anyone know what is being printed to the filehandle FILE?

 

[ishnid]

The contents of the special $_ variable.

 

[sdslrn123]

Sorry, my fault, I am just trying to figure out what the whole line means?

 

[Kirsle]

It prints the value of $_ to FILE, if a hash with $_ as its key has a value that is greater than 2, after adding 1 to its current value.

 

[Kirsle]

er, less than 2 (was a bit dyslexic with the inequality sign there)

 

[brigmar]

In 'longhand' it would be:

$count{$_} = $count{$_} + 1;
if ( $count{$_} < 2 ) {
  print FILE $_;
}