X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: fd588,7ad72948312cb279,start X-Google-Attributes: gidfd588,public X-Google-Thread: fa0ae,85d37e30d034d7ec X-Google-Attributes: gidfa0ae,public From: Ilmari Karonen Subject: Please wait... [was: Perl - Blinking Text] Date: 2000/08/24 Message-ID: <967117675.6043@itz.pp.sci.fi>#1/1 X-Deja-AN: 661921426 References: <20000815111353.00174.00003174@ng-ch1.aol.com> X-Complaints-To: newsmaster@saunalahti.fi X-Trace: tron.sci.fi 967118400 1901 195.74.0.20 (24 Aug 2000 12:00:00 GMT) Organization: (dis)Order of the Holy Spoon (or whatever) User-Agent: postit.pl 0.05 Reply-To: Ilmari Karonen NNTP-Posting-Date: 24 Aug 2000 12:00:00 GMT Newsgroups: comp.lang.perl.misc,alt.ascii-art.animation In article , Greg Bacon wrote: >In article <20000815111353.00174.00003174@ng-ch1.aol.com>, > Louis wrote: >: Hi. While my perl script is processing, I would like the print line >: "Please wait, processing data .. " to blink at the command line >: (UNIX). Does anyone know how I can get the text to blink? > >Yuck. Just say no. How about a spinner? Twirling batons are rather cliche, though. If you're going to have your users staring at a "please wait" message, the least you could do is make it a little bit interesting. perl -e '$|=1; print "\rPlease wait", grep tr/01/ ./ => unpack "b*" => pack "v" => $i while ++$i and sleep 1' perl -e '$|=1; print "\rPlease wait", grep tr/01/ ./ => unpack "b*" => pack "v" => $i^$i/2 while ++$i and sleep 1' Here are two I came up with right now - I can't decide which one I like more. All it takes is a bit of creativity. [Crossposted from comp.lang.perl.misc to alt.ascii-art.animation.] -- Ilmari Karonen - http://www.sci.fi/~iltzu/ Please ignore Godzilla | "By promoting postconditions to and its pseudonyms - | preconditions, algorithms become do not feed the troll. | remarkably simple." -- Abigail