Aktuelle SeiteWähle Forum / Perl / Konfiguration / Installation und Module / Zwei unterschiedlichen Umgebungen eine Netzwerkverbindung zuweisen

Zwei unterschiedlichen Umgebungen eine Netzwerkverbindung zuweisen


Bild von adminhipke

By adminhipke - Posted on 05 Mai 2010

 Hallo,

ich möchte gerne ein Script mit Perl schreiben, dass mir ermöglicht die Netzwerkeinstellungen wie IP-Adresse, Subnetz, Gateway, DNS zu ändern. Damit ich dann zwischne zwei Umgebungen her switchen kann.

Kann mir jemand ein bisschen auf die Sprünge helfen, wie ich das realisieren kann, hab nicht so gute Kenntnisse in Perl.

Danke!

Trackback URL für diesen Beitrag:

http://community.perl.de/trackback/59
0
Eigene Bewertung: Keine

Das dürften ja letztlich Einstellungen im System sein. Über welches System reden wir denn überhaupt?
Würde es sich z.B. um Windows handeln, könnte man auch per Batch einiges machen:
 

c:\>netsh /? Syntax: netsh [-a Aliasdatei] [-c Kontext] [-r Remotecomputer] [Befehl | -f Skriptdatei]

Folgende Befehle sind verfügbar:

Befehle in diesem Kontext:
?              - Zeigt eine Liste der Befehle an.
add            - Fügt einen Konfigurationseintrag zur Liste hinzu.
bridge         - Wechselt zum "netsh bridge"-Kontext.
delete         - Löscht einen Konfigurationseintrag aus der Liste der Einträge.
diag           - Wechselt zum "netsh diag"-Kontext.
dump           - Zeigt ein Konfigurationsskript an.
exec           - Führt eine Skriptdatei aus.
firewall       - Wechselt zum "netsh firewall"-Kontext.
help           - Zeigt eine Liste der Befehle an.
interface      - Wechselt zum "netsh interface"-Kontext.
lan            - Wechselt zum "netsh lan"-Kontext.
ras            - Wechselt zum "netsh ras"-Kontext.
routing        - Wechselt zum "netsh routing"-Kontext.
set            - Aktualisiert Konfigurationseinstellungen.
show           - Zeigt Informationen an.
winsock        - Wechselt zum "netsh winsock"-Kontext.

Hier wird darüber auch geschrieben: http://www.heise.de/mobil/artikel/Netzwerkumstellung-fuer-Notebooks-vereinfacht-223289.html

Und es gibt noch mehr Fundstellen bei Google :)

Müsstest halt mal je OS ein wenig suchen. Ob man wirklich Perl braucht, weiß ich nicht.

 Das Script soll unter Windows laufen, mir ist bewusst, dass es anders und leichter geht!
Aber da es ein Projekt ist, soll es mit Perl laufen!

Ja, man kann das auch in Perl nutzen, indem man diese Befehle einfach per system() absetzt.