MyAccount

<%= $url = "$selfurl?session=$session_id;action="; ''; %> <%= include('myaccount_menu') %> Service usage details

<%= if ( $error ) { $OUT .= qq!$error

!; } ''; %>
<%= if ($previous < $beginning) { $OUT .= qq!Previous period!; }else{ ''; } %> <%= if ($next > $ending) { $OUT .= qq!Next period!; }else{ ''; }%>
<%= my $total = 0; foreach my $usage ( @usage ) { $OUT .= ''; } my $h = int($total/3600); my $m = sprintf("%02d", int(($total % 3600) / 60)); my $s = sprintf("%02d", $total % 60); $OUT .= qq!!; $OUT .= qq!!; %>
Account Start Time Duration
'; $OUT .= $usage->{'username'}; $OUT .= ''; $OUT .= Date::Format::time2str('%T%P %a %b %o %Y', $usage->{'acctstarttime'}); $OUT .= ''; my $duration = $usage->{'acctstoptime'} - $usage->{'acctstarttime'}; $total += $duration; my $h = int($duration/3600); my $m = sprintf("%02d", int(($duration % 3600) / 60)); my $s = sprintf("%02d", $duration % 60); $OUT .= "$h:$m:$s"; $OUT .= '
========
$h:$m:$s


powered by freeside