Added function to print to syslog.

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

perl-xCAT/xCAT/zvmUtils.pm

@@ -294,6 +294,29 @@ sub printLn {
 
 #-------------------------------------------------------
 
+=head3   printSyslog
+
+    Description : Print a string to syslog
+    Arguments   : String
+    Returns     : Nothing
+    Example     : xCAT::zvmUtils->printSyslog($str);
+    
+=cut
+
+#-------------------------------------------------------
+sub printSyslog {
+
+    # Get inputs
+    my ( $class, $str ) = @_;
+
+    # Print string
+    xCAT::MsgUtils->message( "S", $str );
+
+    return;
+}
+
+#-------------------------------------------------------
+
 =head3   isZvmNode
 
     Description : Determines if a given node is in the 'zvm' table