if ($csv->parse($line)) 
    {
        #Skip first line
        next if ($. == 1);
    }
    my @fields = $csv->fields();

##</code><code>##

    $csv->parse($line) or die $csv->error_diag();