my %errors = (); my $array_ref=[%$errors]; my $csvout = new IO::File "> csvoutput.csv"; my $status = $csv->print ($csvout, [%$errors]) #### Global symbol "$errors" requires explicit package name