• Реклама


Лень - двигатель прогресса

Разработка и Написание программ, вопросы, идеи...

Лень - двигатель прогресса

Сообщение Aragaer 12 фев 2004 13:31

Часто хочется чего-нибудь пингануть/еще чего, но надоедает каждый раз лезть, запускать cmd.exe и писать в нем кучу буквочек и циферок.
Поэтому вчера все-таки организовал посещение мануала по перлу. Результат:
Код: Выделить всё
use Win32::Clipboard;
$CLIP=Win32::Clipboard();
$a=$CLIP->Get();
system("ping $a");
<>

после чего ярлык к этому скрипту я вынес в Lucky Jump (это одна из менюшек, которые можно поставить в мышке A4Tech 5-тикнопочной).

Скрипт лезет в буфер обмена, достает его содержимое и пингует его не глядя. Т.е. там может быть любая гадость по вкусу. (например "some.host\nformat c:", так что поосторожнее все-таки).
Аналогичные скрипты для tracert и nslookup отличаются только одним словом в вызове команды system.

Еще я уже почти сделал все то же самое, но объединенное в одно окошко с помощью модуля Tk. Кнопочки там всякие и прочие удобства. Пинг там уже почти работает. Остальные почему-то упрямятся, но это ненадолго.
Open your eyes.
And Awaken.
Аватара пользователя
Aragaer
Склеротик.
Склеротик.
 
Сообщения: 113
Зарегистрирован: 28 сен 2003 19:32
Откуда: From Dreaming.

Реклама

Вернуться в Программирование

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2


  • Реклама
cron