my %top_align = qw( Left left Center center Right right );

foreach my $k ( keys( %top_align ) ) {
  my $checked = ($image_align_top eq $top_align{$k}) ? ' checked' : '';
  print qq|<td>
            <div align="center">
              $k <input type="radio" name="image_align_top" value="$top_align{$k}"$checked>
            </div>
           </td>|;
}