code.delx.au - gnu-emacs-elpa/blob - packages/yasnippet/snippets/perl-mode/eval

   1 # name: eval { ... } if ($@) { ... }
   2 # key: eval
   3 # --
   4 eval {
   5     ${1:# do something risky...}
   6 };
   7 if (\$@) {
   8     ${2:# handle failure...}
   9 }