http://www.perlmonks.org?node_id=188784


in reply to Re: CGI Colour Palette
in thread CGI Colour Palette

Thanks for the help! I figured that I would have to do somthing like the second option above. The only drwaback here is that the table will size each cell by the text the cell, and will only link on the text and not the cell itself. argh!
my @hex_numbers_row = ("ff","cc","99","66","33","00"); foreach $block (@hex_numbers_row) { + foreach $col (@hex_numbers_row) { + foreach $row (@hex_numbers_row) { + my $hex_colour = $block.$row.$col; + my $string_to_send = '<a', 'href="/ckoster-cgi/test_colour.pl?', 'action=colour&colour='.$hex_colour.'">'."What goes here?".'</a>'; + + print $q->th({-BGCOLOR=>"#$hex_colour", + -width=>"1"},$string_to_send),"\n"; + } }}
;