$answer = lc($answer);
if ($answer eq ('y' or 'yes')) {
    unlink $origin;
}