Remove superfluous variable copy

Author: JRaspass

Changes

@@ -5,6 +5,7 @@ Change history for HTML-Form
     - Replace "use vars" with "our" (GH#34) (James Raspass)
     - Remove superfluous "use lib" (GH#35) (James Raspass)
     - Replace "Test" with "Test::More" (GH#36) (James Raspass)
+    - Remove superfluous variable copy (GH#37) (James Raspass)
 
 6.08      2022-08-14 09:26:10Z
     - Remove Authority section from dist.ini (GH#27) (Olaf Alders)

lib/HTML/Form.pm

@@ -397,8 +397,7 @@ charset as specified by the 'charset' parameter of the parse() method.
 
 BEGIN {
     # Set up some accessors
-    for (qw(method action enctype accept_charset)) {
-	my $m = $_;
+    for my $m (qw(method action enctype accept_charset)) {
 	no strict 'refs';
 	*{$m} = sub {
 	    my $self = shift;