perl -n -e 'print if //..//' files