adminsuidsetup( $fs_user );
my $target_user = shift or die &usage;
-my $start = scalar(@_) && str2time(shift) or die &usage;
-my $stop = scalar(@_) ? str2time(shift) : time;
+my $start = shift or die &usage;
+$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;
=head1 NAME
-freeside-sqlradius-seconds - Real-time radacct import daemon
+freeside-sqlradius-seconds - Command line time-online tool
=head1 SYNOPSIS