Здравствуйте. Во-первых yawmppp (у меня windowmaker), но можно прицепить и на gkrellm или на горячие клавиши. Во-вторых для запуска пишем команду (%cat ~/.yawmppp2/start.0) координаты - для моего разрешения экрана 1024x768 xterm -ls -geom 15x1+915+705 -class Dzvon -e '/home/dimytch/bin/позвонить.pl 35'; rm -f /tmp/звонилка.флаг & В-третих %cat ~/GNUstep/Defaults/WMWindowAttributes ... xterm.Dzvon = { NoResizebar = Yes; NoBorder = Yes; Icon = "gnome-info.png"; NoTitlebar = Yes; } ... ; И наконец: % cat ~/bin/позвонить.pl #!/usr/bin/perl exit if(-e '/tmp/звонилка.флаг'); `touch /tmp/звонилка.флаг`; $count=shift; # количество звонков unless($count){ print "позвонить <количество звонков> \n"; exit; } @number=('7483131', '7773131','7483131','7313131','7313131','7773131','7313131', '7483131'); $ph=0; print $count " звонков \n"; for($i=0;$i<$count;$i++){ exit unless(-e '/tmp/звонилка.флаг'); $ph=$ph>($#number-1)?0:$ph+1; print "\r$number[$ph]:".$i." "; `pppd ttyS0 115200 call ukr.net connect '/usr/sbin/chat -v -f /etc/ppp/chat-ukr.net -T $number[$ph]'`; if(-e '/var/run/ppp-ppp0.pid'){ `/home/dimytch/bin/updatedns`; `fetchmail -d 300 2>>/tmp/log`; `/usr/bin/aplay -D hw:1,1 /opt/kde/share/sounds/KDE_Notify.wav > /dev/null 2>&1`; $pip=0; while(-e '/var/run/ppp-ppp0.pid'){ sleep 60; print "$pip++\r"; } } } print "\n"; unlink '/tmp/звонилка.флаг'; `/usr/bin/aplay -D hw:1,1 /opt/kde/share/sounds/KDE/KDE_Error.wav > /dev/null 2> &1`; $SIG{INT} = sub { unlink '/tmp/звонилка.флаг'; CORE::exit; }; Подробности скрипта в man pppd. Димыч