perl -lne 'print for grep /filename/, `