$a="'Obviously?'"; 
$a=~s/\'/'/g; 
print $a."\n";
[download]

Update:I just checked: $a=~s/'/'/g; (i.e. without escaping the quote) works, too.