Sed /awk

I have a interesting problem,

The data is of the format
1,264,sjfgd,6738,jsfg
then there are certain bad records of the format
1,265,jsfgdh
These records are not complete ,I want to delete these records.

awk -F, 'NF == 5' infile
perl -F, -ane 'print if ($#F + 1) == 5' infile