Select Code to Download

for (qw[ ab abb abbb aabb aabbb aabbbb a_abb a_abbb ]) {
   m[
...
   ]x
      and print("$_\n");
}

abb
aabbb
a_abb