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.