#!perl -pl
s/\D[a-z]*/ $& @{[$'<1]}/g;s;;