Select Code to Download

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

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