File Coverage

blib/lib/Text/Livedoor/Wiki/Plugin/Inline/Subscript.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 1 1 100.0
total 17 17 100.0


line stmt bran cond sub pod time code
1             package Text::Livedoor::Wiki::Plugin::Inline::Subscript;
2              
3 10     10   50 use warnings;
  10         20  
  10         344  
4 10     10   50 use strict;
  10         18  
  10         354  
5 10     10   49 use base qw(Text::Livedoor::Wiki::Plugin::Inline);
  10         20  
  10         726  
6              
7             __PACKAGE__->regex(q{__([^_]*)__});
8             __PACKAGE__->n_args(1);
9              
10             sub process {
11 8     8 1 21 my ( $class , $inline , $line ) = @_;
12 8         41 $line = $inline->parse($line);
13 8         45 return "$line";
14             }
15              
16             1;
17              
18             =head1 NAME
19              
20             Text::Livedoor::Wiki::Plugin::Inline::Subscript - Subscript Inline Plugin
21              
22             =head1 DESCRIPTION
23              
24             without subscript , can not type H2O
25              
26             =head1 SYNOPSIS
27              
28             H__2__O
29              
30             =head1 FUNCTION
31              
32             =head2 process
33              
34             =head1 AUTHOR
35              
36             polocky
37              
38             =cut