Leser: 1
10 Einträge, 1 Seite |
my $userinput = <STDIN>;
1
2
3
4
5
6
7
8
#!/usr/bin/perl -w
use strict;
for (1..3) {
print "Halt, bitte irgendwas eingeben und durch Enter bestaetigen:\n";
chomp(my $input = <STDIN>);
print "Bei Durchlauf Nr. $_ wurde $input eingegeben.\n\n";
}
10 Einträge, 1 Seite |