Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re: Re: Re: Tripwire tests and future-proofing

by zby (Vicar)
on May 25, 2004 at 09:40 UTC ( #356149=note: print w/ replies, xml ) Need Help??


in reply to Re: Re: Tripwire tests and future-proofing
in thread Tripwire tests and future-proofing

From Test::More:

ok($this eq $that, $test_name);
This simply evaluates any expression ($this eq $that is just a simple example) and uses that to determine if the test succeeded or failed. A true expression passes, a false one fails. Very simple.
So it's not exactly what you describe.

Additionally a list in scalar context returns it's last value not the number of it's elements. So your explanation of what happens after the keys function is not right.

Update:

$ perl -e '%h = (1, 1, 1, 1); print scalar keys %h, "\n"' 1
$ perl -e 'print scalar (1, "a"), "\n";' a


Comment on Re: Re: Re: Tripwire tests and future-proofing
Select or Download Code
Re^4: Tripwire tests and future-proofing
by adrianh (Chancellor) on May 25, 2004 at 09:51 UTC
    So it's not exactly what you describe.

    As BUU said in his post this is the ok from Test, not the one from Test::More.

      Thanks. And what with the other question?

        Two questions:

        • How many items are in the hash in the example you gave?
        • Does keys actually returns a list in a scalar context?

        :-)

        keys in scalar context returns the number of elements in the resulting list. Whether this is magic in the keys function, or it's returning an "array" instead of a "list", I have no idea.

        >perl -e"%x=qw/foo bar 1 2 3 4 baz bar/; print scalar keys %x" 4

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://356149]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (2)
As of 2014-09-18 00:03 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (101 votes), past polls