foreach $uniquekey1 (keys %myHash1)
        {
               $uniq2 = $file_name1.'.csv';
            sysopen($CircleGroupHandle1,"$ARGV[0]/$uniq2",O_WRONLY|
+O_APPEND|O_CREAT)or die "Error writing to $!";