$ perl -wle 'print while <STDERR>'
Filehandle STDERR opened only for output at -e line 1.
$