# 5 0 5 0 3 print grep/$ARGV[0]/,<>;