/./g.0^++$_{$&,@+}||print$&for(<>)x133