$SENDVAR1 = q(perl -MDigest::SHA=sha256_hex -E 'say sha256_hex(q/$email/)');
my $email_SHA256 = qx($SENDVAR1);