Leser: 4
8 Einträge, 1 Seite |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
#!/usr/bin/perl print "Wen oder was moechten Sie gruessen? : \n"; $input = <STDIN>; chomp ($input); if ($input eq "Erna") { print "Hallo, Erna. Dich gruesse ich nicht mehr, tust Du ja auch nie!\n"; } elsif ($input eq "Otto") { print "Hallo, Otto. Viele Gruesse von Erna, die ich nicht mehr Gruesse.\n"; } elsif ($input eq "Karl") { print "Hallo, Karl. Dies ist kein Gruss.\n"; } else { print "Hallo, $input, wer bist Du denn?\n"; }
Gast+2009-02-20 09:41:28--ja, Perl.exe startet ja auch im DOS Fenster
8 Einträge, 1 Seite |