diff options
author | Mystery Man <unknown@mandriva.org> | 2003-03-07 07:55:17 +0000 |
---|---|---|
committer | Mystery Man <unknown@mandriva.org> | 2003-03-07 07:55:17 +0000 |
commit | 928545d04299e6beb49f04c39380644ab58848bf (patch) | |
tree | 6f8d47c502c34a245b234c0ab30ab166079a89a7 /tools/2adsldb.pm | |
parent | 29944326bf1e6c63afa074cfadd3ffbefca309c8 (diff) | |
download | drakx-928545d04299e6beb49f04c39380644ab58848bf.tar drakx-928545d04299e6beb49f04c39380644ab58848bf.tar.gz drakx-928545d04299e6beb49f04c39380644ab58848bf.tar.bz2 drakx-928545d04299e6beb49f04c39380644ab58848bf.tar.xz drakx-928545d04299e6beb49f04c39380644ab58848bf.zip |
This commit was manufactured by cvs2svn to create tag 'V9_1_17mdk'.V9_1_17mdk
Diffstat (limited to 'tools/2adsldb.pm')
-rw-r--r-- | tools/2adsldb.pm | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/tools/2adsldb.pm b/tools/2adsldb.pm deleted file mode 100644 index 23328aafc..000000000 --- a/tools/2adsldb.pm +++ /dev/null @@ -1,17 +0,0 @@ -open F, "isplist.txt" or die "file $file not found"; -open G, ">tutu" or die "file $file not found"; -foreach (<F>) { - s/\#.*//; - /.*ADSL.*/ or next; -#| NOM | PAYS | CONNECTION | MAILTYPE | SMTP | MAILSERVER | NEWS | MY1DNS | MY2DNS | PROXY | PROXYSERVER | DHCP | EMAIL - s/(.*)france(.*)/$1France$2/; - s/(.*)FRANCE(.*)/$1France$2/; - s/(.*)USA(.*)/$1United States$2/; - s/(.*)U.S.A(.*)/$1United States$2/; - s/(.*)US(.*)/$1United States$2/; - s/(.*)usa(.*)/$1United States$2/; - s/(.*)club-internet(.*)/$1club internet$2/; - my ($name, $country, $connexion, $mailtype, $smtp, $popserver, $mailserver, $news, $dns1, $dns2, $proxy, $proxyserver, $dhcp, $email) = split /\|/; - print G join("|", $country, join("=>", $name, $dns1, $dns2)), "\n"; #$domain, -} - |