while () { @name = split /\s/; print pop(@name), ', ', join(' ', @name), "\n"; } __DATA__ John Hand Brown Cindy Jones Thomas More