Syntax Error caused by Inserting Hyperlink in String

[group8perl]

am getting syntax error, can someone please explain how to insert a hyperlink into a table.

[miller]

am getting syntax error, can someone please explain how to insert a hyperlink into a table.

Is this an HTML question?

- M

[group8perl]

Sorry about the poor topic but it is a perl question
part of my code consists of
<td><<A HREF="http://www.whatever.com">http://www.whatever.com</A></td>

And the error i get is "syntax error at line 99, near "<td><<A HREF="http""

[KevinADC]

lets see your real perl code. What you posted is an out of context line of text that is impossible to debug in relationship to your perl code.

[group8perl]

Haven't posted the whole code because most of it is HTML
but the code concerning the error is below

print "<table border='1'>";
print "<tr><td>Type</td><td>Size</td><td>Price</td></tr>";
foreach $line (@all) {
chop($line);
($size,$price,$type=split(/\|/,$line);
print "
<tr>
<td>$type</td>
<td>$size</td>
<td>$price</td>
<td><A HREF="http://www.whatever.com">http://www.whatever.com</A></td>
</tr>";
}
print"</table>";

If needed i could post the entire code
Also could you help me change some of the table attributes such as font, font colours, bgcolor, row width, column width
Thank you

[KevinADC]

you can't use unescaped double-quotes in a print command that uses double-quotes as the string terminator, add a backslash to escape embedded double-quotes:

print "
<tr>
<td>$type</td>
<td>$size</td>
<td>$price</td>
<td><A HREF=\"http://www.whatever.com\">http://www.whatever.com</A></td>
</tr>";
}

perl has quote operators that make life easier:

perldoc Quote and Quote like Operators

[miller]

To fix your problem, either escape the double quotes inside the string, or use a different encloser. My personal preference is to use qq{my string here}.

http://perldoc.perl.org/functions/qq.html

print qq{<table border='1'>};
print qq{<tr><td>Type</td><td>Size</td><td>Price</td></tr>};
foreach $line (@all) {
    chop($line);
    ($size, $price, $type) = split(/\|/, $line);
    print qq{
<tr>
<td>$type</td>
<td>$size</td>
<td>$price</td>
<td><A HREF="http://www.whatever.com">http://www.whatever.com</A></td>
</tr>};
}
print qq{</table>};
 

[KevinADC]

hehehe.... that long hyper link was rather obnoxious, thanks Miller ;)

[miller]

Your welcome :)

perldoc really does have the silliest anchors. Why on earth they feel it necessary to have an anchor that is 157 characters in length when the header for the section is only 30, I'll never know.

[group8perl]

Thanks for the help
It works nicely
But any ideas on improving how the table looks (fonts, colors etc.)
Thank You

[group8perl]

print "<table border='1'>";
print "<tr><td>Type</td><td>Size</td><td>Price</td></tr>";
foreach $line (@all) {
chop($line);
($size,$price,$type=split(/\|/,$line);
print "
<tr>
<td>$type</td>
<td>$size</td>
<td>$price</td>
<td><A HREF="http://www.whatever.com">http://www.whatever.com</A></td>
</tr>";
}
print"</table>";
 

Another question
The variable $type, how do i transfer that variable to another perl script using the hyperlink?
Most tutorials i have seen comment on forms but not hyperlinks
An suggestions
Thank You

[KevinADC]

http://www.whatever.com/cgi-bin/yourscript.pl?type=$type

[group8perl]

Brilliant
Thanks for the help Kevin, will see if this works

[group8perl]

This code works nicely
I have used http://www.whatever.com/cgi-bin/yourscript.pl?$type
But what if i wish to transfer more than one variable using this method, is it possible?
For example tranfer $type, and $size, $code
Thank You

[KevinADC]

http://www.whatever.com/cgi-bin/yourscript.pl?type=$type&size=$size

or instead of '&' use ';' which to delimit for URI string:

http://www.whatever.com/cgi-bin/yourscript.pl?type=$type;size=$size