# Lowercate input...
y/ABCDEFGHIJKLMNOPQRSTUVWXYZ/abcdefghijklmnopqrstuvwxyz/
# ALT Linux lists
s/^\([^\.]*\)\(\.www\)\?\.\(altlinux\.\(ru\|com\|org\|net\)\|linux\.iplabs\.ru\)>\?$/alt-\1/;
t end
# LRN lists
s/^\([^\.]*\)\(\.www\)\?\.\(lrn\.\(ru\|com\|org\|net\)\|linux\.ru\.net\)>\?$/lrn-\1/;                   t end
# GNU/NonGNU
s/^\([^\.]*\)\.\(non\)\?gnu\.org>\?$/gnu-\1/;                                                           t end
# VIDEOLAN
s/^\([^\.]*\)\.videolan\.org>\?$/vlc-\1/;
t end
# SourceForge
s/^\([^\.]*\)\.lists\.sourceforge\.net>\?$/sf-\1/;
t end
# QuakeForge
s/^\([^\.]*\)\.lists\.quakeforge\.net>\?$/qf-\1/;                                                       t end
# Insert more patterns here...
#s/^\([^\.]*\)\.blah\.bl.ah>\?$/blah-\1/;
#t end
# Default rule - prefix list with 2-level domain name                                                   s/^\([^\.]*\)\.\([^\.]*\.\)*\([^\.]*\)\.[^\.]*>\?$/\3-\1/;
:end                                                                                                    ~