PageQueue.pm − 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.