my( $data, $fh_token ) = split /\s*:\s*/;