for(<{ch}{i,}{ts}{a}{k}{u,}{s}{i,}#>) { print "$_\n"; }