perl -lne 'print for /([A-Za-z0-9._%+-]+)@[A-Za-z0-9.-]+\.[A-Za-z]{2,6}/g' file.txt

всем привет. подскажите пожалуйста что нужно добавить в команду чтобы поиск и запись проходила и в подпапках?