#!perl -p
s!.!$`?$/.$&.$"x$i++.$&:$_!ge