my $type = "add";
my $redo; 
$type eq "add" ? {$redo = "wiki_add2"} : {$redo = "wiki_edit2"};
print "With type: $type, we could redo: $redo \n";