|
|
Re: lug-bg: yes/no Скрипт
- Subject: Re: lug-bg: yes/no Скрипт
- From: "Ted Zlatanov" <tzz@xxxxxxxxxxxx>
- Date: 6 Oct 2004 10:31:10 -0400
- Envelope-recipients: lug-bg@xxxxxxxxxxxxxxxxxx,
- Envelope-sender: tzz@xxxxxxxxxxxx
- Organization: Теодор Златанов @ Cienfuegos
perl -e'while(1) { $p = $ENV{YNPROMPT}; $a = -1; print "$p [YyNn] "; $c = <>; $c = uc $c; chomp $c; $a = $c; last if $c eq "Y" || $c eq "N"; }; exit $a'
(сложи текста в $YNPROMPT)
Teo
============================================================================
A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers).
http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora
To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
============================================================================
|
|
|