my %spec = (
    username => qr#^[A-Za-z][-.\w]{2,29}$#,
    domain => qr#^(a|c|f|h|ho|i|k|o|s|x)\.com$#,
    email => qr#^[\w\.\-]+\@(?:[a-z\d\-]+\.)+[a-z\d]+$#i,
    service => qr#^Yes|No$#,
    conditions => qr#^Yes$#,
);

##</code><code>##

my %spec = (
    username   => qr/^ [A-Za-z] [-.\w]{2,29} \z/x,
    domain     => qr/ ^h\.net\z | ^(?:ho | [acfikosx])\.com)\z /x,
    email      => qr/^ [\w\.-]+ \@ (?:[a-z\d-]+\.)+ [a-z\d]+ \z/ix,
    service    => qr/^(?:Yes|No)\z/,
    conditions => qr/^Yes\z/,
);