Path: usenet.cise.ufl.edu!huron.eel.ufl.edu!usenet.eel.ufl.edu!www.nntp.primenet.com!globalcenter0!news.primenet.com!nntp.primenet.com!newsfeed.direct.ca!logbridge.uoregon.edu!nntp.teleport.com!news.teleport.com!not-for-mail
From:
[email protected] (Dan Sugalski)
Newsgroups: comp.lang.perl.announce,comp.lang.perl.modules
Subject: ANNOUCE: VMS::Queue 0.03 (Beta release)
Followup-To: comp.lang.perl.modules
Date: 2 Jan 1998 23:52:51 GMT
Organization: Oregon State System of Higher Education
Lines: 30
Sender:
[email protected]
Approved:
[email protected] (comp.lang.perl.announce)
Message-ID: <
[email protected]>
NNTP-Posting-Host: gadget.cscaper.com
Keywords: $GETQUI $SNDJBC VMS queue management
X-Disclaimer: The "Approved" header verifies header information for article transmission and does not imply approval of content.
Xref: usenet.cise.ufl.edu comp.lang.perl.announce:31 comp.lang.perl.modules:867
This is the first public beta release of VMS::Queue, a module that
provides functions to list, create, delete, modify, and get information on
VMS queues, queue managers, queue entries, queue characteristics, and
forms.
The create and modify functions are currently unimplemented, as are the
selective capabilities of the list functions (a script can fetch a list of
all entries, queues, queue managers, forms, or characteristics, but not a
subset of them yet)
The listing, information, and deletion routines are fully functional,
though--it's easy enough to do something like this:
use VMS::Queue;
@EntryList = VMS::Queue::entry_list();
foreach $entrynum (@EntryList) {
$keyhash = VMS::Queue::entry_info($entrynum);
print "$keyhash->{ACCOUNT_NAME}\t$keyhash->{ENTRY_NUMBER}\t$keyhash->{JOB_NAME}\n";
}
and list out the account, entry number, and job name for all entries in
all queues.
The archive for this module is currently on (or on its way) CPAN, at
$CPAN/modules/by-authors/Dan_Sugalski/VMS_Queue-0_03.zip. Feedback, both
good and bad, is encouraged and very welcome.
Dan
