Hallo, wer hilft mir, ein folgendes PERL Programm, das den Benutzer auffordert, ein intern
definiertes Passwort (Zeichenkette) zu erraten, zu schreiben?
Falls das eingegebene Passwort nicht identisch ist, soll eine Fehlermeldung zusammen mit
dem eingegebenen Passwort ausgegeben werden
Sind sie identisch, dann soll eine Erfolgemeldung ausgeben werden.
ich hab schon den anfang:
#!/usr/bin/perl
{
$a = ‚Zeichen‘;
$a = ;
chomp $a;
$b = ;
chomp $b;
wie geht’s weiter?
Identische Kopie ging auch an die Experten-Suche
Hallo,
da eine identische Kopie dieses Postings auch an die Expertensuche ging und Doppelpostings unerwünscht sind, fühle ich mich ein klein wenig verarscht und werde nicht antworten.
Grüße,
Moritz
Auch hallo.
Hallo, wer hilft mir, ein folgendes PERL Programm, das den
Benutzer auffordert, ein intern
definiertes Passwort (Zeichenkette) zu erraten, zu schreiben?
Falls das eingegebene Passwort nicht identisch ist, soll eine
Fehlermeldung zusammen mit
dem eingegebenen Passwort ausgegeben werden
Sind sie identisch, dann soll eine Erfolgemeldung ausgeben
werden.
Dieser Vorschlag gewinnt keinen Schönheitspreis (stammt von einer anderen Vorlage):
#!/usr/bin/perl -w
use strict;
use warnings;
for ( my $i =1; $i)) {
chomp( $line );
if ( $line eq "abc") { last;
}
if ( $line eq "n") {
next;
}
print ( "$line\n" );
}
}
mfg M.L.
Hallo,
wer hilft mir, ein folgendes PERL Programm, das den
Benutzer auffordert, ein intern
definiertes Passwort (Zeichenkette) zu erraten, zu schreiben?
Falls das eingegebene Passwort nicht identisch ist, soll eine
Fehlermeldung zusammen mit
…
ich hab schon den anfang:
#!/usr/bin/perl
{
…
Wenn *das* ( { ) der Anfang sein soll, dann
müßte es so weitergehen:
use strict; # ;
chomp $input and !length $input and last;
print("Fehler: '$input'\n") && redo if $pass ne $input;
print "Erfolg!\n"
}
Grüße
CMБ