Extends the queue module, adding the page module smarts
$pqueue=Sendpage::PageQueue($config); # read waiting pages while ($fh=$pqueue->getPage($db)) { # build up $page @stuff=$pqueue->pullPageFromFile($db,$fh); $page=Sendpage::Page->new(@stuff); # do something to change $page # write changes back to queue $pqueue->writePage($page); $pqueue->fileDone(); } # add a new page $fh=$pqueue->addPage($page);
This is a module for use in sendpage\|(1).
Obviously, needs more docs.
Kees Cook <[email protected]>
perl\|(1), sendpage\|(1), Sendpage::KeesConf\|(3), Sendpage::KeesLog\|(3), Sendpage::Modem\|(3), Sendpage::PagingCentral\|(3), Sendpage::Page\|(3), Sendpage::Recipient\|(3), Sendpage::Queue\|(3)
Copyright 2000 Kees Cook.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.