Sha256: 2bb8f72ebefc736d1fc8797fb3226110747631a851268357cd8dc16852cc64b5
Contents?: true
Size: 675 Bytes
Versions: 29
Compression:
Stored size: 675 Bytes
Contents
#!/usr/bin/perl use strict; use warnings; use JSON; use File::Slurp; my $json = JSON->new; my $file = read_file('coveralls.json', { binmode => ':utf8' }); my $rv = $json->decode($file); my $sources = $rv->{'source_files'}; print STDERR join ", ", keys %{$rv}, "\n"; foreach my $source (sort { $a->{'name'} cmp $b->{'name'} } @{$sources}) { my $sum = 0; my $undefs = 0; my $coverages = $source->{'coverage'}; foreach my $coverage (@{$coverages}) { if (defined $coverage) { $sum += $coverage } else { $undefs ++; } } if ($sum > 0) { print STDERR $source->{'name'}; print STDERR " [sum: $sum]"; print STDERR " [undefs: $undefs]"; print STDERR "\n"; } }
Version data entries
29 entries across 29 versions & 2 rubygems