diff --git a/perl-xCAT/xCAT/Utils.pm b/perl-xCAT/xCAT/Utils.pm
index 9de2d1386..351156f6f 100644
--- a/perl-xCAT/xCAT/Utils.pm
+++ b/perl-xCAT/xCAT/Utils.pm
@@ -5886,7 +5886,7 @@ sub getipaddr()
 
 #-------------------------------------------------------------------------------
 sub linklocaladdr {
-    my $mac = shift;
+    my ($class, $mac) = @_;
     $mac = lc($mac);
     my $localprefix = "fe80";