From 3ebc8dad590e40ec27b9570059675e557544829d Mon Sep 17 00:00:00 2001
From: Yasuhiro Matsumoto <mattn.jp@gmail.com>
Date: Thu, 8 Oct 2015 22:15:22 +0900
Subject: add perl6 stuff

---
 template/perl6/base-class.pm6   | 25 +++++++++++++++++++++++++
 template/perl6/snip-heredoc.p6  |  3 +++
 template/perl6/snip-heredoc.pm6 |  3 +++
 3 files changed, 31 insertions(+)
 create mode 100644 template/perl6/base-class.pm6
 create mode 100644 template/perl6/snip-heredoc.p6
 create mode 100644 template/perl6/snip-heredoc.pm6

(limited to 'template')

diff --git a/template/perl6/base-class.pm6 b/template/perl6/base-class.pm6
new file mode 100644
index 0000000..8632b78
--- /dev/null
+++ b/template/perl6/base-class.pm6
@@ -0,0 +1,25 @@
+use v6;
+unit class {{_var_:package}};
+
+=begin pod
+
+=head1 NAME
+
+{{_expr_:substitute(substitute(expand('%:r'), '.*lib[\\/]', '', 'g'), '[\\/]', '::', 'g')}} - blah blah blah
+
+=head1 SYNOPSIS
+
+  use {{_var_:package}};
+
+=head1 DESCRIPTION
+
+{{_var_:package}} is ...
+
+=head1 COPYRIGHT AND LICENSE
+
+Copyright {{_expr_:strftime("%Y")}} {{_expr_:get(g:, "sonictemplate_user_email", filter([$USER, $UESRNAME, "No Name <noname@example.com>"], "len(v:val)>0")[0])}}
+
+This library is free software; you can redistribute it and/or modify it under the Artistic License 2.0.
+
+=end pod
+{{_define_:package:substitute(substitute(expand('%:r'), '.*lib[\\/]', '', 'g'), '[\\/]', '::', 'g')}};
diff --git a/template/perl6/snip-heredoc.p6 b/template/perl6/snip-heredoc.p6
new file mode 100644
index 0000000..c3fb17b
--- /dev/null
+++ b/template/perl6/snip-heredoc.p6
@@ -0,0 +1,3 @@
+say q:to 'EOT';
+blah
+EOT
diff --git a/template/perl6/snip-heredoc.pm6 b/template/perl6/snip-heredoc.pm6
new file mode 100644
index 0000000..c3fb17b
--- /dev/null
+++ b/template/perl6/snip-heredoc.pm6
@@ -0,0 +1,3 @@
+say q:to 'EOT';
+blah
+EOT
-- 
cgit v1.2.3-54-g00ecf