$fh is an IO::File instance. It does not have a fetchrow_array method. Are you looking for <$fh> and split? Or for DBI?

Also, two lines above this, you appear to have a syntax error.