#!perl -p
s/[aeio]\K *| /$x.=$"/ge