diff --git a/xCAT-server/lib/xcat/plugins/seqdiscovery.pm b/xCAT-server/lib/xcat/plugins/seqdiscovery.pm
index ab1d6e05f..10afe143d 100644
--- a/xCAT-server/lib/xcat/plugins/seqdiscovery.pm
+++ b/xCAT-server/lib/xcat/plugins/seqdiscovery.pm
@@ -960,7 +960,7 @@ Usage:
                 }
 
                 # remove entries which have method att been set
-                foreach my $_ (keys %methodlist) {
+                foreach (keys %methodlist) {
                     $distab->delEntries({method => $_});
                 }
                 $distab->commit();