while (/(\w*!\w*)/g) { print "$1\n"; } [download]
In reply to Re^4: pick a word contaning reg-ex by space_monk in thread pick a word contaning reg-ex by keesturam