my ($label, $value); my @top_align = qw(Left Center Right); while (@top_align) { $label = shift(@top_align); $value = $label; $value =~ tr/A-Z/a-z/; if ($value eq $image_align_top) { print qq|