Development Page--Not for Official Use
PDB::OpenLogs()
$now = time;
$line = $form{'line'};
@stnlist = split(/[\s,]+/,$form{'stnlist'});
@idlist = PDB::IdList($now,@stnlist);
@outlist = split(/[\s,]+/,$form{'outlist'} || '-');
$timeout = $form{'timeout'} || 20;
$retries = $form{'retries'} || 3;
$when = $form{'when'};
$| = 1;
PDB::Alert(alert=>'note',msg=>"started");
PDB::OpenLogs(@outlist);
<< Note | PerlModules | PageList >>