File Coverage

File:lib/Railsish/TextHelpers.pm
Coverage:85.7%

linestmtbrancondsubpodtimecode
1package Railsish::TextHelpers;
2
15
15
15
147
45
165
use strict;
3
15
15
15
151
43
146
use warnings;
4
15
15
15
129
55
178
use Exporter::Lite;
5
6our @EXPORT = qw( pluralize singularize camelize camelcase underscore dasherize forien_key );
7
8
15
15
15
1238
63
200
use Lingua::EN::Inflect::Number qw(to_S to_PL);
9
10
5
0
43
sub pluralize { &to_PL }
11
5
0
34
sub singularize { &to_S }
12
13
15
15
15
1370
90
214
use String::CamelCase qw(camelize decamelize);
14
15
1
0
7
sub camelcase { &camelize }
16
3
0
43
sub underscore { &decamelize }
17
18sub dasherize {
19
1
0
7
  my $str = &decamelize;
20
1
31
  $str =~ s/_/-/g;
21
1
7
  return $str;
22}
23
24sub forien_key {
25
1
0
6
  my $str = &decamelize;
26
1
25
  $str =~ s/(?!_id)$/_id/;
27
1
8
  return $str;
28}
29
301;
31