What does “select((select(s),$|=1)[0])” do in Perl?

Question

I\'ve seen some horrific code written in Perl, but I can\'t make head nor tail of this one:

select((select(s),$|=1)[0])

It\'s in some netwo

Answer 1

please check perldoc -f select. For the meaning of $|, please check perldoc perlvar