my ($server, @data) = map { $_ eq '' ? 0 : $_ } split /,/, $_, -1;