Einwahlskripten(isdnctrl)

High High,


ich habe zwei Perlskripten aus einem Buch übernommen die dazu dienen sollen eine Internetverbindung von
der Konsole aus herzustellen. Wenn ich das erstere ausführe erhalte ich nur den Anleitungsbildschirm von
isdnctrl. Beim ausführen des zweiten erhalte ich eine Fehlermeldung von grep.
So mir jemand einen Tip geben könnte woran
es in den beiden Skripten mangelt....


TIA
XuT


isdn-up:
#!/usr/bin/perl -w
$ENV{'ENV'} = '';
$ENV{'BASH_ENV'} = '';
$ENV{'PATH'} = '/bin:/usr/bin:/sbin:/usr/sbin';
system "modprobe hisax type=27 irq=5 mem=0xd0000 protocol=2 id=HiSax";
system "isdnctrl addif ippp0";
system "isdnctrl eaz ippp0 out 5815439";
system "isdnctrl addphone ippp0 in 0101901929";
system "isdnctrl huptimeout ippp0 260";
system "isdnctrl secure ippp0 on";
system "isdnctrl encap ippp0 syncppp";
system "isdnctrl 12_prot ippp0 hdlc";
system "isdnctrl 13_prot ippp0 trans";
system "isdnctrl pppbind ippp0 0";
system "sleep 1";
system "ipppd ippp0 noipdefault debug remotename freenet.de user Zweiundzwanzig defaultroute";
system "isdnctrl dial ippp0";
system "route add default ippp0";

isdn-down:
#!/usr/bin/perl -w
$ENV{'ENV'} = '';
$ENV{'BASH_ENV'} = '';
$ENV{'PATH'} = '/bin:/usr/bin:/sbin:/usr/sbin';
system "isdnctrl hangup ippp0";
system "route del default";
system "route del 'route -n | tail +3 \@'| cut -d ' ' -f 1 | grep -v '^127\.''";
system "killall ipppd";
system "ifconfig ippp0 down";
system "isdnctrl delif ippp0";
system "modprobe hisax type=27 irq=5 mem=0xd0000 protocol=2 id=HiSax";

[Dieser Beitrag wurde von Zweiundzwanzig am 18. Dezember 2000 editiert.]