diff options
| author | Mystery Man <unknown@mandriva.org> | 2002-08-01 19:39:26 +0000 |
|---|---|---|
| committer | Mystery Man <unknown@mandriva.org> | 2002-08-01 19:39:26 +0000 |
| commit | 3652ec5a73e3863215bcd87c4994fdbf55299300 (patch) | |
| tree | 57c2dc33aed5c59a080bd5da7bf5b8125b4a2aef /tools/2adsldb.pm | |
| parent | af0430510356c70ea497fc108466c6236c1afcc1 (diff) | |
| download | drakx-1_1_9_2mdk.tar drakx-1_1_9_2mdk.tar.gz drakx-1_1_9_2mdk.tar.bz2 drakx-1_1_9_2mdk.tar.xz drakx-1_1_9_2mdk.zip | |
This commit was manufactured by cvs2svn to create tag 'V1_1_9_2mdk'.V1_1_9_2mdk
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, -} - |