Select Code to Download

use Win32::TieRegistry

## create_dsn($dsn, $pointer, @servers)
## Creates a DSN named $dsn pointing to $pointer on servers named @ser
+vers
...
    }
    print "\n\tRemember to edit the new DSNs with username and passwor
+d!\n";
}