diff options
| author | Mystery Man <unknown@mandriva.org> | 2002-09-16 23:15:36 +0000 |
|---|---|---|
| committer | Mystery Man <unknown@mandriva.org> | 2002-09-16 23:15:36 +0000 |
| commit | 149a1ae6fb71e09063cfcc4d58e50281182e182f (patch) | |
| tree | f6a20501f74950ca1d93cfd85e1c9ff09f8813fb /tools/2adsldb.pm | |
| parent | 694d98ab3e187c3a2e8f47822b5ccc31e7342520 (diff) | |
| download | drakx-backup-do-not-use-1_1_9_49mdk.tar drakx-backup-do-not-use-1_1_9_49mdk.tar.gz drakx-backup-do-not-use-1_1_9_49mdk.tar.bz2 drakx-backup-do-not-use-1_1_9_49mdk.tar.xz drakx-backup-do-not-use-1_1_9_49mdk.zip | |
This commit was manufactured by cvs2svn to create tag 'V1_1_9_49mdk'.V1_1_9_49mdk
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, -} - |