perl -F, -nae '$s{$F[3]}=$_; END{print values %s;}' file