http://www.perlmonks.org?node_id=1016444


in reply to Re^2: Seeking a better way to do it
in thread Seeking a better way to do it

But starX's script also gives "Enter" word in the output. I guess he/she need to extract words contains Upper case letter