Thread Menue in Perl (7 answers)
Opened by thc at 2003-09-09 04:32

pq
 2003-09-10 02:21
#85700 #85700
User since
2003-08-04
12208 Artikel
Admin1
[Homepage]
user image
[quote=thc,10.09.2003, 00:07]Und zwar habe ich
Code: (dl )
1
2
3
4
5
6
7
8
9
sub menu
{
     print "Choose\n> ";
     chop ($choose = <STDIN>);
}
if ($choose eq 1)
{
      print "bla";
}

geschrieben, statt die "if" prozedur in der Sub-Routine zu schreiben.
[/quote]
und du hast chop anstatt chomp geschrieben.
Quote
wie kann
man die Anzahl der Lieder, unter BSD (Art von Linux) von einer Musik-CD ermitteln???

hmm, in perl oder einfach so?
Code: (dl )
1
2
3
system('mount /cdrom') and die $!;
my $anzahl = my @files = glob "/cdrom/*.wav";
# Edit: ungetestet!!

Quote
Gruß --==THC==--

toller nick...\n\n

<!--EDIT|pq|1063146140-->
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:Wie frage ich & perlintro Wiki:brian's Leitfaden für jedes Perl-Problem

View full thread Menue in Perl