$/=$";$.-$_&&print for<>