Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl --
    use strict;
    use warnings;
    ...
    SCALAR(0x3f90cc)
    Key not present in hash using SCALAR(0xabe37c) on HASH(0x3f90dc) (from
    + Data::Diver).
    
  2. or download this
    ok( 'val', Dive( { qw/ key val / }, \'key' ) );
    ok( 'val', Dive( { qw/ key val / }, 'key' ) );
    ok( 'val', DiveVal( { qw/ key val / }, \'key' ) );
    ok( 'val', DiveVal( { qw/ key val / }, 'key' ) );