diff --git a/perl-xCAT-2.0/xCAT/PPCboot.pm b/perl-xCAT-2.0/xCAT/PPCboot.pm
index fe986698c..cb5f145f4 100644
--- a/perl-xCAT-2.0/xCAT/PPCboot.pm
+++ b/perl-xCAT-2.0/xCAT/PPCboot.pm
@@ -259,7 +259,7 @@ sub rnetboot {
                            $d,
                            \%opt );
     }
-    my $Rc = shift(@$result);
+    $Rc = shift(@$result);
 
     ##################################
     # Form string from array results