in reply to Vexed Otra Vez
#!/usr/bin/perl @skuid=("11021","11022","11023"); @name=("mt. eden","dom perignon","veuve cliquot"); @price=("45.99","135.99","79.99"); # put a space after the colon print "Content-type: text/html\n\n"; print "<table>\n"; print "<tr><th>Sku<th>Name<th>Price\n"; foreach $x (0..(scalar(@skuid)-1)) { print "<tr><td>$skuid[$x]<td>$name[$x]<td>$price[$x]\n"; } print "</table>\n";
|
|---|