if (fc($ok) eq fc($yes)) {
    print "Removing ...\n";
    RemoveAltTag($some_doc_variable);
}
else {
    print "No removal.\n";
}