projects
/
freeside.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
a5f67cda44182e581a3cab92aa28cd909033ec6d
[freeside.git]
/
bin
/
billco-upload
1
#!/usr/bin/perl
2
3
use FS::UID qw(adminsuidsetup);
4
use FS::Cron::upload;
5
6
adminsuidsetup shift or die "usage: billco-upload username agentnum\n";
7
my $agentnum = shift or die "usage: billco-upload username agentnum\n";
8
9
FS::Cron::upload::billco_upload( 'agentnum' => $agentnum,
10
'date' => time,
11
'v' => 1,
12
'l' => 2,
13
);
14
15
1;