perl regexp check

perl -e 'while (<>) { if (/192/) { print; }}' /etc/hosts