From b480171f138a1a3f4be9afe70c84fb17d8c305c6 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?G=E1=B4=8F=C9=B4=C9=A2=20Jie?= <gongjie@linux.vnet.ibm.com>
Date: Fri, 27 Jul 2018 14:29:35 +0800
Subject: [PATCH] Fix github issue #5381. Use File::Temp::tmpnam() instead of
 POSIX::tmpnam(). (#5440)

---
 perl-xCAT/xCAT/DSHCLI.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/perl-xCAT/xCAT/DSHCLI.pm b/perl-xCAT/xCAT/DSHCLI.pm
index 631b412c2..9c42d2977 100644
--- a/perl-xCAT/xCAT/DSHCLI.pm
+++ b/perl-xCAT/xCAT/DSHCLI.pm
@@ -14,6 +14,7 @@ use File::Basename;
 use locale;
 use strict;
 use File::Path;
+use File::Temp;
 use POSIX;
 use Socket;
 use Getopt::Long;
@@ -1229,7 +1230,7 @@ sub fork_fanout_dsh
                 $rsp->{data}->[0] = "TRACE: Environment option specified";
                 $dsh_trace && (xCAT::MsgUtils->message("I", $rsp, $::CALLBACK));
                 my %env_rcp_config = ();
-                $tmp_env_file = POSIX::tmpnam . '.dsh';
+                $tmp_env_file = File::Temp::tmpnam . '.dsh';
                 $rsh_config{'command'} .= ". $tmp_env_file ; ";
 
                 $env_rcp_config{'src-file'}  = $$options{'environment'};
@@ -1280,7 +1281,7 @@ sub fork_fanout_dsh
                 $dsh_trace && (xCAT::MsgUtils->message("I", $rsp, $::CALLBACK));
 
                 my %exe_rcp_config = ();
-                $tmp_cmd_file = POSIX::tmpnam . ".dsh";
+                $tmp_cmd_file = File::Temp::tmpnam . ".dsh";
 
                 my ($exe_cmd, @args) = @{ $$options{'execute'} };
                 my $chmod_cmd = "";