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 = '0.400001';
4 157     157   71079 use strict;
  157         410  
  157         4536  
5 157     157   823 use warnings;
  157         410  
  157         16568  
6              
7             sub camelize {
8 1707     1707 1 6138 my ($value) = @_;
9              
10 1707         2925 my $camelized = '';
11 1707         4929 for my $word ( split /_/, $value ) {
12 1721         4741 $camelized .= ucfirst($word);
13             }
14 1707         4697 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 0.400001
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