From e0fc4d1d91b1d55e14513c65bdbdcef128ec731b Mon Sep 17 00:00:00 2001
From: Michael Sanders <msanders42@gmail.com>
Date: Mon, 11 May 2009 11:28:35 -0400
Subject: [PATCH] fixed typo in perl snippet

---
 snippets/perl.snippets | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/snippets/perl.snippets b/snippets/perl.snippets
index 8607fa4..cf8f9fc 100644
--- a/snippets/perl.snippets
+++ b/snippets/perl.snippets
@@ -88,4 +88,4 @@ snippet cl
 # Read File
 snippet slurp
 	my $${1:var};
-	{ local $/ = undef; local *FILE; open FILE, "<${2:file}"; $$1 = <FILE>; close FILE }${2}
+	{ local $/ = undef; local *FILE; open FILE, "<${2:file}"; $$1 = <FILE>; close FILE }${3}