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