Jemand zu Hause?![[twitter]](/battie/theme/default/icons/twitter.gif){kind=icon}
![[gelöst]](/battie/theme/default/icons/tick.png "gelöst"){kind=icon}
Leser: 21
+4 replies![[default_avatar]](/battie/theme/default/default_avatar.gif){kind=avatar}
Term::Choose (ab Version 1.47) reserviert darum für solche Fälle mindestens 4 Zeilen für die Auswahl. Wie könnte man so ein Reservieren auf englisch bezeichnen (auch für einen Optionsnamen mit dem man die Anzahl der reservierten Zeilen einstellen kann)?1 2 3 4 5 6 7 8 9 10 11 12 13
#!/usr/bin/env perl use strict; use warnings; use 5.10.1; use Term::Choose qw(choose); my $prompt = ''; for my $i ( 1 .. 9 ) { $prompt .= "Das ist die $i. Prompt Zeile" . " $i$i$i$i$i$i" x 100 . "\n"; } my $choice = choose( [ 1 .. 10000 ], { prompt => $prompt } ); say $choice;
+2 replies![[Homepage]](/battie/theme/default/homepage.gif)
Schrift
Blog
Einstellungen![[feed]](/battie/theme/default/icons/feed.png){kind=icon}
![[Powered by Battie]](/battie/img/powered.png)
