>369
@read_data= split("\t");の直後に以下を書くということかな？

print qq(<a href="banner.cgi?$read_data[1]"><IMG SRC="$read_data[0]" border=0></a><BR>\n);