$/=\1;print$@=/
/|$@lt$_?$_:$@for<>