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;