Skip to content

Instantly share code, notes, and snippets.

@inao
inao / markdown2inao.pl
Last active October 2, 2015 19:19 — forked from suzuki/markdown2inao.pl
GitHubに移行しました。 https://github.com/naoya/md2inao.pl
#!/usr/bin/env perl
use strict;
use warnings;
use Pod::Usage;
use Text::Markdown 'markdown';
use HTML::TreeBuilder;
use List::Util 'max';
use Encode;
#!/usr/bin/env perl
use strict;
use warnings;
use Pod::Usage;
use Text::Markdown 'markdown';
use HTML::TreeBuilder;
use List::Util 'max';
let g:surround_99 = "◆cmd/◆\r◆/cmd◆" " 99 = c
let g:surround_108 = "◆list/◆\r◆/list◆" " 108 = l
let g:surround_109 = "◆column/◆\n■■■■\n\r◆/column◆" " 109 = m
let g:surround_110 = "◆注/◆\r◆/注◆" " 110 = n
inoreabbrev HEADER ■■■■
inoreabbrev CAPTION ●リスト/図/表n ...
inoreabbrev NOTE ◆注/◆◆/注◆
inoreabbrev COMMAND ◆cmd/◆◆/cmd◆
#!/usr/bin/env perl
use strict;
use warnings;
use Pod::Usage;
use Text::Markdown 'markdown';
use HTML::TreeBuilder;
use List::Util 'max';
#!/usr/bin/env perl
use strict;
use warnings;
use Pod::Usage;
use Text::Markdown 'markdown';
use HTML::TreeBuilder;
use List::Util 'max';