line |
true |
false |
branch |
64
|
73 |
0 |
*{$_;}{'CODE'} ? :
|
68
|
0 |
73 |
*{$_;}{'CODE'} ? :
|
78
|
0 |
174 |
ref $_[0] ? :
|
84
|
0 |
174 |
@_ == 1 ? :
|
|
0 |
174 |
$meta->{'HAS_BUILDARGS'} ? :
|
96
|
110 |
64 |
exists $args->{'definition_context'} ? :
|
98
|
0 |
174 |
unless ref $value eq "HASH"
|
106
|
112 |
62 |
if (exists $args->{'class'})
|
108
|
0 |
112 |
unless &blessed($args->{'class'}) and $args->{'class'}->isa("Mite::Package")
|
114
|
112 |
62 |
if ref $self->{'class'}
|
118
|
2 |
172 |
if (exists $args->{'_class_for_default'})
|
120
|
0 |
2 |
unless &blessed($args->{'_class_for_default'}) and $args->{'_class_for_default'}->isa("Mite::Package")
|
127
|
2 |
172 |
if ref $self->{'_class_for_default'}
|
131
|
0 |
174 |
unless exists $args->{'name'}
|
137
|
174 |
0 |
if (defined $args->{'name'})
|
139
|
0 |
174 |
unless ref \$args->{'name'} eq "SCALAR"
|
142
|
0 |
174 |
unless do {
|
150
|
6 |
168 |
if (exists $args->{'init_arg'})
|
151
|
0 |
6 |
unless do {
|
160
|
3 |
3 |
if (defined $args->{'init_arg'})
|
163
|
0 |
3 |
unless ref \$args->{'init_arg'} eq "SCALAR"
|
175
|
3 |
3 |
unless (do {
|
187
|
14 |
160 |
exists $args->{'required'} ? :
|
200
|
14 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
205
|
14 |
0 |
!ref($coerced_value) && (!defined($coerced_value) || $coerced_value eq '' || $coerced_value eq '0' || $coerced_value eq '1') ? :
|
224
|
10 |
164 |
exists $args->{'weak_ref'} ? :
|
226
|
0 |
3 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
240
|
119 |
55 |
exists $args->{'is'} ? :
|
241
|
1 |
173 |
unless do {
|
244
|
174 |
0 |
if defined $value and not ref $value
|
256
|
10 |
163 |
if (exists $args->{'reader'})
|
257
|
0 |
10 |
unless do {
|
270
|
8 |
2 |
if (defined $args->{'reader'})
|
275
|
0 |
8 |
unless ref \$args->{'reader'} eq "SCALAR"
|
293
|
8 |
2 |
if (defined $args->{'reader'})
|
298
|
0 |
8 |
unless ref \$args->{'reader'} eq "SCALAR"
|
305
|
10 |
0 |
unless do {
|
315
|
3 |
2 |
if defined $args->{'reader'} and not ref $args->{'reader'}
|
318
|
2 |
3 |
unless (do {
|
328
|
11 |
162 |
if (exists $args->{'writer'})
|
329
|
0 |
11 |
unless do {
|
342
|
4 |
7 |
if (defined $args->{'writer'})
|
347
|
0 |
4 |
unless ref \$args->{'writer'} eq "SCALAR"
|
365
|
4 |
7 |
if (defined $args->{'writer'})
|
370
|
0 |
4 |
unless ref \$args->{'writer'} eq "SCALAR"
|
377
|
11 |
0 |
unless do {
|
387
|
4 |
7 |
if defined $args->{'writer'} and not ref $args->{'writer'}
|
390
|
7 |
4 |
unless (do {
|
400
|
11 |
162 |
if (exists $args->{'accessor'})
|
401
|
0 |
11 |
unless do {
|
414
|
6 |
5 |
if (defined $args->{'accessor'})
|
420
|
0 |
6 |
unless ref \$args->{'accessor'} eq "SCALAR"
|
438
|
6 |
5 |
if (defined $args->{'accessor'})
|
444
|
0 |
6 |
unless ref \$args->{'accessor'} eq "SCALAR"
|
451
|
11 |
0 |
unless do {
|
461
|
4 |
5 |
if defined $args->{'accessor'} and not ref $args->{'accessor'}
|
464
|
5 |
4 |
unless (do {
|
474
|
10 |
163 |
if (exists $args->{'clearer'})
|
475
|
0 |
10 |
unless do {
|
488
|
3 |
7 |
if (defined $args->{'clearer'})
|
493
|
0 |
3 |
unless ref \$args->{'clearer'} eq "SCALAR"
|
511
|
3 |
7 |
if (defined $args->{'clearer'})
|
516
|
0 |
3 |
unless ref \$args->{'clearer'} eq "SCALAR"
|
523
|
10 |
0 |
unless do {
|
533
|
3 |
7 |
if defined $args->{'clearer'} and not ref $args->{'clearer'}
|
536
|
7 |
3 |
unless (do {
|
546
|
10 |
163 |
if (exists $args->{'predicate'})
|
547
|
0 |
10 |
unless do {
|
560
|
4 |
6 |
if (defined $args->{'predicate'})
|
566
|
0 |
4 |
unless ref \$args->{'predicate'} eq "SCALAR"
|
584
|
4 |
6 |
if (defined $args->{'predicate'})
|
590
|
0 |
4 |
unless ref \$args->{'predicate'} eq "SCALAR"
|
597
|
10 |
0 |
unless do {
|
607
|
4 |
6 |
if defined $args->{'predicate'} and not ref $args->{'predicate'}
|
609
|
6 |
4 |
unless (do {
|
623
|
16 |
157 |
if (exists $args->{'lvalue'})
|
624
|
0 |
16 |
unless do {
|
637
|
9 |
7 |
if (defined $args->{'lvalue'})
|
642
|
0 |
9 |
unless ref \$args->{'lvalue'} eq "SCALAR"
|
660
|
9 |
7 |
if (defined $args->{'lvalue'})
|
665
|
0 |
9 |
unless ref \$args->{'lvalue'} eq "SCALAR"
|
672
|
16 |
0 |
unless do {
|
682
|
9 |
7 |
if defined $args->{'lvalue'} and not ref $args->{'lvalue'}
|
685
|
7 |
9 |
unless (do {
|
695
|
8 |
165 |
if (exists $args->{'local_writer'})
|
696
|
0 |
8 |
unless do {
|
710
|
2 |
6 |
if (defined $args->{'local_writer'})
|
716
|
0 |
2 |
unless ref \$args->{'local_writer'} eq "SCALAR"
|
735
|
1 |
6 |
if (defined $args->{'local_writer'})
|
741
|
0 |
1 |
unless ref \$args->{'local_writer'} eq "SCALAR"
|
748
|
7 |
1 |
unless do {
|
761
|
1 |
6 |
if defined $args->{'local_writer'} and not ref $args->{'local_writer'}
|
763
|
6 |
1 |
unless (do {
|
777
|
19 |
154 |
if (exists $args->{'isa'})
|
778
|
0 |
19 |
unless do {
|
785
|
19 |
0 |
if (defined $args->{'isa'})
|
787
|
2 |
17 |
unless ref \$args->{'isa'} eq "SCALAR"
|
791
|
2 |
17 |
unless (do {
|
801
|
0 |
173 |
if (exists $args->{'does'})
|
802
|
0 |
0 |
unless do {
|
809
|
0 |
0 |
if (defined $args->{'does'})
|
811
|
0 |
0 |
unless ref \$args->{'does'} eq "SCALAR"
|
815
|
0 |
0 |
unless (do {
|
825
|
2 |
171 |
if (exists $args->{'enum'})
|
828
|
0 |
2 |
unless do {
|
834
|
0 |
6 |
unless do {
|
837
|
6 |
0 |
if (defined $i)
|
838
|
0 |
6 |
unless ref \$i eq "SCALAR"
|
857
|
0 |
173 |
if (exists $args->{'type'})
|
858
|
0 |
0 |
unless do {
|
869
|
0 |
0 |
unless (do {
|
880
|
13 |
160 |
exists $args->{'coerce'} ? :
|
882
|
0 |
6 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
896
|
8 |
165 |
exists $args->{'locked'} ? :
|
898
|
0 |
1 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
911
|
95 |
78 |
if (exists $args->{'default'})
|
912
|
0 |
95 |
unless do {
|
920
|
90 |
0 |
if (defined $args->{'default'})
|
922
|
34 |
56 |
unless ref \$args->{'default'} eq "SCALAR"
|
935
|
4 |
1 |
unless ref $args->{'default'} eq "SCALAR"
|
946
|
1 |
3 |
if do {
|
948
|
3 |
1 |
unless (do {
|
956
|
3 |
0 |
if do {
|
969
|
11 |
162 |
exists $args->{'default_is_trusted'} ? :
|
982
|
11 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
987
|
11 |
0 |
!ref($coerced_value) && (!defined($coerced_value) || $coerced_value eq '' || $coerced_value eq '0' || $coerced_value eq '1') ? :
|
1006
|
9 |
164 |
exists $args->{'default_does_trigger'} ? :
|
1019
|
9 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
1024
|
9 |
0 |
!ref($coerced_value) && (!defined($coerced_value) || $coerced_value eq '' || $coerced_value eq '0' || $coerced_value eq '1') ? :
|
1043
|
7 |
166 |
exists $args->{'skip_argc_check'} ? :
|
1056
|
7 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
1061
|
7 |
0 |
!ref($coerced_value) && (!defined($coerced_value) || $coerced_value eq '' || $coerced_value eq '0' || $coerced_value eq '1') ? :
|
1079
|
21 |
152 |
exists $args->{'lazy'} ? :
|
1081
|
0 |
14 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
1094
|
0 |
173 |
if (exists $args->{'coderef_default_variable'})
|
1100
|
0 |
0 |
if (defined $args->{'coderef_default_variable'})
|
1106
|
0 |
0 |
unless ref \$args->{'coderef_default_variable'} eq "SCALAR"
|
1112
|
0 |
0 |
unless do {
|
1126
|
7 |
166 |
if (exists $args->{'trigger'})
|
1127
|
0 |
7 |
unless do {
|
1140
|
7 |
0 |
if (defined $args->{'trigger'})
|
1145
|
0 |
7 |
unless ref \$args->{'trigger'} eq "SCALAR"
|
1163
|
7 |
0 |
if (defined $args->{'trigger'})
|
1168
|
0 |
7 |
unless ref \$args->{'trigger'} eq "SCALAR"
|
1175
|
7 |
0 |
unless do {
|
1185
|
7 |
0 |
if defined $args->{'trigger'} and not ref $args->{'trigger'}
|
1187
|
0 |
7 |
unless (do {
|
1201
|
8 |
165 |
if (exists $args->{'builder'})
|
1202
|
0 |
8 |
unless do {
|
1215
|
8 |
0 |
if (defined $args->{'builder'})
|
1220
|
7 |
1 |
unless ref \$args->{'builder'} eq "SCALAR"
|
1238
|
8 |
0 |
if (defined $args->{'builder'})
|
1243
|
7 |
1 |
unless ref \$args->{'builder'} eq "SCALAR"
|
1250
|
8 |
0 |
unless do {
|
1260
|
1 |
7 |
if defined $args->{'builder'} and not ref $args->{'builder'}
|
1262
|
7 |
1 |
unless (do {
|
1276
|
7 |
166 |
if (exists $args->{'clone'})
|
1277
|
0 |
7 |
unless do {
|
1290
|
7 |
0 |
if (defined $args->{'clone'})
|
1293
|
1 |
6 |
unless ref \$args->{'clone'} eq "SCALAR"
|
1310
|
7 |
0 |
if (defined $args->{'clone'})
|
1313
|
1 |
6 |
unless ref \$args->{'clone'} eq "SCALAR"
|
1319
|
7 |
0 |
unless do {
|
1329
|
5 |
1 |
if defined $args->{'clone'} and not ref $args->{'clone'}
|
1336
|
0 |
1 |
unless (do {
|
1346
|
4 |
169 |
if (exists $args->{'clone_on_read'})
|
1360
|
4 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
1364
|
0 |
4 |
unless not ref $coerced_value and !defined($coerced_value) || $coerced_value eq '' || $coerced_value eq '0' || $coerced_value eq '1'
|
1378
|
4 |
169 |
if (exists $args->{'clone_on_write'})
|
1392
|
4 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
1396
|
0 |
4 |
unless not ref $coerced_value and !defined($coerced_value) || $coerced_value eq '' || $coerced_value eq '0' || $coerced_value eq '1'
|
1410
|
1 |
172 |
if (exists $args->{'documentation'})
|
1416
|
9 |
164 |
if (exists $args->{'handles'})
|
1428
|
5 |
4 |
if (ref $to_coerce eq "HASH")
|
1431
|
0 |
10 |
unless do {
|
1441
|
10 |
0 |
if (defined $v)
|
1442
|
2 |
8 |
unless ref \$v eq "SCALAR"
|
1456
|
0 |
10 |
unless do {
|
1468
|
0 |
10 |
unless do {
|
1478
|
10 |
0 |
if (defined $k)
|
1479
|
0 |
10 |
unless ref \$k eq "SCALAR"
|
1505
|
4 |
0 |
if (defined $k)
|
1506
|
0 |
4 |
unless ref \$k eq "SCALAR"
|
1520
|
4 |
6 |
unless do {
|
1532
|
4 |
5 |
unless (do {
|
1535
|
2 |
2 |
if defined $to_coerce and not ref $to_coerce
|
1544
|
2 |
0 |
ref $to_coerce eq 'ARRAY' ? :
|
|
7 |
2 |
do {
|
1551
|
0 |
9 |
unless do {
|
1558
|
7 |
2 |
if (ref $coerced_value eq "HASH")
|
1561
|
0 |
12 |
unless do {
|
1570
|
12 |
0 |
if (defined $v)
|
1571
|
2 |
10 |
unless ref \$v eq "SCALAR"
|
1583
|
0 |
12 |
unless do {
|
1595
|
0 |
12 |
unless do {
|
1604
|
12 |
0 |
if (defined $k)
|
1605
|
0 |
12 |
unless ref \$k eq "SCALAR"
|
1628
|
4 |
0 |
if (defined $k)
|
1629
|
0 |
4 |
unless ref \$k eq "SCALAR"
|
1640
|
4 |
8 |
unless do {
|
1649
|
2 |
7 |
unless (do {
|
1652
|
2 |
0 |
if defined $coerced_value and not ref $coerced_value
|
1666
|
3 |
170 |
if (exists $args->{'handles_via'})
|
1674
|
0 |
3 |
if (ref $to_coerce eq "ARRAY")
|
1677
|
0 |
0 |
unless do {
|
1680
|
0 |
0 |
if (defined $i)
|
1681
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
1694
|
3 |
0 |
if (defined $to_coerce)
|
1695
|
0 |
3 |
unless ref \$to_coerce eq "SCALAR"
|
1701
|
3 |
0 |
do {
|
|
0 |
3 |
do {
|
1704
|
0 |
3 |
unless do {
|
1707
|
3 |
0 |
if (ref $coerced_value eq "ARRAY")
|
1710
|
0 |
3 |
unless do {
|
1713
|
3 |
0 |
if (defined $i)
|
1714
|
0 |
3 |
unless ref \$i eq "SCALAR"
|
1733
|
11 |
162 |
exists $args->{'alias'} ? :
|
1742
|
171 |
2 |
if (ref $to_coerce eq "ARRAY")
|
1745
|
0 |
2 |
unless do {
|
1754
|
2 |
0 |
if (defined $i)
|
1755
|
0 |
2 |
unless ref \$i eq "SCALAR"
|
1778
|
0 |
0 |
if (defined $i)
|
1779
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
1790
|
0 |
2 |
unless do {
|
1803
|
1 |
1 |
if (defined $to_coerce)
|
1804
|
0 |
1 |
unless ref \$to_coerce eq "SCALAR"
|
1811
|
1 |
0 |
!defined($to_coerce) ? :
|
|
1 |
1 |
do {
|
|
171 |
2 |
do {
|
1814
|
0 |
173 |
unless do {
|
1817
|
173 |
0 |
if (ref $coerced_value eq "ARRAY")
|
1820
|
0 |
3 |
unless do {
|
1829
|
3 |
0 |
if (defined $i)
|
1830
|
0 |
3 |
unless ref \$i eq "SCALAR"
|
1849
|
0 |
0 |
if (defined $i)
|
1850
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
1857
|
0 |
3 |
unless do {
|
1872
|
0 |
173 |
unless $meta->{'BUILD'}
|
|
173 |
0 |
if not $no_build and @{[] unless $meta->{'BUILD'};}
|
1879
|
0 |
165 |
if @unknown
|
1889
|
0 |
173 |
unless $meta->{'BUILD'}
|
1897
|
50 |
0 |
defined ${^GLOBAL_PHASE} ? :
|
1901
|
0 |
50 |
unless $meta->{'DEMOLISH'}
|
1908
|
0 |
0 |
if $e
|
1921
|
0 |
0 |
unless &blessed($_[1]) and $_[1]->isa("Mite::Package")
|
1927
|
0 |
0 |
if ref $_[0]{'_class_for_default'}
|
1930
|
0 |
27 |
@_ > 1 ? :
|
1935
|
1 |
26 |
exists $_[0]{'_class_for_default'} ? :
|
1937
|
0 |
26 |
unless &blessed($default_value) and $default_value->isa("Mite::Package")
|
1972
|
0 |
4 |
unless do {
|
1985
|
4 |
0 |
if (defined $_[1])
|
1986
|
0 |
4 |
unless ref \$_[1] eq "SCALAR"
|
2001
|
0 |
0 |
if (defined $_[1])
|
2002
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
2009
|
0 |
4 |
unless do {
|
2014
|
0 |
0 |
unless do {
|
2017
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
2029
|
4 |
308 |
@_ > 1 ? :
|
2032
|
146 |
162 |
exists $_[0]{'accessor'} ? :
|
2034
|
0 |
162 |
unless do {
|
2048
|
60 |
102 |
if (defined $default_value)
|
2049
|
0 |
60 |
unless ref \$default_value eq "SCALAR"
|
2073
|
60 |
102 |
if (defined $default_value)
|
2074
|
0 |
60 |
unless ref \$default_value eq "SCALAR"
|
2086
|
162 |
0 |
unless do {
|
2094
|
102 |
0 |
unless do {
|
2097
|
0 |
102 |
if defined $default_value and not ref $default_value
|
2127
|
0 |
0 |
if (ref $to_coerce eq "ARRAY")
|
2130
|
0 |
0 |
unless do {
|
2139
|
0 |
0 |
if (defined $i)
|
2140
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
2159
|
0 |
0 |
if (defined $i)
|
2160
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
2167
|
0 |
0 |
unless do {
|
2179
|
0 |
0 |
if (defined $to_coerce)
|
2180
|
0 |
0 |
unless ref \$to_coerce eq "SCALAR"
|
2186
|
0 |
0 |
!defined($to_coerce) ? :
|
|
0 |
0 |
do {
|
|
0 |
0 |
do {
|
2189
|
0 |
0 |
unless do {
|
2192
|
0 |
0 |
if (ref $value eq "ARRAY")
|
2195
|
0 |
0 |
unless do {
|
2204
|
0 |
0 |
if (defined $i)
|
2205
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
2220
|
0 |
0 |
if (defined $i)
|
2221
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
2227
|
0 |
0 |
unless do {
|
2240
|
0 |
496 |
@_ > 1 ? :
|
2246
|
0 |
119 |
unless @_ == 1
|
2250
|
0 |
119 |
exists $_[0]{'alias_is_for'} ? :
|
2272
|
0 |
17 |
unless do {
|
2285
|
17 |
0 |
if (defined $_[1])
|
2286
|
0 |
17 |
unless ref \$_[1] eq "SCALAR"
|
2301
|
8 |
0 |
if (defined $_[1])
|
2302
|
0 |
8 |
unless ref \$_[1] eq "SCALAR"
|
2309
|
8 |
9 |
unless do {
|
2314
|
0 |
8 |
unless do {
|
2317
|
8 |
0 |
if defined $_[1] and not ref $_[1]
|
2329
|
17 |
360 |
@_ > 1 ? :
|
2337
|
0 |
0 |
unless &blessed($_[1]) and $_[1]->isa("Mite::Package")
|
2342
|
0 |
0 |
if ref $_[0]{'class'}
|
2345
|
0 |
173 |
@_ > 1 ? :
|
2353
|
0 |
3 |
unless do {
|
2366
|
3 |
0 |
if (defined $_[1])
|
2367
|
0 |
3 |
unless ref \$_[1] eq "SCALAR"
|
2382
|
0 |
0 |
if (defined $_[1])
|
2383
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
2390
|
0 |
3 |
unless do {
|
2395
|
0 |
0 |
unless do {
|
2398
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
2410
|
3 |
295 |
@_ > 1 ? :
|
2413
|
132 |
163 |
exists $_[0]{'clearer'} ? :
|
2415
|
0 |
163 |
unless do {
|
2429
|
0 |
163 |
if (defined $default_value)
|
2430
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
2454
|
0 |
163 |
if (defined $default_value)
|
2455
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
2467
|
163 |
0 |
unless do {
|
2475
|
163 |
0 |
unless do {
|
2478
|
0 |
163 |
if defined $default_value and not ref $default_value
|
2516
|
0 |
226 |
unless @_ == 1
|
2520
|
111 |
115 |
exists $_[0]{'clone_on_read'} ? :
|
2533
|
115 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
2537
|
0 |
3 |
unless not ref $default_value and !defined($default_value) || $default_value eq '' || $default_value eq '0' || $default_value eq '1'
|
2554
|
0 |
293 |
unless @_ == 1
|
2558
|
178 |
115 |
exists $_[0]{'clone_on_write'} ? :
|
2571
|
115 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
2575
|
0 |
3 |
unless not ref $default_value and !defined($default_value) || $default_value eq '' || $default_value eq '0' || $default_value eq '1'
|
2596
|
0 |
0 |
unless do {
|
2599
|
0 |
0 |
if (defined $_[1])
|
2600
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
2615
|
0 |
31 |
@_ > 1 ? :
|
2620
|
4 |
27 |
exists $_[0]{'coderef_default_variable'} ? :
|
2626
|
0 |
27 |
unless do {
|
2629
|
27 |
0 |
if (defined $default_value)
|
2630
|
0 |
27 |
unless ref \$default_value eq "SCALAR"
|
2657
|
0 |
0 |
unless not ref $_[1] and !defined($_[1]) || $_[1] eq '' || $_[1] eq '0' || $_[1] eq '1'
|
2668
|
0 |
82 |
@_ > 1 ? :
|
2676
|
0 |
243 |
unless &blessed($_[1]) and $_[1]->isa("Mite::Package")
|
2682
|
243 |
476 |
@_ > 1 ? :
|
2687
|
0 |
243 |
unless defined wantarray
|
2699
|
0 |
243 |
$self->$has ? :
|
2700
|
243 |
0 |
@_ == 2 ? :
|
2723
|
0 |
3 |
unless do {
|
2730
|
3 |
0 |
if (defined $_[1])
|
2731
|
0 |
3 |
unless ref \$_[1] eq "SCALAR"
|
2741
|
0 |
0 |
if ref $_[1] eq "HASH"
|
2743
|
0 |
0 |
unless (not defined $_[1] or do {
|
2746
|
0 |
0 |
if ref $_[1] eq "ARRAY"
|
2755
|
3 |
375 |
@_ > 1 ? :
|
2774
|
0 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
2778
|
0 |
0 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
2789
|
0 |
81 |
@_ > 1 ? :
|
2808
|
0 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
2812
|
0 |
0 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
2823
|
0 |
81 |
@_ > 1 ? :
|
2831
|
0 |
0 |
unless ref $_[1] eq "HASH"
|
2837
|
0 |
249 |
@_ > 1 ? :
|
2897
|
0 |
0 |
unless do {
|
2900
|
0 |
0 |
if (ref $_[1] eq "ARRAY")
|
2906
|
0 |
0 |
unless do {
|
2909
|
0 |
0 |
if (defined $i)
|
2910
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
2927
|
0 |
4 |
@_ > 1 ? :
|
2959
|
0 |
0 |
if (ref $to_coerce eq "HASH")
|
2962
|
0 |
0 |
unless do {
|
2971
|
0 |
0 |
if (defined $v)
|
2972
|
0 |
0 |
unless ref \$v eq "SCALAR"
|
2984
|
0 |
0 |
unless do {
|
2996
|
0 |
0 |
unless do {
|
3005
|
0 |
0 |
if (defined $k)
|
3006
|
0 |
0 |
unless ref \$k eq "SCALAR"
|
3029
|
0 |
0 |
if (defined $k)
|
3030
|
0 |
0 |
unless ref \$k eq "SCALAR"
|
3042
|
0 |
0 |
unless do {
|
3054
|
0 |
0 |
unless (do {
|
3057
|
0 |
0 |
if defined $to_coerce and not ref $to_coerce
|
3064
|
0 |
0 |
ref $to_coerce eq 'ARRAY' ? :
|
|
0 |
0 |
do {
|
3071
|
0 |
0 |
unless do {
|
3078
|
0 |
0 |
if (ref $value eq "HASH")
|
3081
|
0 |
0 |
unless do {
|
3090
|
0 |
0 |
if (defined $v)
|
3091
|
0 |
0 |
unless ref \$v eq "SCALAR"
|
3099
|
0 |
0 |
unless do {
|
3111
|
0 |
0 |
unless do {
|
3120
|
0 |
0 |
if (defined $k)
|
3121
|
0 |
0 |
unless ref \$k eq "SCALAR"
|
3140
|
0 |
0 |
if (defined $k)
|
3141
|
0 |
0 |
unless ref \$k eq "SCALAR"
|
3148
|
0 |
0 |
unless do {
|
3156
|
0 |
0 |
unless (do {
|
3159
|
0 |
0 |
if defined $value and not ref $value
|
3170
|
0 |
24 |
@_ > 1 ? :
|
3199
|
0 |
0 |
if (ref $to_coerce eq "ARRAY")
|
3202
|
0 |
0 |
unless do {
|
3205
|
0 |
0 |
if (defined $i)
|
3206
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
3219
|
0 |
0 |
if (defined $to_coerce)
|
3220
|
0 |
0 |
unless ref \$to_coerce eq "SCALAR"
|
3224
|
0 |
0 |
do {
|
|
0 |
0 |
do {
|
3226
|
0 |
0 |
unless do {
|
3229
|
0 |
0 |
if (ref $value eq "ARRAY")
|
3232
|
0 |
0 |
unless do {
|
3235
|
0 |
0 |
if (defined $i)
|
3236
|
0 |
0 |
unless ref \$i eq "SCALAR"
|
3249
|
0 |
4 |
@_ > 1 ? :
|
3257
|
0 |
0 |
unless do {
|
3263
|
0 |
0 |
unless do {
|
3266
|
0 |
0 |
if (defined $_[1])
|
3267
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
3282
|
0 |
532 |
@_ > 1 ? :
|
3285
|
425 |
107 |
exists $_[0]{'init_arg'} ? :
|
3289
|
0 |
107 |
unless do {
|
3295
|
0 |
107 |
unless do {
|
3298
|
107 |
0 |
if (defined $default_value)
|
3299
|
0 |
107 |
unless ref \$default_value eq "SCALAR"
|
3330
|
0 |
4 |
unless do {
|
3333
|
4 |
0 |
if defined $_[1] and not ref $_[1]
|
3346
|
4 |
951 |
@_ > 1 ? :
|
3370
|
0 |
4 |
unless not ref $_[1] and !defined($_[1]) || $_[1] eq '' || $_[1] eq '0' || $_[1] eq '1'
|
3381
|
4 |
332 |
@_ > 1 ? :
|
3389
|
0 |
1 |
unless do {
|
3402
|
1 |
0 |
if (defined $_[1])
|
3403
|
0 |
1 |
unless ref \$_[1] eq "SCALAR"
|
3418
|
0 |
0 |
if (defined $_[1])
|
3419
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
3426
|
0 |
1 |
unless do {
|
3431
|
0 |
0 |
unless do {
|
3434
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
3446
|
1 |
293 |
@_ > 1 ? :
|
3449
|
128 |
165 |
exists $_[0]{'local_writer'} ? :
|
3451
|
0 |
165 |
unless do {
|
3465
|
0 |
165 |
if (defined $default_value)
|
3466
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
3490
|
0 |
165 |
if (defined $default_value)
|
3491
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
3503
|
165 |
0 |
unless do {
|
3511
|
165 |
0 |
unless do {
|
3514
|
0 |
165 |
if defined $default_value and not ref $default_value
|
3539
|
0 |
0 |
unless not ref $_[1] and !defined($_[1]) || $_[1] eq '' || $_[1] eq '0' || $_[1] eq '1'
|
3550
|
0 |
321 |
@_ > 1 ? :
|
3558
|
0 |
9 |
unless do {
|
3571
|
9 |
0 |
if (defined $_[1])
|
3572
|
0 |
9 |
unless ref \$_[1] eq "SCALAR"
|
3587
|
0 |
0 |
if (defined $_[1])
|
3588
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
3595
|
0 |
9 |
unless do {
|
3600
|
0 |
0 |
unless do {
|
3603
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
3615
|
9 |
467 |
@_ > 1 ? :
|
3618
|
310 |
157 |
exists $_[0]{'lvalue'} ? :
|
3620
|
0 |
157 |
unless do {
|
3634
|
0 |
157 |
if (defined $default_value)
|
3635
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
3659
|
0 |
157 |
if (defined $default_value)
|
3660
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
3672
|
157 |
0 |
unless do {
|
3680
|
157 |
0 |
unless do {
|
3683
|
0 |
157 |
if defined $default_value and not ref $default_value
|
3709
|
0 |
0 |
unless do {
|
3712
|
0 |
0 |
if (defined $_[1])
|
3713
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
3728
|
0 |
1601 |
@_ > 1 ? :
|
3736
|
0 |
4 |
unless do {
|
3749
|
4 |
0 |
if (defined $_[1])
|
3750
|
0 |
4 |
unless ref \$_[1] eq "SCALAR"
|
3765
|
0 |
0 |
if (defined $_[1])
|
3766
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
3773
|
0 |
4 |
unless do {
|
3778
|
0 |
0 |
unless do {
|
3781
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
3793
|
4 |
296 |
@_ > 1 ? :
|
3796
|
133 |
163 |
exists $_[0]{'predicate'} ? :
|
3798
|
0 |
163 |
unless do {
|
3812
|
0 |
163 |
if (defined $default_value)
|
3813
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
3837
|
0 |
163 |
if (defined $default_value)
|
3838
|
0 |
0 |
unless ref \$default_value eq "SCALAR"
|
3850
|
163 |
0 |
unless do {
|
3858
|
163 |
0 |
unless do {
|
3861
|
0 |
163 |
if defined $default_value and not ref $default_value
|
3885
|
0 |
3 |
unless do {
|
3898
|
3 |
0 |
if (defined $_[1])
|
3899
|
0 |
3 |
unless ref \$_[1] eq "SCALAR"
|
3914
|
0 |
0 |
if (defined $_[1])
|
3915
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
3922
|
0 |
3 |
unless do {
|
3927
|
0 |
0 |
unless do {
|
3930
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
3942
|
3 |
300 |
@_ > 1 ? :
|
3945
|
137 |
163 |
exists $_[0]{'reader'} ? :
|
3947
|
0 |
163 |
unless do {
|
3961
|
51 |
112 |
if (defined $default_value)
|
3962
|
0 |
51 |
unless ref \$default_value eq "SCALAR"
|
3986
|
51 |
112 |
if (defined $default_value)
|
3987
|
0 |
51 |
unless ref \$default_value eq "SCALAR"
|
3999
|
163 |
0 |
unless do {
|
4007
|
112 |
0 |
unless do {
|
4010
|
0 |
112 |
if defined $default_value and not ref $default_value
|
4045
|
0 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
4049
|
0 |
0 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
4060
|
0 |
238 |
@_ > 1 ? :
|
4079
|
0 |
0 |
!ref($to_coerce) && (!defined($to_coerce) || $to_coerce eq '' || $to_coerce eq '0' || $to_coerce eq '1') ? :
|
4083
|
0 |
0 |
unless not ref $value and !defined($value) || $value eq '' || $value eq '0' || $value eq '1'
|
4094
|
0 |
66 |
@_ > 1 ? :
|
4116
|
0 |
7 |
unless do {
|
4129
|
7 |
0 |
if (defined $_[1])
|
4130
|
0 |
7 |
unless ref \$_[1] eq "SCALAR"
|
4145
|
0 |
0 |
if (defined $_[1])
|
4146
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
4153
|
0 |
7 |
unless do {
|
4158
|
0 |
0 |
unless do {
|
4161
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
4173
|
7 |
727 |
@_ > 1 ? :
|
4179
|
0 |
643 |
unless @_ == 1
|
4182
|
522 |
121 |
exists $_[0]{'type'} ? :
|
4184
|
0 |
121 |
unless do {
|
4189
|
100 |
21 |
unless do {
|
4213
|
0 |
0 |
unless not ref $_[1] and !defined($_[1]) || $_[1] eq '' || $_[1] eq '0' || $_[1] eq '1'
|
4224
|
0 |
304 |
@_ > 1 ? :
|
4232
|
0 |
4 |
unless do {
|
4245
|
4 |
0 |
if (defined $_[1])
|
4246
|
0 |
4 |
unless ref \$_[1] eq "SCALAR"
|
4261
|
0 |
0 |
if (defined $_[1])
|
4262
|
0 |
0 |
unless ref \$_[1] eq "SCALAR"
|
4269
|
0 |
4 |
unless do {
|
4274
|
0 |
0 |
unless do {
|
4277
|
0 |
0 |
if defined $_[1] and not ref $_[1]
|
4289
|
4 |
298 |
@_ > 1 ? :
|
4292
|
136 |
162 |
exists $_[0]{'writer'} ? :
|
4294
|
0 |
162 |
unless do {
|
4308
|
3 |
159 |
if (defined $default_value)
|
4309
|
0 |
3 |
unless ref \$default_value eq "SCALAR"
|
4333
|
3 |
159 |
if (defined $default_value)
|
4334
|
0 |
3 |
unless ref \$default_value eq "SCALAR"
|
4346
|
162 |
0 |
unless do {
|
4354
|
159 |
0 |
unless do {
|
4357
|
0 |
159 |
if defined $default_value and not ref $default_value
|
4380
|
0 |
0 |
if exists $DOES{$role}
|
4381
|
0 |
0 |
if $role eq "Mite::Attribute"
|
4382
|
0 |
0 |
if ($INC{'Moose/Util.pm'} and my $meta = Moose::Util::find_meta(ref $self || $self))
|
4385
|
0 |
0 |
if $meta->can("does_role") and $meta->does_role($role)
|