$_= "input and 'input' and 'tinput' and ' input' and 'input ' and input";

s/('input'|\binput\b)/($1 eq "'input'") ? $1 : "OUTPUT"/eg;

print "Got\n$_\n";

print "Want
OUTPUT and 'input' and 'tinput' and ' OUTPUT' and 'OUTPUT ' and OUTPUT";