# Module Initialization
############################################################################
-use diagnostics;
use strict;
package Attachment;
# Terry Weissman <terry@mozilla.org>
# Chris Yeh <cyeh@bluemartini.com>
-use diagnostics;
use strict;
use DBI;
# Module Initialization
############################################################################
-use diagnostics;
use strict;
package Attachment;
# Terry Weissman <terry@mozilla.org>
# Chris Yeh <cyeh@bluemartini.com>
-use diagnostics;
use strict;
use DBI;
# might involve turning this into a virtual base class, and having
# UserSet and KeywordSet types that inherit from it.
-use diagnostics;
use strict;
# Everything that uses RelationSet should already have globals.pl loaded
# Myk Melez <myk@mozilla.org>
# Michael Schindler <michael@compressconsult.com>
-use diagnostics;
use strict;
require "globals.pl";
################################################################################
# Make it harder for us to do dangerous things in Perl.
-use diagnostics;
use strict;
# Bundle the functions in this file together into the "Token" package.
trim);
use strict;
-use diagnostics;
=head1 FUNCTIONS
# Contains some global routines used throughout the CGI scripts of Bugzilla.
-use diagnostics;
use strict;
use lib ".";
# might involve turning this into a virtual base class, and having
# UserSet and KeywordSet types that inherit from it.
-use diagnostics;
use strict;
# Everything that uses RelationSet should already have globals.pl loaded
################################################################################
# Make it harder for us to do dangerous things in Perl.
-use diagnostics;
use strict;
# Bundle the functions in this file together into the "Token" package.
################################################################################
# Make it harder for us to do dangerous things in Perl.
-use diagnostics;
use strict;
use lib qw(.);
# Dave Miller <justdave@syndicomm.com>
# Vaskin Kissoyan <vkissoyan@yahoo.com>
-use diagnostics;
use strict;
use RelationSet;
################################################################################
# Make it harder for us to do dangerous things in Perl.
-use diagnostics;
use strict;
use lib qw(.);
# Global definitions
###########################################################################
-use diagnostics;
use strict;
# 12/17/00 justdave@syndicomm.com - removed declarations of the localconfig
# Contributor(s): Terry Weissman <terry@mozilla.org>
# Gervase Markham <gerv@gerv.net>
-use diagnostics;
use strict;
use lib qw(.);
use AnyDBM_File;
-use diagnostics;
use strict;
use vars @::legal_product;
require "globals.pl";
-use diagnostics;
use strict;
my $EMAIL_TRANSFORM_NONE = "email_transform_none";
#
# You need to work with bug_email.pl the MIME::Parser installed.
#
-# $Id: bug_email.pl,v 1.12 2002/08/17 14:19:57 bbaetz%student.usyd.edu.au Exp $
+# $Id: bug_email.pl,v 1.13 2002/08/26 06:17:21 bbaetz%student.usyd.edu.au Exp $
###############################################################
# 02/12/2000 (SML)
# - integrate some setup in the checksetup.pl script
# - gpg signatures for security
-use diagnostics;
use strict;
use MIME::Parser;
# 1. better way to get the body text (I don't know what dump_entity() is
# actually doing
-use diagnostics;
use strict;
use MIME::Parser;
# mysqld-watcher.pl - a script that watches the running instance of
# mysqld and kills off any long-running SELECTs against the shadow_db
#
-use diagnostics;
use strict;
# some configurables:
# Christopher Aillon <christopher@aillon.com>
# Gervase Markham <gerv@gerv.net>
-use diagnostics;
use strict;
use lib qw(.);
# Only adding new parameters is done here. Once the parameter exists, you
# must use %baseurl%/editparams.cgi from the web to edit the settings.
-use diagnostics;
use strict;
# Shut up misguided -w warnings about "used only once". For some reason,
$userid
);
-use diagnostics;
use strict;
use lib qw(.);
# Contributor(s): Terry Weissman <terry@mozilla.org>
# Contributor(s): Gervase Markham <gerv@gerv.net>
-use diagnostics;
use strict;
use lib ".";
# Contributor(s): Terry Weissman <terry@mozilla.org>
# J. Paul Reed <preed@sigkill.com>
-use diagnostics;
use strict;
use lib qw(.);
# Generates mostfreq list from data collected by collectstats.pl.
-use diagnostics;
use strict;
use AnyDBM_File;
################################################################################
# Make it harder for us to do dangerous things in Perl.
-use diagnostics;
use strict;
use lib ".";
#
# Holger Schurig <holgerschurig@nikocity.de>
-use diagnostics;
use strict;
use lib ".";
# Code derived from editowners.cgi and editusers.cgi
-use diagnostics;
use strict;
use lib ".";
#
# Contributor(s): Terry Weissman <terry@mozilla.org>
-use diagnostics;
use strict;
use lib ".";
#
-use diagnostics;
use strict;
use lib ".";
# J. Paul Reed <preed@sigkill.com>
-use diagnostics;
use strict;
use lib ".";
#
# Holger Schurig <holgerschurig@nikocity.de>
-use diagnostics;
use strict;
use lib ".";
#
# Holger Schurig <holgerschurig@nikocity.de>
-use diagnostics;
use strict;
use lib ".";
#
# Holger Schurig <holgerschurig@nikocity.de>
-use diagnostics;
use strict;
use lib ".";
#
##############################################################################
-use diagnostics;
use strict;
use lib qw(.);
# Contains some global variables and routines used throughout bugzilla.
-use diagnostics;
use strict;
use Bugzilla::Util;
# a new bug into bugzilla. Everything before the beginning <?xml line
# is removed so you can pipe in email messages.
-use diagnostics;
use strict;
#####################################################################
###############################################################################
# Make it harder for us to do dangerous things in Perl.
-use diagnostics;
use strict;
# Include the Bugzilla CGI and general utility library.
# Contributor(s): Terry Weissman <terry@mozilla.org>
# Gervase Markham <gerv@gerv.net>
-use diagnostics;
use strict;
use lib qw(.);
# Contributor(s): Dawn Endico <endico@mozilla.org>
# Terry Weissman <terry@mozilla.org>
-use diagnostics;
use strict;
use lib qw(.);
# either case), numbers 0-9, the underscore "_" and the hyphen "-".
###############################################################################
-use diagnostics;
use strict;
use lib ".";
# Joe Robins <jmrobins@tgix.com>
# Gervase Markham <gerv@gerv.net>
-use diagnostics;
use strict;
use lib qw(.);
# Christopher Aillon <christopher@aillon.com>
# Myk Melez <myk@mozilla.org>
-use diagnostics;
use strict;
my $UserInEditGroupSet = -1;
# Jacob Steenhagen <jake@actex.net>
# Matthew Tuck <matty@chariot.net.au>
-use diagnostics;
use strict;
use lib ".";
# Matthias Radestock <matthias@sorted.org>
# Gervase Markham <gerv@gerv.net>
-use diagnostics;
use strict;
use lib ".";
use vars %::FORM;
-use diagnostics;
use strict;
use lib qw(.);
# Gervase Markham <gerv@gerv.net>
# David Fallon <davef@tetsubo.com>
-use diagnostics;
use strict;
use vars qw(
# Contributor(s): Terry Weissman <terry@mozilla.org>
# Gervase Markham <gerv@gerv.net>
-use diagnostics;
use strict;
use vars %::COOKIE;
# Myk Melez <myk@mozilla.org):
# Implemented form field validation and reorganized code.
-use diagnostics;
use strict;
use lib qw(.);
# Contributor(s): Terry Weissman <terry@mozilla.org>
# Matthew Tuck <matty@chariot.net.au>
-use diagnostics;
use strict;
use lib qw(.);
# Myk Melez <myk@mozilla.org>
# Gervase Markham <gerv@gerv.net>
-use diagnostics;
use strict;
use lib qw(.);
#
# Contributor(s): Terry Weissman <terry@mozilla.org>
-use diagnostics;
use strict;
use lib qw(.);
# Contributor(s): Terry Weissman <terry@mozilla.org>
# Jacob Steenhagen <jake@acutex.net>
-use diagnostics;
use strict;
use lib qw(.);
# Contributor(s): Terry Weissman <terry@mozilla.org>
# Gervase Markham <gerv@gerv.net>
-use diagnostics;
use strict;
use lib qw(.);
# Christian Reis <kiko@async.com.br>
# Myk Melez <myk@mozilla.org>
-use diagnostics;
use strict;
use lib qw(.);
# Contributor(s): Jacob Steenhagen <jake@acutex.net>
use strict;
-use diagnostics;
use lib ".";
require "CGI.pl";
# Contributor(s): Terry Weissman <terry@mozilla.org>
# David Gardiner <david.gardiner@unisa.edu.au>
-use diagnostics;
use strict;
require "globals.pl";
package Support::Templates;
-use diagnostics;
use strict;
use lib 't';
############################################################################
# Make it harder for us to do dangerous things in Perl.
-use diagnostics;
use strict;
use lib qw(.);
# Christopher Aillon <christopher@aillon.com>
# Gervase Markham <gerv@gerv.net>
-use diagnostics;
use strict;
use lib qw(.);
# Christopher Aillon <christopher@aillon.com>
# Gervase Markham <gerv@gerv.net>
-use diagnostics;
use strict;
use lib ".";
# assigned to them that has status NEW that has not been touched for
# more than 7 days.
-use diagnostics;
use strict;
require "globals.pl";
# Terry Weissman <terry@mozilla.org>
# Gervase Markham <gerv@gerv.net>
-use diagnostics;
use strict;
use lib qw(.);