path: root/emacs.d/lisp/yasnippet/snippets/perl-mode/while

#name : while (...) { ... }
# --
while ($1) {
    $0
}