ActivePerl Documentation
Table of Contents
Getting Started
Welcome To ActivePerl Release Notes Readme ActivePerl Change Log Install Notes Linux Solaris Windows ActivePerl Components Overview PPM Windows Specifics OLE Browser PerlScript Perl for ISAPI PerlEZ ActivePerl FAQ Introduction Availability & Install Using PPM Docs & Support Windows Specifics Perl for ISAPI Windows 9X/NT/2000 Quirks Web Server Config Web programming Programming Modules & Samples Embedding & Extending Using OLE with Perl Windows Scripting Active Server Pages Windows Script Host Windows Script ComponentsCore Perl Documentation
perl perlfaq perltoc perlbook perlsyn perldata perlop perlreftut perldsc perllol perllexwarn perldebug perlrun perlfunc perlopentut perlvar perlsub perlmod perlpod perlstyle perlmodlib perlmodinstall perltrap perlport perlsec perlref perlre perlform perllocale perlunicode perlboot perltoot perltootc perlobj perlbot perltie perlipc perlnumber perlfork perlthrtut perldiag perlfaq1 perlfaq2 perlfaq3 perlfaq4 perlfaq5 perlfaq6 perlfaq7 perlfaq8 perlfaq9 perlcompile perlembed perlxstut perlxs perlguts perlcall perlfilter perldbmfilter perlapi perlintern perlapio perltodo perlhack perlhist perldelta perl5005delta perl5004delta perlamiga perlcygwin perldos perlhpux perlmachten perlos2 perlos390 perlvms perlwin32Pragmas
attributes attrs autouse base blib bytes charnames constant diagnostics fields filetest integer less lib locale lwpcook open ops overload perllocal re sigtrap strict subs utf8 vars warningsLibraries
ActivePerl DocTools TOC RDF AnyDBM_File Archive Tar AutoLoader AutoSplit B Asmdata Assembler Bblock Bytecode C CC Debug Deparse Disassembler Lint Showlex Stackobj Terse Xref Benchmark Bundle LWP ByteLoader Carp Heavy CGI Apache Carp Cookie Fast Pretty Push Switch Class Struct Compress Zlib Config CPAN FirstTime Nox Cwd Data Dumper DB Devel DProf Peek SelfStubber Digest HMAC HMAC_MD5 HMAC_SHA1 MD2 MD5 SHA1 DirHandle Dumpvalue DynaLoader English Env Errno Exporter Heavy ExtUtils Command Embed Install Installed Liblist MakeMaker Manifest Miniperl Mkbootstrap Mksymlists MM_Cygwin MM_OS2 MM_Unix MM_VMS MM_Win32 Packlist testlib Fatal Fcntl File Basename CheckTree Compare Copy CounterFile DosGlob Find Glob Listing Path Spec Functions Mac OS2 Unix VMS Win32 stat FileCache FileHandle FindBin Font AFM Getopt Long Std HTML AsSubs Element Entities Filter Form FormatPS Formatter FormatText HeadParser LinkExtor Parse Parser TokeParser TreeBuilder HTTP Cookies Daemon Date Headers Util Message Negotiate Request Common Response Status I18N Collate IO Dir File Handle Pipe Poll Seekable Select Socket INET UNIX IPC Msg Open2 Open3 Semaphore SysV LWP Debug MediaTypes MemberMixin Protocol RobotUA Simple UserAgent Math BigFloat BigInt Complex Trig MD5 MIME Base64 QuotedPrint NDBM_File Net Cmd Config Domain DummyInetd FTP hostent libnetFAQ netent Netrc NNTP PH Ping POP3 protoent servent SMTP SNPP Time O ODBM_File Opcode Pod Checker Find Html InputObjects Man Parser ParseUtils Plainer Select Text Color Termcap Usage POSIX PPM SOAPClient SOAPServer Safe SDBM_File Search Dict SelectSaver SelfLoader SHA Shell SOAP Defs Envelope EnvelopeMaker GenericHashSerializer GenericInputStream GenericScalarSerializer Lite OutputStream Packager Parser Transport HTTP Apache CGI Client Server LOCAL MAILTO POP3 TCP TypeMapper Socket Symbol Sys Hostname Syslog Term ANSIColor Cap Complete ReadLine Test Harness Text Abbrev ParseWords Soundex Tabs Wrap Thread Queue Semaphore Signal Specific Tie Array Handle Hash RefHash Scalar SubstrHash Time gmtime Local localtime tm UDDI Lite UNIVERSAL URI data Escape file Heuristic ldap URL WithBase User grent pwent Win32 AuthenticateUser ChangeNotify Clipboard Console Event EventLog File FileSecurity Internet IPC Mutex NetAdmin NetResource ODBC OLE Const Enum NEWS NLS TPJ Variant PerfLib Pipe Process Registry Semaphore Service Sound TieRegistry Win32API File Net Registry WWW RobotRules AnyDBM_File XML Element Parser Expat PPD PPMConfig ValidatingElement XSLoader|
Thread::Queue - thread-safe queues |
NAME
Thread::Queue - thread-safe queues
SUPPORTED PLATFORMS
- Linux
- Solaris
- Windows
SYNOPSIS
use Thread::Queue;
my $q = new Thread::Queue;
$q->enqueue("foo", "bar");
my $foo = $q->dequeue; # The "bar" is still in the queue.
my $foo = $q->dequeue_nb; # returns "bar", or undef if the queue was
# empty
my $left = $q->pending; # returns the number of items still in the queue
DESCRIPTION
A queue, as implemented by Thread::Queue is a thread-safe data structure
much like a list. Any number of threads can safely add elements to the end
of the list, or remove elements from the head of the list. (Queues don't
permit adding or removing elements from the middle of the list)
FUNCTIONS AND METHODS
- new
-
The
newfunction creates a new empty queue. - enqueue LIST
-
The
enqueuemethod adds a list of scalars on to the end of the queue. The queue will grow as needed to accomodate the list. - dequeue
-
The
dequeuemethod removes a scalar from the head of the queue and returns it. If the queue is currently empty,dequeuewill block the thread until another threadenqueues a scalar. - dequeue_nb
-
The
dequeue_nbmethod, like thedequeuemethod, removes a scalar from the head of the queue and returns it. Unlikedequeue, though,dequeue_nbwon't block if the queue is empty, instead returningundef. - pending
-
The
pendingmethod returns the number of items still in the queue. (If there can be multiple readers on the queue it's best to lock the queue before checking to make sure that it stays in a consistent state)
SEE ALSO
=cut
sub new { my $class = shift; return bless [@_], $class; }
sub dequeue : locked : method { my $q = shift; cond_wait $q until @$q; return shift @$q; }
sub dequeue_nb : locked : method { my $q = shift; if (@$q) { return shift @$q; } else { return undef; } }
sub enqueue : locked : method { my $q = shift; push(@$q, @_) and cond_broadcast $q; }
sub pending : locked : method { my $q = shift; return scalar(@$q); }
1;
|
Thread::Queue - thread-safe queues |