my $target_user = shift or die &usage;
my $start = shift or die &usage;
-my $stop = shift || time;
+$start = str2time($start);
+my $stop = scalar(@ARGV) ? str2time(shift) : time;
my $svc_acct = qsearchs( 'svc_acct', { 'username' => $target_user } );
die "username $target_user not found\n" unless $svc_acct;
-print $svc_acct->seconds_since_sqlradacct( str2time($start), str2time($stop) );
+print $svc_acct->seconds_since_sqlradacct( $start, $stop ). "\n";
sub usage {
die "Usage:\n\n freeside-sqlradius-seconds freeside_username target_username start_date stop_date\n";