to fix bug 2866271, add my = shift; at the beginning of sshcfg()

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@4222 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd

perl-xCAT/xCAT/PPCcfg.pm

@@ -264,7 +264,7 @@ sub cfg {
 # Enables/disables/displays SSH access to HMC/IVM  
 ##########################################################################
 sub sshcfg {
-
+    my $request = shift;
     my $exp     = shift;
     my $mode    = shift;
     my $server  = @$exp[3];