% no warnings 'uninitialized'; DMA - OPF Report

OPF Upload Notice - <%= $specs->{datetime} %>

Metric Previous Current Diff
Time <%= $specs->{last}->{datetime} %> <%= $specs->{new}->{datetime} %> <%= $specs->{diff}->{mtime} %> minutes
Size <%= $specs->{last}->{size} %> <%= $specs->{new}->{size} %> <%= $specs->{diff}->{size} %>
Line Count <%= $specs->{last}->{rowcnt} %> <%= $specs->{new}->{rowcnt} %> <%= $specs->{diff}->{rowcnt} %>
Active <%= $specs->{last}->{active} %> <%= $specs->{new}->{active} %> <%= $specs->{diff}->{active} %>
Inactive <%= $specs->{last}->{inactive} %> <%= $specs->{new}->{inactive} %> <%= $specs->{diff}->{inactive} %>
BackOffice System Count <%= $specs->{last}->{systemcnt} %> <%= $specs->{new}->{systemcnt} %> <%= $specs->{diff}->{systemcnt} %>

View/Download OPF

% my @lines = @{ $specs->{diff}->{filediff} };
% @lines = reverse(@lines);
% foreach my $l (@lines){
% if($l =~ /^(<|>)/){
% $l =~ s/\t/\|/g;
<%= $l %>
% }
% }