<%= include('header', ($inbound ? 'Received calls' : 'Dialed calls' ) . ' for '. Date::Format::time2str('%b %o %Y', $beginning). ' - '. Date::Format::time2str('%b %o %Y', $ending) ) %> <%= if ( $error ) { $OUT .= qq!$error

!; } ''; %>

<%= $ahref = qq!Previous period!; } else { ''; } %>

<%= if ($next > $ending) { $OUT .= $ahref. qq!beginning=$ending;ending=$next">Next period!; } else { ''; } %>

<%= $space = ''; $OUT .= join($space, map { '' } @header ) %> <%= my $total = 0; my $utotal = 0; my $dtotal = 0; foreach my $usage ( @usage ) { $OUT .= ''; $OUT .= join($space, map { "" } @{$usage} ); $OUT .= ''; } %>

	'.$_.'
$_

<%= include('footer') %>