What is "Use of uninitialized JOIN" error?

[jason corbett]

Can anyone tell me what is happening here?
 
Thanks,
JC
 
Here is the part of the code that the error is pointing to

 print OUTFILE "$recordlist\n"; 
$recordlist=join(",",@record);