Re: Proper use of And

Bracketing your example with <code> and </code>

if ($Session->{'usrType'} eq 'Pro') and 
    ($Session->{'usrSystem' =~/SEF/VAL/SUM/SAR/MRT/ALB/MRE/VER/RML/AUS
+/ORG/MSX/BAR/LAS/)
{do something}
[download]

I can see several typos. It should look like:

if ( ($Session->{'usrType'} eq 'Pro') and 
    ($Session->{'usrSystem'} =~/SEF/VAL/SUM/SAR/MRT/ALB/MRE/VER/RML/AU
+S/ORG/MSX/BAR/LAS/))
{do something}
[download]

You should always use use strict; use warnings; If there's still a problem, have you considered displaying the values of $Session->{usrType} and $Session->{usrSystem}?

Comment on Re: Proper use of And Select or Download Code

Replies are listed 'Best First'.
Re^2: Proper use of And by Anonymous Monk on Jan 09, 2008 at 20:55 UTC
Again, as philcrow already pointed out, `/SEF/VAL/SUM/SAR/MRT/ALB/MRE/VER/RML/AUS/ORG/MSX/BAR/LAS/` should be `/SEF\|VAL\|SUM\|SAR\|MRT\|ALB\|MRE\|VER\|RML\|AUS\|ORG\|MSX\|BAR\|LAS/`	[reply] [d/l] [select]