Help for this page
$$email[0] = join('\@', split("@",$$email[0]));
$$email[0] = join("\\\@", split("@",$$email[0]));