# Checks comma-separated elements
perl -F, -wane'for (@F){die "Improper data\n" if length($_)>255}' filename.txt