perl -ane 'BEGIN{$auto=1} $auto=0 if($F[0]==0); if($auto){print @F[0..2]} else{ }'