# parse, process and save data for further usage my $fh = new IO::File; my $ic_failed = 0; my $ic_total = 0; if ($fh->open($feed)) { my $parser = Parse::CSV->new( handle => $fh, csv_attr => $csv_setup, fields => $csv_fields, filter => sub { retrievefiles($_) }, );