| WWW::Bugzilla(3pm) | User Contributed Perl Documentation | WWW::Bugzilla(3pm) |
WWW::Bugzilla - Handles submission/update of bugzilla bugs via WWW::Mechanize.
use WWW::Bugzilla;
# create new bug
my $bz = WWW::Bugzilla->new( server => 'www.mybugzilla.com',
email => 'buguser@bug.com',
password => 'mypassword' );
# enter info into some fields and save new bug
# get list of available version choices
my @versions = $bz->available('version');
# set version
$bz->version( $versions[0] );
# get list of available products
my @products = $bz->available('product');
# set product
$bz->product( $products[0] );
# get list of components available
my @components = $bz->available('component');
# set component
$bz->component( $components[0] );
# optionally do the same for platform, os, priority, severity.
$bz->assigned_to( 'joeschmoe@whatever.com' );
$bz->summary( $some_text );
$bz->description( $some_more_text );
# submit bug, returning new bug number
my $bug_number = $bz->commit;
# all of the above could have been done in a much easier
# way, had we known what values to use. See below:
my $bz = WWW::Bugzilla->new( server => 'www.mybugzilla.com',
email => 'buguser@bug.com',
password => 'mypassword'
version => 'Alpha',
product => 'MyProduct',
component => 'API',
assigned_to => 'joeschmoe@whatever.com',
summary => $some_text,
description => $some_more_text);
my $bug_number = $bz->commit;
# Below is an example of how one would update a bug.
my $bz = WWW::Bugzilla->new( server => 'www.mybugzilla.com',
email => 'buguser@bug.com',
password => 'mypassword'
bug_number => 46 );
# show me the chosen component
my $component = $bz->component;
# change component
$bz->component( 'Test Failures' );
$bz->add_cc( 'me@me.org' );
$bz->add_attachment( filepath => '/home/me/file.txt',
description => 'description text',
is_patch => 0,
comment => 'comment text here' );
$bz->additional_comments( "comments here");
# below are examples of changing bug status
$bz->change_status("assigned");
$bz->change_status("fixed");
$bz->change_status("later");
$bz->mark_as_duplicate("12");
$bz->reassign("someone@else.com");
$bz->commit;
WWW::Bugzilla currently provides an API to posting new Bugzilla bugs, as well as updating existing Bugzilla bugs.
NOTE: This option requires Crypt::SSLeay.
product platform os version priority severity component target_milestone
assigned fixed invalid wontfix later remind worksforme reopen verified closed
There may well be bugs in this module. Using it as I have, I just have not run into any. In addition, this module does not support ALL of Bugzilla's features. I will consider any patches or improvements, just send me an email at the address listed below.
Maintained by:
Brian Caswell, bmc@shmoo.com
Originally written by:
Matthew C. Vella, the_mcv@yahoo.com
WWW::Bugzilla - Module providing API to create or update Bugzilla bugs.
Copyright (C) 2003 Matthew C. Vella (the_mcv@yahoo.com)
Portions Copyright (C) 2006 Brian Caswell (bmc@shmoo.com)
This module is free software; you can redistribute it and/or modify it
under the terms of either:
a) the GNU General Public License as published by the Free Software
Foundation; either version 1, or (at your option) any later version,
or
b) the "Artistic License" which comes with this module.
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 either
the GNU General Public License or the Artistic License for more details.
You should have received a copy of the Artistic License with this
module, in the file ARTISTIC. If not, I'll be glad to provide one.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
USA
| 2018-07-11 | perl v5.26.2 |