--$/;$a+=($/=-$/)*y///c,print"$_
"x$/||$"x$a.reverse$"x$a."
$_"for<>=~/\S+/g