Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re^2: Diagnostic messages in Test::Deep

by KeighleHawk (Scribe)
on Jul 21, 2015 at 13:31 UTC ( [id://1135609]=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    $got = 
        [ { key_1 => "A", key_2 => "CC"}
    ...
        [ { key_1 => "B", key_2 => "CC"}
        , { key_1 => "A", key_2 => "CC"}
        ]
    
  2. or download this
    return is deeply ( $got
                       ? [ sort {$a->{key_1} cmp $b->{key_1}}
    ...
                                  $expected ]
                       : []
                     , "Test array of hashes"
    
  3. or download this
    $got = 
        [ { key_3 => "A", key_2 => "CC"}
    ...
        [ { key_3 => "B", key_2 => "CC"}
        , { key_3 => "A", key_2 => "CC"}
        ]
    
  4. or download this
    sort {$a->{key_1} cmp $b->{key_1}}
    
  5. or download this
    return = cmp_deeply ( $got
                          ? [ $got ]
    ...
                                ? $expected
                                : () )
                        );
    

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others taking refuge in the Monastery: (6)
As of 2024-03-29 01:25 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found