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