http://www.perlmonks.org?node_id=1196607


in reply to Perl Idioms Explained - $|++

Thanks for sharing perl knowledge broquaint and helping community. Could you please explain "select undef, undef, undef, 0.25" in details.

Replies are listed 'Best First'.
Re^2: Perl Idioms Explained - $|++
by choroba (Cardinal) on Aug 03, 2017 at 08:28 UTC
    See select, the select RBITS,WBITS,EBITS,TIMEOUT section, which shows the very line as an example. It's cleaner to use 
    use Time::Hires qw{ sleep };
sleep 0.25;

    [download]
    ($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,

    [download]
[reply]
[d/l]
[select]

In Section Meditations