print//,map(!$'|!$_,@,),$/for 0,@,=2-<>..0