foreach ( ($SITE_B_ANTENNA_LENGTH) = @SITE_B_ANTENNA_LENGTH_QUERY = $S
+ITE_B_ANTENNA_LENGTH_QUERY->fetchrow_array() )
[download]

looks really weird. In fact, I have no idea what you are trying to accomplish. Maybe you want

foreach my $SITE_B_ANTENNA_LENGTH ( $SITE_B_ANTENNA_LENGTH_QUERY->fetc
+hrow_array() )
[download]

or

my @SITE_B_ANTENNA_LENGTHS = $SITE_B_ANTENNA_LENGTH_QUERY->fetchrow_ar
+ray();
foreach my $SITE_B_ANTENNA_LENGTH (@SITE_B_ANTENNA_LENGTHS)
[download]