perl "E:\perl_TK\perlCSV.pl"
Process started >>>
Format ok
12345	John Dow	123456	
Format ok
54321	ANDREW MALL	8888882	
Format ok
987865	BOGGS BUNNY	2234566	
Format ok
88777	CLARK KENT R	888666	
Wrong Format
First 126677 and tird xx345778 have to be numeric
Format ok
112222	DAVOLIO DARK F	3321777	
<<< Process finished.