my %top_align = (       Left     	=> "left",
      					Center    => "center",
      					Right 	=> "right",
      	);

      	while (my ($k, $v) = each %top_align) {
		if ($image_align_top eq $v) {
			print qq|<td>
			          <div align="center">
			            $k <input type="radio" name="image_align_top" value="$v" checked>
			          </div>
			        </td>|;
		} else {
			print qq|<td>
			          <div align="center">
			            $k <input type="radio" name="image_align_top" value="$v">
			          </div>
			        </td>|;
		}
	}