diff --git a/snippets/perl.snippets b/snippets/perl.snippets
index ef30667..9afdee6 100644
--- a/snippets/perl.snippets
+++ b/snippets/perl.snippets
@@ -91,7 +91,7 @@ snippet package
 
 # Package syntax perl >= 5.12.0
 snippet packagev512
-	package ${1:ClassName} ${2:0.99};
+	package ${1:`substitute(Filename('', 'Page Title'), '^.', '\u&', '')`} ${2:0.99};
 
 	${3:#...}
 
@@ -104,7 +104,7 @@ snippet packagev512
 snippet moose
 	use Moose;
 	use namespace::autoclean;
-	#extends '${2:# ParentClass}';
+	${1:#}extends '${2:# ParentClass}';
 
 # moose extends
 snippet extends