while(<DATA>) {
    s/(\d),(?=\d)/$1|$2/g;
    print;
}
__DATA__