diff options
Diffstat (limited to 'template/perl')
-rw-r--r-- | template/perl/base-package.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/template/perl/base-package.pl b/template/perl/base-package.pl index b4fa22c..4cb83fb 100644 --- a/template/perl/base-package.pl +++ b/template/perl/base-package.pl @@ -1,4 +1,4 @@ -package {{_expr_:substitute(substitute(substitute(expand('%'), '.*lib[\\/]', '', 'g'), '[\\/]', '::', 'g'), '\.pm$', '', 'g')}}; +package {{_expr_:substitute(substitute(expand('%:r'), '.*lib[\\/]', '', 'g'), '[\\/]', '::', 'g')}}; use strict; use warnings; |