perl-scripte veroeffentlichen

Post Reply
Message
Author
User avatar
killerhippy
Posts: 529
Joined: 19. May 2000 19:36
Contact:

perl-scripte veroeffentlichen

#1 Post by killerhippy »

gute idee, hier eins, das krach macht, bis man eine taste drueckt:

---cut---
#!/usr/bin/perl
use Term::ReadKey;
ReadMode ('cbreak');
sleep 2; # kurz warten, damit RETURN nicht erfasst wird

while ( (ReadKey(-1) eq undef) ) {
print "\a";
sleep 0;
}

ReadMode ('normal');

exit;
---cut---

Requierement: <i>Term::ReadKey</i> erhaeltlich bei <!--http--><a href="http://www.cpan.org" target="_blank">CPAN org</a><!--url-->, wo es im uebrigen tonnenweise module und <b> <i> Scripte </i> </b> gibt :)

Nichtsdestotrotz faende ich eine gut administrierte Sammlung an dieser Stelle auf deutsch super

cu
Killerhippy
Es gibt keine dumme Fragen!

Killerhippy

User avatar
hjb
Pro-Linux
Posts: 3264
Joined: 15. Aug 1999 16:59
Location: Bruchsal
Contact:

Re: perl-scripte veroeffentlichen

#2 Post by hjb »

Hi,

wenn du interessiert bist so eine Sammlung zu verwalten, dann setze dich doch mal mit uns in Verbindung <img src="http://www.pl-forum.de/UltraBoard/Images/Wilk.gif" border="0" align="middle">

Gruß,
hjb
Pro-Linux - warum durch Fenster steigen, wenn es eine Tür gibt?

Post Reply