From c0adcc5248023de20bf5115154ae7ae66ae53c94 Mon Sep 17 00:00:00 2001
From: battilo <alessandro.battilani@gmail.com>
Date: Mon, 18 Sep 2017 21:02:26 +0200
Subject: [PATCH] corretto la trasformazione del path dove creare sql x
 caricamento doppio

---
 UnitCsvReceiverSmart.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/UnitCsvReceiverSmart.pl b/UnitCsvReceiverSmart.pl
index 47b2442..2de4a23 100644
--- a/UnitCsvReceiverSmart.pl
+++ b/UnitCsvReceiverSmart.pl
@@ -109,7 +109,9 @@ while ( my $line = $tail->GetLine() ) {
                     if ( $truser ne 'asega' ) {
                         print getTimeStamp("log")
                           . " >> Sender user $truser: duplicate as asega user -> load data into DB.\n";
-                        $truser = 'asega';
+                        my $realtruser = $truser;
+                        $truser = "asega";
+                        $outpath =~ s/$realtruser/$truser/;
                         my ( $login, $pass, $uid, $gid ) = getpwnam($truser)
                           or warn getTimeStamp("log")
                           . " >> $truser not in passwd file.\n";