12 { "^[^!@]+$", "/bin/upas/aliasmail '&'", 0 },
13 { "^local!(.*)$", "/mail/box/\\1/mbox", 0 },
14 { "^plan9!(.*)$", "\\1", 0 },
15 { "^helix!(.*)$", "\\1", 0 },
16 { "^([^!]+)@([^!@]+)$", "\\2!\\1", 0 },
17 { "^(uk\\.[^!]*)(!.*)$", "/bin/upas/uk2uk '\\1' '\\2'", 0 },
18 { "^[^!]*\\.[^!]*!.*$", "inet!&", 0 },
19 { "^\xE2\x98\xBA$", "smiley", 0 },
20 { "^(coma|research|pipe|pyxis|inet|hunny|gauss)!(.*)$", "/mail/lib/qmail '\\s' 'net!\\1' '\\2'", 0 },
21 { "^.*$", "/mail/lib/qmail '\\s' 'net!research' '&'", 0 },
25 main(int ac, char **av)
32 for(tp = t; tp->re; tp++)
33 tp->p = regcomp(tp->re);
36 for(tp = t; tp->re; tp++){
37 print("%s VIA %s", av[1], tp->re);
38 memset(rs, 0, sizeof rs);
39 if(regexec(tp->p, av[1], rs, 10)){
40 regsub(tp->s, dst, sizeof dst, rs, 10);
41 print(" sub %s -> %s", tp->s, dst);