selective replacement of delimiter

I have a file with two fields seperated by comma

data looks like below with the header

The o/p should look like this

Basically, the req is to replace only the first occuring comma with pipe

can we do this with any commands

awk 'sub(",","|")' file
sed 's/,/|/' file