diff options
Diffstat (limited to 'importxml.pl')
| -rwxr-xr-x | importxml.pl | 35 |
1 files changed, 9 insertions, 26 deletions
diff --git a/importxml.pl b/importxml.pl index 63004af6f..19081e52b 100755 --- a/importxml.pl +++ b/importxml.pl @@ -1,35 +1,18 @@ -#!/usr/bin/perl -wT -# -*- Mode: perl; indent-tabs-mode: nil -*- +#!/usr/bin/perl -T +# This Source Code Form is subject to the terms of the Mozilla Public +# License, v. 2.0. If a copy of the MPL was not distributed with this +# file, You can obtain one at http://mozilla.org/MPL/2.0/. # -# The contents of this file are subject to the Mozilla Public -# License Version 1.1 (the "License"); you may not use this file -# except in compliance with the License. You may obtain a copy of -# the License at http://www.mozilla.org/MPL/ -# -# Software distributed under the License is distributed on an "AS -# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or -# implied. See the License for the specific language governing -# rights and limitations under the License. -# -# The Original Code is the Bugzilla Bug Tracking System. -# -# The Initial Developer of the Original Code is Netscape Communications -# Corporation. Portions created by Netscape are -# Copyright (C) 1998 Netscape Communications Corporation. All -# Rights Reserved. -# -# Contributor(s): Dawn Endico <endico@mozilla.org> -# Gregary Hendricks <ghendricks@novell.com> -# Vance Baarda <vrb@novell.com> -# Guzman Braso <gbn@hqso.net> -# Erik Purins <epurins@day1studios.com> -# Frédéric Buclin <LpSolit@gmail.com> +# This Source Code Form is "Incompatible With Secondary Licenses", as +# defined by the Mozilla Public License, v. 2.0. # This script reads in xml bug data from standard input and inserts # a new bug into bugzilla. Everything before the beginning <?xml line # is removed so you can pipe in email messages. +use 5.10.1; use strict; +use warnings; ##################################################################### # @@ -63,7 +46,7 @@ BEGIN { chdir(File::Basename::dirname($dir)); } -use lib qw(. lib); +use lib qw(. lib local/lib/perl5); # Data dumber is used for debugging, I got tired of copying it back in # and then removing it. #use Data::Dumper; |