my $a_one = $csv->getline($fh)->[0];
<...>
my $first_row = $csv->getline_all( $fh ,2, 1 ); # decrease offset by 1 because one line was read earlier