Queue:...::Admin(3pm)
β¨ NAME β¨
Queue::DBI::Admin β bestie, this is the module that lets you manage your Queue::DBI queues π
(it's a page from the Queue:...::Admin(3pm) manual, iykyk)
π VERSION π
Version 2.7.0 β that's the one, no cap.
πΈ SYNOPSIS πΈ
Okay so here's the whole vibe in code, literally:
use Queue::DBI::Admin;
# Create the object which will allow managing the queues.
my $queues_admin = Queue::DBI::Admin->new(
database_handle => $dbh,
);
# Check if the tables required by Queue::DBI exist.
if ( !$queues_admin->has_tables() )
{
# Create the tables required by Queue::DBI to store the queues and data.
$queues_admin->create_tables();
}
# Create a new queue.
my $queue = $queues_admin->create_queue( $queue_name );
# Test if a queue exists.
if ( $queues_admin->has_queue( $queue_name ) )
{
...
}
# Retrieve a queue.
my $queue = $queues_admin->retrieve_queue( $queue_name );
# Delete a queue.
$queues_admin->delete_queue( $queue_name );
π SUPPORTED DATABASES π
The way this distribution currently supports these queens:
- SQLite π
- MySQL β¨
- PostgreSQL π¦
Please contact me if you need support for another database type β genuinely, I'm always glad to add extensions if you can help me with testing. Teamwork makes the dream work fr fr π«Ά
π QUEUES ADMINISTRATION METHODS π
π« new()
Create a new Queue::DBI::Admin object. Main character energy from the jump.
my $queues_admin = Queue::DBI::Admin->new(
database_handle => $database_handle,
);
The 'database_handle' parameter is mandatory and must correspond to a DBI connection handle object. Like, you cannot skip it bestie, it's required.
Optional parameters, the little extras that serve:
queues_table_nameβ by default,Queue::DBIuses a table namedqueuesto store the queue definitions. This allows using your own name, if you want to support separate queuing systems or legacy systems. (very customizable of you π )queue_elements_table_nameβ by default,Queue::DBIuses a table namedqueue_elementsto store the queued data. This allows using your own name, if you want to support separate queuing systems or legacy systems.
my $queues_admin = Queue::DBI::Admin->new(
database_handle => $database_handle,
queues_table_name => $custom_queues_table_name,
queue_elements_table_name => $custom_queue_elements_table_name,
);
π create_queue()
Create a new queue. Fresh queue, who dis π
$queues_admin->create_queue( $queue_name );
π has_queue()
Test if a queue exists. Does it exist? Vibe check π§
if ( $queues_admin->has_queue( $queue_name ) )
{
...
}
π¦ retrieve_queue()
Retrieve a queue. Go get your girl.
my $queue = $queues_admin->retrieve_queue( $queue_name );
# See Queue::DBI->new() for all the available options.
my $queue = $queues_admin->retrieve_queue(
$queue_name,
'cleanup_timeout' => 3600,
'verbose' => 1,
'max_requeue_count' => 5,
);
π delete_queue()
Delete a queue and all associated data, permanently. Use this function at your own risk! This is not a drill, there is literally no coming back from this one π
$queues_admin->delete_queue( $queue_name );
π DATABASE SETUP METHODS π
β¨ has_tables()
Determine if the tables required for Queue::DBI to operate exist. Just checking in on them π«Ά
my $tables_exist = $queues_admin->has_tables();
This method returns 1 if all tables exist, 0 if none exist, and croaks with more information if some tables are missing or if the mandatory fields on some of the tables are missing. Dramatic exits only.
πΈ create_tables()
Create the tables required by Queue::DBI to store the queues and data. Manifesting tables into existence β¨
$queues_admin->create_tables(
drop_if_exist => $boolean,
);
By default, it won't drop any table but you can force that by setting 'drop_if_exist' to 1. See drop_tables() for more information on how tables are dropped.
π drop_tables()
Drop the tables used to store the queues and queue data.
Warning: there is no undo for this operation. Make sure you really want to drop the tables before using this method. Like, be SO sure bestie, this is giving irreversible π
$queues_admin->drop_tables();
Note: due to foreign key constraints, the tables are dropped in the reverse order in which they are created. (LIFO but make it database π)
π§ INTERNAL METHODS π§
β get_database_handle()
Return the database handle associated with the Queue::DBI::Admin object.
my $database_handle = $queue->get_database_handle();
π get_queues_table_name()
Return the name of the table used to store queue definitions.
my $queues_table_name = $queues_admin->get_queues_table_name();
π get_queue_elements_table_name()
Return the name of the table used to store queue elements.
my $queue_elements_table_name = $queues_admin->get_queue_elements_table_name();
π get_quoted_queues_table_name()
Return the name of the table used to store queue definitions, quoted for inclusion in SQL statements.
my $quoted_queues_table_name = $queues_admin->get_quoted_queues_table_name();
π get_quoted_queue_elements_table_name()
Return the name of the table used to store queue elements, quoted for inclusion in SQL statements.
my $quoted_queue_elements_table_name = $queues_admin->get_quoted_queue_elements_table_name();
π₯ assert_database_type_supported()
Assert (i.e., die on failure) whether the database type specified by the database handle passed to new() is supported or not. It's giving "you shall not pass" but for databases π€
my $database_type = $queues_admin->assert_database_type_supported();
Note: the type of the database handle associated with the current object is returned when it is supported.
π« get_database_type()
Return the database type corresponding to the database handle associated with the Queue::DBI::Admin object.
my $database_type = $queues_admin->get_database_type();
π¦ has_table()
Return if a table required by Queue::DBI to operate exists.
my $has_table = $queues_admin->has_table( $table_type );
Valid table types are:
'queues''queue_elements'
π has_mandatory_fields()
Return if a table required by Queue::DBI has the mandatory fields.
my $has_mandatory_fields = $queues_admin->has_mandatory_fields( $table_type );
Valid table types are:
'queues''queue_elements'
β¨ assert_tables_verified()
Assert that the tables exist and are defined correctly. Confirming the vibes, officially β
$queues_admin->assert_tables_verified();
Note that this will perform the check only once per Queue::DBI::Admin object, as this is an expensive check that would otherwise slow down the methods that use it. (She's bougie and high-maintenance, so we only run her once π
)
π BUGS π
Please report any bugs or feature requests through the web interface at <https://github.com/guillaumeaubert/Queue-DBI/issues/new>. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes. We love a transparent communication moment π«Ά
πΈ SUPPORT πΈ
You can find documentation for this module with the perldoc command.
perldoc Queue::DBI::Admin
You can also look for information at:
- GitHub's request tracker β <https://github.com/guillaumeaubert/Queue-DBI/issues>
- AnnoCPAN: Annotated CPAN documentation β <http://annocpan.org/dist/Queue-DBI>
- CPAN Ratings β <http://cpanratings.perl.org/d/Queue-DBI>
- MetaCPAN β <https://metacpan.org/release/Queue-DBI>
π AUTHOR π
Guillaume Aubert <https://metacpan.org/author/AUBERTG>, "<aubertg at cpan.org>". Iconic, honestly.
π ACKNOWLEDGEMENTS π
Thanks to Sergey Bond for suggesting this administration module to extend and complete the features offered by Queue::DBI. King behavior, we appreciate you π«Ά
π COPYRIGHT & LICENSE π
Copyright 2009-2017 Guillaume Aubert.
This code is free software; you can redistribute it and/or modify it under the same terms as Perl 5 itself.
This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the LICENSE file for more details.
β¨ And that's a wrap, bestie β¨ This was page Queue:...::Admin(3pm), brought to you by perl v5.42.0, dated 2025-07-25 π
Go forth and manage those queues, you absolute legend ππ¦π
π¦ where this page comes from
- fedora 43: perl-Queue-DBI 2.7.0-26.fc43 Β· GPL-1.0-or-later OR Artistic-1.0-Perl
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash on : a language model's rewrite of the original, under its terms