open my $log, ">>", "$path/register_list.txt" or die "Cannot append:$!";
print $log join( ",",$date,$client_ip,$client_imsi,$bsid),"\n";
close $log;