Fix for bug 57848, perl warnings in several files.

colchange.cgi

@@ -23,6 +23,10 @@
 use diagnostics;
 use strict;
 
+sub sillyness { # shut up "used only once" warnings
+  my $zz = @::legal_keywords;
+}
+
 require "CGI.pl";
 
 print "Content-type: text/html\n";

importxml.pl

@@ -49,7 +49,7 @@ use strict;
 my $path = $0;
 $path =~ s#(.*)/[^/]+#$1#;
 chdir $path;
-use lib ($path);
+use lib "$path";
 
 use XML::Parser;
 use Data::Dumper;

move.pl

@@ -109,7 +109,7 @@ foreach my $id (split(/:/, $::FORM{'buglist'})) {
     SendSQL("INSERT INTO bugs_activity " .
             "(bug_id,who,bug_when,fieldid,oldvalue,newvalue) VALUES " .
             "($id,$exporterid,now(),$fieldid,'$cur_status','RESOLVED')");
-    my $fieldid = GetFieldID("resolution");
+    $fieldid = GetFieldID("resolution");
     my $cur_res= $bug->resolution;
     SendSQL("INSERT INTO bugs_activity " .
             "(bug_id,who,bug_when,fieldid,oldvalue,newvalue) VALUES " .