「Text::FrontMatter::YAML」の版間の差分
提供: dsk's note
細 |
細 |
||
| 30行目: | 30行目: | ||
--- | --- | ||
</pre> | </pre> | ||
| − | + | *正規表現 | |
*$yf =~/^-{3}${1}(.*?)-{3}${1}/#Triple-dashedを含まない | *$yf =~/^-{3}${1}(.*?)-{3}${1}/#Triple-dashedを含まない | ||
*$yf =~/^(-{3}${1}.*?-{3})${1}/#Triple-dashedを含む | *$yf =~/^(-{3}${1}.*?-{3})${1}/#Triple-dashedを含む | ||
2015年6月9日 (火) 15:04時点における版
#!/usr/bin/perl use File::Slurp; use Text::FrontMatter::YAML; # READING my $text_with_frontmatter = read_file("item.md"); my $tfm = Text::FrontMatter::YAML->new( document_string => $text_with_frontmatter ); my $metadata = $tfm->frontmatter_hashref; print qq(This is $metadata->{title}\n); print qq(This is $metadata->{date}\n); print qq(This is $metadata->{taxonomy}->{category}\n); print qq(This is $metadata->{taxonomy}->{tag}\n);
---
title: London Industry at Night
date: 13:34 06/07/2014
taxonomy:
category: blog
tag: [city, night, photography]
---
- 正規表現
- $yf =~/^-{3}${1}(.*?)-{3}${1}/#Triple-dashedを含まない
- $yf =~/^(-{3}${1}.*?-{3})${1}/#Triple-dashedを含む
