finally i made the code work for me :) - thanks for inspiration - i own you
a code - hope you can do it easiest way - i am just begginer - so it's
likely the simplest way to achive the same result
the code was:
$sth->prepare(SELECT * FROM table);
$sth->execute;
$ref = $sth->fetchall_arrayref;
print table({-border=>1},
Tr({-align=>CENTER, -valign=>TOP},[
th(\@naglowek), #that's not so important
td({-bgcolor=>'yellow'},$$ref[0]), #couldn't
change text color here
td($$ref[1])
])
);
i rewrote it
$sth->prepare(SELECT * FROM table);
$sth->execute;
@1 = $sth->fetchrow_array;
$ref = $sth->fetchall_arrayref;
foreach (@1) {
$_="<font color=green>".$_."</font>";
}
print table({-border=>1},
Tr({-align=>CENTER, -valign=>TOP},[
th(\@naglowek), #that's not so important
td(\@1), #now the text color is green :))
td($$ref[0])
])
);
maybe some sugestion not using fetchrow_array method
thanks
greg
U�ytkownik Dave K <[EMAIL PROTECTED]> w wiadomo�ci do grup dyskusyjnych
napisa�:[EMAIL PROTECTED]
> Greg,
> Show some code, if you can.
>
> > i am using references in
> > table rows - it's better for me to highlight row by bgcolor avoiding
> Why would references be a problem?
> > additional loops - but maybe any idea how to quick change text color for
a
> > row that's defined as reference to table - thanks in advance
> A function comes to mind:
>
> sub wrap_it {
> $td = shift;
> return "<font color='red'>".$td."</font>";
> }
> But if you can show some code, it might become apparent why another
approach
> is more attractive.
> David
>
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
