puts [regsub -all \n(as|c\\w+r)\\w+ [read stdin 137] ""]