File Coverage

blib/lib/Dancer2/Core.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 1 1 100.0
total 15 15 100.0


line stmt bran cond sub pod time code
1             package Dancer2::Core;
2             # ABSTRACT: Core libraries for Dancer2 2.0
3             $Dancer2::Core::VERSION = '1.0.0';
4 158     158   75969 use strict;
  158         376  
  158         4619  
5 158     158   831 use warnings;
  158         449  
  158         17536  
6              
7             sub camelize {
8 1718     1718 1 5693 my ($value) = @_;
9              
10 1718         2930 my $camelized = '';
11 1718         5179 for my $word ( split /_/, $value ) {
12 1732         4899 $camelized .= ucfirst($word);
13             }
14 1718         4853 return $camelized;
15             }
16              
17              
18             1;
19              
20             __END__
21              
22             =pod
23              
24             =encoding UTF-8
25              
26             =head1 NAME
27              
28             Dancer2::Core - Core libraries for Dancer2 2.0
29              
30             =head1 VERSION
31              
32             version 1.0.0
33              
34             =head1 FUNCTIONS
35              
36             =head2 camelize
37              
38             Camelize a underscore-separated-string.
39              
40             =head1 AUTHOR
41              
42             Dancer Core Developers
43              
44             =head1 COPYRIGHT AND LICENSE
45              
46             This software is copyright (c) 2023 by Alexis Sukrieh.
47              
48             This is free software; you can redistribute it and/or modify it under
49             the same terms as the Perl 5 programming language system itself.
50              
51             =cut