Help for this page
use strict; while(<DATA>) ... smith,Y,N,B jones,N,Y,B,A clarke,Y,N,Y
use strict; ... smith,Y,N,B jones,N,Y,B,A clarke,Y,N,Y