diff --git a/perl-xCAT/xCAT/PPCmac.pm b/perl-xCAT/xCAT/PPCmac.pm
index aeefca889..1ad1402aa 100644
--- a/perl-xCAT/xCAT/PPCmac.pm
+++ b/perl-xCAT/xCAT/PPCmac.pm
@@ -488,7 +488,9 @@ sub getmacs {
                 #########################################
                 # Write MAC address to database
                 #########################################
-                writemac( $node, $value );
+                if ( !exists( $opt->{d} )) {
+                    writemac( $node, $value );
+                }
 
                 foreach ( @$value ) {
                     if ( /^#\s?Type/ ) {