The code to build the page is on the server side by default (and in pretty much all sane cases I guess?) yes, but you can have some code to change the page dynamically when displaying it.

If that's just a string, you can use interpolation. You should first put the value in a variable and then interpolate, not only is this clearer, but it's also easier to do:

my $bgcolor = ($ref->{'status'} == 'open') ? 'blue' : 'red';
print "<td bgcolor='$bgcolor'>";
[download]

Thanks. This is a while loop, so my mistake was not assigning the $color value inside the loop. It's working now.

It's working now.

Are you sure ?
== is for numeric comparison, use eq for strings. see https://perldoc.perl.org/perlop.html#Equality-Operators

my $bgcolor = ($ref->{'status'} eq 'open') ? 'blue' : 'red';
[download]


poj