From 98ad74eb8cdf3ce584e496e65d6ea6b2af67cde1 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Wed, 5 Mar 2014 16:19:27 -0800 Subject: [PATCH] use warnings and strict use lib basename instead of require --- scanlib.pm | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/scanlib.pm b/scanlib.pm index 03347cf..4705946 100644 --- a/scanlib.pm +++ b/scanlib.pm @@ -10,6 +10,9 @@ # %section - map from packagename to section in the FTP-site # %packagelist - map from packagename to bugreports +use warnings; +use strict; + use lib qw(/org/bugs.debian.org/perl); use LWP::UserAgent; use Debbugs::MIME qw(decode_rfc1522 encode_rfc1522); @@ -17,9 +20,11 @@ use Debbugs::Packages; use Debbugs::Versions; use Debbugs::Status; use Fcntl qw(O_RDONLY); -use strict; -use warnings; -require bugcfg; + +use File::Basename; +use lib dirname(__FILE__); +use bugcfg; + package scanlib; our (%maintainer,%section,%packagelist,%debbugssection,%bugs); -- 2.39.2