this is a field to start with,field2,field3
#,*,field3 of line 2
field1 of line3,and this is the second field of line3,field3 of line3
[download]

then replacing the relevant part of the above code with this fragment produces a line of output for each field:

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

    spit(@printerstat);

sub spit {

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

thusly

this is a field to start with
field2
field3
#
*
field3 of line 2
field1 of line3
and this is the second field of line3
field3 of line3
[download]

This also works if some of your fields are void, eg:

,,this is a row with two empty fields