eval { $_[0] .= '' };
  if ($@ =~ /Modification of a read-only value attempted/) {