diff --git a/snippets/perl.snippets b/snippets/perl.snippets
index 9afdee6..79462fc 100644
--- a/snippets/perl.snippets
+++ b/snippets/perl.snippets
@@ -80,7 +80,7 @@ snippet fore
 	${1:expression} foreach @${2:array};${3}
 # Package
 snippet package
-	package ${1:ClassName};
+	package ${1:`substitute(Filename('', 'Page Title'), '^.', '\u&', '')`};
 
 	${2:#...}
 
@@ -104,7 +104,7 @@ snippet packagev512
 snippet moose
 	use Moose;
 	use namespace::autoclean;
-	${1:#}extends '${2:# ParentClass}';
+	${1:#}extends '${2:ParentClass}';
 
 # moose extends
 snippet extends