---

Davs igen hehe.

Ja så er jeg på banen igen med et lille problem.
Denne lille del af mit script skal sammen ligne 2 passwords og hvis de ikke
er ens skal den begynde forfra, men det sker ikke.
Scriptet køre bare videre som om de 2 passwords var ens...... hvad gør jeg
forkert her ..?

STD3:
print ("Enter Password: ");
$pw = <STDIN>;
chop ($pw);

print ("Enter Password Again: ");
$pw2 = <STDIN>;
chop ($pw2);

if( $pw == $pw2 )
{
print ("Enter Full Name: ");
$name = <STDIN>;
chop ($name);
}
else
{
print ("The passwords do not match, please try again.\n");
goto STD3
}

---

"Torben Jakobsen" <snuden@spanden.dk> writes:

> if( $pw == $pw2 )

== tester altid om to variable er ens opfattet som tal. Og da en
streng der ikke begynder med et tal vil blive opfattet som tallet 0 er
de næsten altid ens.

Du skal istedet skrive:

if ($pw eq $pw2) {


--
Peter Makholm | I have no caps-lock but I must scream...
peter@makholm.net | -- Greg
http://hacking.dk |

---

Peter Makholm <peter@makholm.net> writes:

> "Torben Jakobsen" <snuden@spanden.dk> writes:
>
> > if( $pw == $pw2 )
>
> == tester altid om to variable er ens opfattet som tal. Og da en
> streng der ikke begynder med et tal vil blive opfattet som tallet 0 er
> de næsten altid ens.

Det kan i den anledning anbefales at slå warnings til, da den så rent
faktisk ville have brokket sig lidt over det.

--
Med venlig hilsen
Christian Laursen

---

Tak det var lige det der skulle til, må hellere til at få bestilt mig en bog
om perl... så der ikke kommer for mange tarvelige sprøgsmål hehe.

"Peter Makholm" <peter@makholm.net> wrote in message
news:877kce7bxb.fsf@xyzzy.adsl.dk...
> "Torben Jakobsen" <snuden@spanden.dk> writes:
>
> > if( $pw == $pw2 )
>
> == tester altid om to variable er ens opfattet som tal. Og da en
> streng der ikke begynder med et tal vil blive opfattet som tallet 0 er
> de næsten altid ens.
>
> Du skal istedet skrive:
>
> if ($pw eq $pw2) {
>
>
> --
> Peter Makholm | I have no caps-lock but I must scream...
> peter@makholm.net | -- Greg
> http://hacking.dk |

---

Torben Jakobsen <snuden@spanden.dk> wrote:

> Tak det var lige det der skulle til, må hellere til at få bestilt mig en bog
> om perl... så der ikke kommer for mange tarvelige sprøgsmål hehe.

Man kan opdage en del problemer (og dermed måske nemmere finde løsningen
på dem) ved at have

use strict;
use warnings;

som noget af det første.

mvh
--
Allan Joergensen aka alj on eu.freenode.net

"Give me liberty or give me death!" - Patrick Henry, 1775