my ($dst, $service) = (split /;/)[11, 12];