URL: https://linuxfr.org/forums/programmation-perl/posts/menu-interactif
Title: menu interactif
Authors: xusnet
Date: 2007年09月05日T22:40:41+02:00
Tags: 
Score: 0
bonjour, 
 
Je cherche comment faire un menu interactif sous perl. 
 
menu simple en mode text qui avec les fleches curseurs permet de monter ou descendre une barre en sur brillance sur le choix du texte et une fois le texte choisie en appuyant la touche enter execute une commande. 
 
Ex: 
 
- choix 1 
- choix 2 
- choix 3 
faite un choix 
 
avec une barre blanche en inversion video change le texte qui est de couleur blanche en noir 
 
En C je sais faire mais en perl non :-(( 
 
quelqu'un a t'il une idee? 
Merci d'avance pour toutes reponses.
</div><div class="naked_ctrl">
<form action="/index.cgi/contrast" method="get" name="gate">
<p><a href="http://altstyle.alfasado.net">AltStyle</a> によって変換されたページ <a href="https://linuxfr.org/forums/programmation-perl/posts/menu-interactif.md">(-&gt;オリジナル)</a>
/ <label>アドレス: <input type="text" name="naked_post_url" value="https://linuxfr.org/forums/programmation-perl/posts/menu-interactif.md" size="22" /></label> <label>モード: <select name="naked_post_mode">
<option value="default">デフォルト</option>
<option value="speech">音声ブラウザ</option>
<option value="ruby">ルビ付き</option>
<option value="contrast" selected="selected">配色反転</option>
<option value="larger-text">文字拡大</option>
<option value="mobile">モバイル</option>
</select>
<input type="submit" value="表示" />
</p>
</form>
</div>