Help for this page
$string =~ m/^(frm)(\w+?)(txt)?$/;
>perl -wMstrict -le "for (@ARGV) { ... ----------- 'frmNametxt' (frm) (Name) (txt) 'frmNameFoo' (frm) (NameFoo) ()