my $result;
if( $bb =~ m/UDP\s*([\d.]+);/ ) {
    $result = $1;
}