my $type = "add";
my $redo;
given ($type) {
  when ("add")    { $redo = "wiki_add2" }
  when ("edit")   { $redo = "wiki_edit2" }
  when ("remove") { log("REMOVE") and $redo = "wiki_remove2" }
  default { $redo = "wiki_noneoftheabove7" }
}
print "With type: $type, we could redo: $redo \n";