Extracting Email Addresses From File (via CLI)

[cc nowrap=”TRUE” lang=”perl”]perl -n -e ‘if (/\s*([\w._-][email protected][\w._-]+)\s*.*/) { print “$1\n”; } elsif (grep(/@/,$_)) { print “MISSED $_”; }’ .delmenow [/cc]