while (defined (my $hr = $csv->getline_hr($io))) { # use $hr->{id_name} to get the id_name }