Use of uninitialized value in join or string at C:/Perl_activate/20_October_2005_L.pl line 438, line 1191. #### my $sth_C = $dbh->prepare($Return_results) or die "Couldn't prepare query: ".$dbh->errstr; $sth_C->execute() or die "Couldn't execute query: ".$sth_C->errstr; while (my @row = $sth_C->fetchrow_array) { print OUTPUT_FILE join("\t", @row); ###<< The error message applies to this line of code. print OUTPUT_FILE "\n"; undef @row;