It works for me. Linux 2.4.23, perl 5.8.3. Are you running this in a pipe or with redirected STDIN?
After Compline,Zaxo
In reply to Re: clear STDIN by Zaxo in thread clear STDIN by Anonymous Monk