Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options

Re: var comparison

by Kenosis (Priest)
on Sep 06, 2012 at 19:46 UTC ( #992177=note: print w/replies, xml ) Need Help??

in reply to var comparison

Using smart matching (5.10+) is another option (unless 'clarity of intent' is compromised):

$var ~~ [qw/foo bar/];

Replies are listed 'Best First'.
Re^2: var comparison
by LanX (Bishop) on Sep 06, 2012 at 23:39 UTC
    carefull! better always stringify if you're not sure that its not a ref "$var" ~~ [qw/foo bar/]

      Why, with the following expected behavior?

      use Modern::Perl; my $var1 = 'foo'; my $var2 = \$var1; say $var2; # prints SCALAR(0x2590b8) say "$var2"; # prints SCALAR(0x2590b8) say $var1 ~~ [qw/foo bar/]; # is true: prints 1 say $var2 ~~ [qw/foo bar/]; # is false: prints nothing say "$var2" ~~ [qw/foo bar/]; # is false: prints nothing
Re^2: var comparison
by nemesisgus (Acolyte) on Sep 06, 2012 at 22:00 UTC
    Thanks Kenosis. Smart matching promises to be a new friend from now on.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://992177]
and a soft breeze sighs...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (6)
As of 2018-06-21 00:02 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (117 votes). Check out past polls.