Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #!/usr/bin/env perl
- use common::sense;
- use utf8;
- use Text::MTFormatBuilder '-Declare';
- print blog_export {
- entry {
- metadata {
- author 'author_test';
- title 'title_test';
- };
- body 'test_body';
- extended_body 'test_extended_body';
- excerpt 'test_excerpt';
- };
- };
- __END__
- AUTHOR: author_test
- TITLE: title_test
- CONVERT BREAKS: 0
- ALLOW COMMENTS: 1
- ALLOW PINGS: 1
- -----
- BODY:
- test_body
- -----
- EXTENDED BODY:
- test_extended_body
- -----
- EXCERPT:
- test_excerpt
- -----
- --------
Add Comment
Please, Sign In to add comment