my @data_array = split( /;/, $data );
        foreach (@data_array) {
            return "$_\n";  ###############################################################
            print "$_\n";
        }