Select Code to Download

$ cat ~/.emacs.d/snippets/cperl-mode/slurp
# -*- snippet -*-
...
#name: Slurp file-handle
# --
my $${1:variable} = do { local $/; <$${2:fh}>; };

$ cat ~/.emacs.d/snippets/cperl-mode/slurp.open
# -*- snippet -*-
...
  or die qq{Can't open "$3": $!\n};
<$$2>;$>
};$>