FG42/conf/emacs.d/snippets/text-mode/perl-mode/fore

#name : foreach ... { ... }
# --
foreach my \$${1:x} (@${2:array}) {
    ${3:# body...}
}