$data_hash{$1}= $str if $str =~ s/(\d+)\|//;