#        1         2         3
#2345678901234567890123456789012
grep{@ARGV=$_;grep/$_[0]/,<>}<*>