| line |
true |
false |
branch |
|
337
|
2 |
0 |
if $#_ |
|
341
|
0 |
2 |
if (ref $_[0] and $_[0]->isa('Date::ICal')) { } |
|
|
1 |
1 |
elsif ($args{'calscale'}) { } |
|
356
|
1 |
0 |
if ($args{'calscale'} =~ /gregorian/i) { } |
|
|
0 |
0 |
elsif ($args{'calscale'} =~ /ethio/i) { } |
|
362
|
0 |
1 |
if ($args{'ical'} or $args{'epoch'}) { } |
|
|
1 |
0 |
elsif ($args{'day'} and $args{'month'} and $args{'year'}) { } |
|
421
|
0 |
1 |
if $self->_isBogusGregorianDate(@_) |
|
439
|
0 |
1 |
@_ ? : |
|
441
|
0 |
1 |
if (not +(1 <= $day && $day <= 30) && (1 <= $month && $month <= 13) or $month == 13 and $day > 6 or $month == 13 and $day == 6 and not $self->isLeapYear) { } |
|
456
|
1 |
0 |
@_ ? : |
|
458
|
0 |
1 |
if (not +(1 <= $month && $month <= 12) && (1 <= $day && $day <= $GregorianDaysPerMonth[$month - 1]) or $day == 29 and $month == 2 and not $self->_isGregorianLeapYear($year)) { } |
|
471
|
2 |
1 |
@_ ? : |
|
491
|
0 |
1 |
$e == 4 || $i == 4 ? : |
|
506
|
0 |
1 |
$self->_isGregorianLeapYear($year) ? : |
|
|
0 |
1 |
$absolute < $self->_GregorianToAbsolute(1, 3, $year) ? : |
|
524
|
4 |
0 |
@_ ? : |
|
526
|
0 |
3 |
$self->_isGregorianLeapYear($year) ? : |
|
|
1 |
3 |
$month <= 2 ? : |
|
552
|
4 |
0 |
$_[0] % 4 != 0 || $_[0] % 400 == 100 || $_[0] % 400 == 200 || $_[0] % 400 == 300 ? : |
|
569
|
0 |
0 |
@_ ? : |
|
571
|
0 |
0 |
($year + 1) % 4 ? : |
|
671
|
0 |
0 |
$self->{'_trans'} ? : |
|
|
0 |
0 |
if (@_) { } |
|
686
|
0 |
0 |
$self->{'_trans'} ? : |
|
|
0 |
0 |
if (@_) { } |
|
704
|
0 |
0 |
$self->{'_trans'} ? : |
|
|
0 |
0 |
if ($#_) { } |
|
799
|
0 |
0 |
@_ ? : |
|
876
|
0 |
0 |
$m < 15 ? : |
|
880
|
0 |
0 |
$year % 4 ? : |
|
893
|
0 |
0 |
if $di > 0 |
|
909
|
0 |
0 |
@_ ? : |
|
911
|
0 |
0 |
$self->{'_trans'} ? : |
|
919
|
0 |
0 |
@_ ? : |
|
921
|
0 |
0 |
$self->{'_trans'} ? : |
|
928
|
0 |
0 |
@_ ? : |
|
930
|
0 |
0 |
$self->{'_trans'} ? : |
|
942
|
0 |
0 |
$daysThusFar < 294 ? : |
|
|
0 |
0 |
$daysThusFar < 204 ? : |
|
|
0 |
0 |
$daysThusFar < 114 ? : |
|
|
0 |
0 |
if ($daysThusFar < 25) { } |
|
966
|
0 |
0 |
$self->{'_trans'} ? : |
|
|
0 |
0 |
$month == 13 ? : |
|
974
|
0 |
0 |
@_ ? : |
|
987
|
0 |
0 |
if @_ |