>perl -ne "/^root:\s*(?!admin\@somewhere\.here)\S/ and print;" \
     aliases.txt
root: someone@somewhere.else