if( -p STDIN ){ @stuff = <STDIN>; close STDIN; }
while(<>){ ...