<>=~/((.)(.*)(.))?(?{$\+=$-="$`$4$3$2$'"-$\ })^/;print