Conditionally Changing a Variable

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Conditionally Changing a Variable by Rhose (Priest) on Dec 17, 2001 at 23:01 UTC
Might want to move the $ `$c=0 if ($c < 0);` [download]	[reply] [d/l]
Re: Re: Conditionally Changing a Variable by Anonymous Monk on Dec 17, 2001 at 23:44 UTC
Typo. That's what I get for trying to do something quickly before lunch. Shades of old Basic programming shinning through. However, I could not get this to work last night....now it does....at work. Maybe my Perl interpreter on the home machine is broken. I had a similar problem in the past with variables such as: `$n = $filenameB if ($n = $filenameA);`	[reply] [d/l]
Re3: Conditionally Changing a Variable by Hofmator (Curate) on Dec 17, 2001 at 23:53 UTC
I had a similar problem in the past with variables such as: `$n = $filenameB if ($n = $filenameA);` No wonder you are having problems with this, two errors in the same line :). First of all you are doing an assignment in the if-condition so this should be '==' instead of '='. And second '==' only works for numbers which is probably not what you want ($filename !!). You should use 'eq' instead. `$n = $filenameB if ($n eq $filenameA);` -- Hofmator	[reply] [d/l] [select]
Re: Re3: Conditionally Changing a Variable by Anonymous Monk on Dec 18, 2001 at 00:05 UTC
Re: Conditionally Changing a Variable by joealba (Hermit) on Dec 17, 2001 at 23:05 UTC
Works fine for me, without the typo. Was that a cut-n-paste error, or is that your actual code (with the `c$` instead of `$c` in your conditional)? `my $c = -5; print "C is now $c\n"; $c = 0 if ($c < 0); print "C is now $c\n";` [download]	[reply] [d/l] [select]


Think about Loose Coupling
	PerlMonks