File Coverage

blib/lib/Chart/Plotly/Trace/Scatter/Transform.pm
Criterion Covered Total %
statement 9 25 36.0
branch 0 8 0.0
condition 0 8 0.0
subroutine 3 4 75.0
pod 1 1 100.0
total 13 46 28.2


line stmt bran cond sub pod time code
1             package Chart::Plotly::Trace::Scatter::Transform;
2 3     3   19 use Moose;
  3         7  
  3         19  
3 3     3   16654 use MooseX::ExtraArgs;
  3         8  
  3         20  
4 3     3   5280 use Moose::Util::TypeConstraints qw(enum union);
  3         6  
  3         22  
5             if ( !defined Moose::Util::TypeConstraints::find_type_constraint('PDL') ) {
6             Moose::Util::TypeConstraints::type('PDL');
7             }
8              
9             our $VERSION = '0.039'; # VERSION
10              
11             # ABSTRACT: This attribute is one of the possible options for the trace scatter.
12              
13             sub TO_JSON {
14 0     0 1   my $self = shift;
15 0   0       my $extra_args = $self->extra_args // {};
16 0           my $meta = $self->meta;
17 0           my %hash = %$self;
18 0           for my $name ( sort keys %hash ) {
19 0           my $attr = $meta->get_attribute($name);
20 0 0         if ( defined $attr ) {
21 0           my $value = $hash{$name};
22 0           my $type = $attr->type_constraint;
23 0 0 0       if ( $type && $type->equals('Bool') ) {
24 0 0         $hash{$name} = $value ? \1 : \0;
25             }
26             }
27             }
28 0           %hash = ( %hash, %$extra_args );
29 0           delete $hash{'extra_args'};
30 0 0 0       if ( $self->can('type') && ( !defined $hash{'type'} ) ) {
31 0           $hash{type} = $self->type();
32             }
33 0           return \%hash;
34             }
35              
36             has description => (
37             is => "ro",
38             default =>
39             "An array of operations that manipulate the trace data, for example filtering or sorting the data arrays.",
40             );
41              
42             __PACKAGE__->meta->make_immutable();
43             1;
44              
45             __END__
46              
47             =pod
48              
49             =encoding utf-8
50              
51             =head1 NAME
52              
53             Chart::Plotly::Trace::Scatter::Transform - This attribute is one of the possible options for the trace scatter.
54              
55             =head1 VERSION
56              
57             version 0.039
58              
59             =head1 SYNOPSIS
60              
61             use HTML::Show;
62             use Chart::Plotly;
63             use Chart::Plotly::Trace::Scatter;
64             my $scatter = Chart::Plotly::Trace::Scatter->new( x => [ 1 .. 5 ], y => [ 1 .. 5 ] );
65            
66             HTML::Show::show( Chart::Plotly::render_full_html( data => [$scatter] ) );
67              
68             =head1 DESCRIPTION
69              
70             This attribute is part of the possible options for the trace scatter.
71              
72             This file has been autogenerated from the official plotly.js source.
73              
74             If you like Plotly, please support them: L<https://plot.ly/>
75             Open source announcement: L<https://plot.ly/javascript/open-source-announcement/>
76              
77             Full reference: L<https://plot.ly/javascript/reference/#scatter>
78              
79             =head1 DISCLAIMER
80              
81             This is an unofficial Plotly Perl module. Currently I'm not affiliated in any way with Plotly.
82             But I think plotly.js is a great library and I want to use it with perl.
83              
84             =head1 METHODS
85              
86             =head2 TO_JSON
87              
88             Serialize the trace to JSON. This method should be called only by L<JSON> serializer.
89              
90             =head1 ATTRIBUTES
91              
92             =over
93              
94             =item * description
95              
96             =back
97              
98             =head1 AUTHOR
99              
100             Pablo Rodríguez González <pablo.rodriguez.gonzalez@gmail.com>
101              
102             =head1 COPYRIGHT AND LICENSE
103              
104             This software is Copyright (c) 2020 by Pablo Rodríguez González.
105              
106             This is free software, licensed under:
107              
108             The MIT (X11) License
109              
110             =cut