my ($index, $rest) = split /\|/, $str, 2;
$data_hash{$index} = $rest;