my $csv = openCsv (file => "file.csv", headers => "auto");
while (my $row = $csv->getline) { # note the missing $io
    say $row->{Foo};
    }