my $result = cmp_deeply(
    $expected,
    $actual,
    sub { lc shift eq lc shift },
    "This is a test using a callback to compare.
);