Remove extra unused variable in util/dofile.pl

Reviewed-by: Rich Salz <rsalz@openssl.org>

diff --git a/util/dofile.pl b/util/dofile.pl
index 74d1520ed0f67063510948ba432fc2563bb60188..617c09ce6562cbee56a04cc8ea1c4b17bcca085e 100644 (file)
--- a/util/dofile.pl
+++ b/util/dofile.pl
@@ -83,7 +83,7 @@ sub broken {
 my $prev_linecount = 0;
 my $text =
     @ARGV
-    ? join("", map { my $x = my $y = Text::Template::_load_text($_);
+    ? join("", map { my $x = Text::Template::_load_text($_);
                      my $linecount = $x =~ tr/\n//;
                      $prev_linecount = ($linecount += $prev_linecount);
                      $lines{$linecount} = $_;