File Coverage

blib/lib/Egg/Release/JSON.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package Egg::Release::JSON;
2             #
3             # Masatoshi Mizuno E<lt>lusheE<64>cpan.orgE<gt>
4             #
5             # $Id: JSON.pm 210 2007-11-03 14:38:29Z lushe $
6             #
7 2     2   574030 use strict;
  2         5  
  2         133  
8 2     2   11 use warnings;
  2         4  
  2         128  
9              
10             our $VERSION = '0.02';
11              
12             =head1 NAME
13              
14             Egg::Release::JSON - JSON module kit for Egg.
15              
16             =head1 DESCRIPTION
17              
18             VIEW and PLUGIN to use JSON are enclosed.
19              
20             =head1 EXAMPLE
21              
22             =head2 VIEW
23              
24             Defolt VIEW is set and the output preparation of JSON is done.
25              
26             $e->default_view('JSON')->obj({
27             hogehoge => 'hoooo',
28             uhauha => 'beeee',
29             });
30              
31             * Please see L<Egg::View::JSON> in detail.
32              
33             =head2 PLUGIN
34              
35             The method for the mutual conversion of JSON is added.
36              
37             my $json_data = {
38             aaaaa => 'bbbbb',
39             ccccc => 'ddddd',
40             };
41             my $json_js = $e->obj2json($json_data);
42             my $json_hash = $e->json2obj($json_js);
43              
44             The object of L<JSON> module is acquired.
45              
46             my $json= $e->json;
47              
48             * Please see the document of L<JSON > in detail.
49              
50             =head1 SEE ALSO
51              
52             L<JSON>,
53             L<Egg::Release>,
54              
55             =head1 AUTHOR
56              
57             Masatoshi Mizuno E<lt>lusheE<64>cpan.orgE<gt>
58              
59             =head1 COPYRIGHT
60              
61             Copyright (C) 2007 by Bee Flag, Corp. E<lt>http://egg.bomcity.com/E<gt>, All Rights Reserved.
62              
63             This library is free software; you can redistribute it and/or modify
64             it under the same terms as Perl itself, either Perl version 5.8.6 or,
65             at your option, any later version of Perl 5 you may have available.
66              
67             =cut
68              
69             1;