From c59a7f2c49bcf0b7eb91498cb4184b09818a9149 Mon Sep 17 00:00:00 2001
From: William Travis Holton <wtholton@googlemail.com>
Date: Wed, 16 May 2012 08:09:49 +1200
Subject: [PATCH] use parent instead of base

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

diff --git a/snippets/perl.snippets b/snippets/perl.snippets
index 4ba985d..0037cc3 100644
--- a/snippets/perl.snippets
+++ b/snippets/perl.snippets
@@ -82,7 +82,7 @@ snippet fore
 snippet cl
 	package ${1:ClassName};
 
-	use base qw(${2:ParentClass});
+	use parent qw(${2:ParentClass});
 
 	sub new {
 		my $class = shift;