while (<FILE>) { 
	$csv->parse($_); 
	push(@printerstat, $csv->fields); 
	# print @printerstat;
}

	spit(@printerstat);

sub spit {

	for my $field(@printerstat) {
		print "$field\n";
	}
}