Microsoft (R) Program Maintenance Utility   Version 7.00.8882
Copyright (C) Microsoft Corp 1988-2000. All rights reserved.

Installing C:\cpanrun-5.8\build\5-8-0\site\lib\Tie\EncryptedHash.pm
Writing C:\cpanrun-5.8\build\5-8-0\site\lib\auto\Tie\EncryptedHash\.packlist
Appending installation info to C:\cpanrun-5.8\build\5-8-0\lib/perllocal.pod
que.....1..1
ok 1
ok
t\construction.....1..2
ok 1
ok 2
ok
t\emptysubclass....1..45
(Object) STORE/FETCH to/from unencrypted field: 
ok 1
(Object) STORE/FETCH to/from encrypted field:
ok 2
(Object) STORE/FETCH with incorrect password:
ok 3
(Object) Recover from password change:
ok 4
(Object) EXISTS unencrypted field:
ok 5
(Object) !EXISTS unencrypted field:
ok 6
(Object) EXISTS encrypted field:
ok 7
(Object) !EXISTS encrypted field:
ok 8
(Object) EXISTS encrypted field (incorrect password):
ok 9
$VAR1 = bless( {
                 'plain' => 'Mirrorshades.',
                 '_encrypted' => 'Blowfish WbAF2nIzDi/afBW2b/WshQ 53616c7465645f5f30b47a5efcfadfe171730db5dfb2707b8b988db63f9b34f2'
               }, 'Tie::SecretHash' );
(Object) EXISTS encrypted field (incorrect password + hide):
ok 10
(Object) DELETE plaintext field:
ok 11
(Object) DELETE encrypted field:
ok 12
(Object) FIRSTKEY/NEXTKEY:
plain clone _encrypted
ok 13
(Object) CLEAR Hash with incorrect password:
ok 14
(Object) CLEAR Hash with correct password:
ok 15
(TiedHash) STORE/FETCH to/from unencrypted field: 
ok 16
(TiedHash) STORE/FETCH to/from encrypted field:
ok 17
(TiedHash) STORE/FETCH with incorrect password:
ok 18
(TiedHash) Recover from password change:
ok 19
(TiedHash) EXISTS unencrypted field:
ok 20
(TiedHash) !EXISTS unencrypted field:
ok 21
(TiedHash) EXISTS encrypted field:
ok 22
(TiedHash) !EXISTS encrypted field:
ok 23
(TiedHash) EXISTS encrypted field (incorrect password):
ok 24
$VAR1 = {
          'plain' => 'Mirrorshades.',
          '_encrypted' => 'Blowfish WbAF2nIzDi/afBW2b/WshQ 53616c7465645f5f432d1bed418786d3479379e26a122eeb67e9873a07ca674c'
        };
(TiedHash) EXISTS encrypted field (incorrect password + hide):
ok 25
(TiedHash) DELETE plaintext field:
ok 26
(TiedHash) DELETE encrypted field:
ok 27
(TiedHash) FIRSTKEY/NEXTKEY:
plain clone _encrypted
ok 28
(TiedHash) CLEAR Hash with incorrect password:
ok 29
(TiedHash) CLEAR Hash with correct password:
ok 30
STORE/FETCH explicit reference:
ok 31
HASH(0x15dbc24)FETCH explicit reference with incorrect password:
Blowfish ivpMP2Oikjxi7p4vuLLVVw 53616c7465645f5f9ee3f86d42b18569e7743786375023d699fd502e8775cca26c66f81997bf54323f64bc1fe8fde9c6b7623e41cbd1fa9e0c365ee8d285bdb3978f759aa4767fd80bd3e83a5a2fa9ea4cf9b3d0ecd78bc5d5df28f46b7622a5
ok 32
Autovivification:
ok 33
Autovivification with incorrect password:
ok 34
Encryption and serialization of implicit references at FETCH:
ok 35
Recovery from password change:
ok 36
More Autovivification:
ok 37
ok 38
STORE/FETCH encrypted listref:
ok 39
ok 40
FETCH encrypted listref with incorrect password:
ok 41
ok 42
STORE/FETCH encrypted scalarref:
ok 43
STORE/FETCH encrypted scalarref with incorrect password:
ok 44
ok 45
ok
t\hide.............1..4
ok 1
ok 2
ok 3
ok 4
ok
t\opertations......1..30
(Object) STORE/FETCH to/from unencrypted field: 
ok 1
(Object) STORE/FETCH to/from encrypted field:
ok 2
(Object) STORE/FETCH with incorrect password:
ok 3
(Object) Recover from password change:
ok 4
(Object) EXISTS unencrypted field:
ok 5
(Object) !EXISTS unencrypted field:
ok 6
(Object) EXISTS encrypted field:
ok 7
(Object) !EXISTS encrypted field:
ok 8
(Object) EXISTS encrypted field (incorrect password):
ok 9
$VAR1 = bless( {
                 'plain' => 'Mirrorshades.',
                 '_encrypted' => 'Blowfish WbAF2nIzDi/afBW2b/WshQ 53616c7465645f5f357e4d8a5e23f9d40ef20557dc848a02528dfe2309d2b2a2'
               }, 'Tie::EncryptedHash' );
(Object) EXISTS encrypted field (incorrect password + hide):
ok 10
(Object) DELETE plaintext field:
ok 11
(Object) DELETE encrypted field:
ok 12
(Object) FIRSTKEY/NEXTKEY:
plain clone _encrypted
ok 13
(Object) CLEAR Hash with incorrect password:
ok 14
(Object) CLEAR Hash with correct password:
ok 15
(TiedHash) STORE/FETCH to/from unencrypted field: 
ok 16
(TiedHash) STORE/FETCH to/from encrypted field:
ok 17
(TiedHash) STORE/FETCH with incorrect password:
ok 18
(TiedHash) Recover from password change:
ok 19
(TiedHash) EXISTS unencrypted field:
ok 20
(TiedHash) !EXISTS unencrypted field:
ok 21
(TiedHash) EXISTS encrypted field:
ok 22
(TiedHash) !EXISTS encrypted field:
ok 23
(TiedHash) EXISTS encrypted field (incorrect password):
ok 24
$VAR1 = {
          'plain' => 'Mirrorshades.',
          '_encrypted' => 'Blowfish WbAF2nIzDi/afBW2b/WshQ 53616c7465645f5f41cca40796d2b8b3feb0e7356d7818c417274477fec97589'
        };
(TiedHash) EXISTS encrypted field (incorrect password + hide):
ok 25
(TiedHash) DELETE plaintext field:
ok 26
(TiedHash) DELETE encrypted field:
ok 27
(TiedHash) FIRSTKEY/NEXTKEY:
plain clone _encrypted
ok 28
(TiedHash) CLEAR Hash with incorrect password:
ok 29
(TiedHash) CLEAR Hash with correct password:
ok 30
ok
t\ref..............1..15
STORE/FETCH explicit reference:
ok 1
HASH(0x15dba8c)FETCH explicit reference with incorrect password:
Blowfish ivpMP2Oikjxi7p4vuLLVVw 53616c7465645f5f07e3c12d54a1db25f4f57f671b0ddd1255c841c71fd21c961c85f591890f932031031bbc1afb92d5ef5eff2de78c35938486071f02175b50624bb981ab2602e3a2a1e27a46bebbe0e242ed527bee0a1ed14f10b9ad171d96
ok 2
Autovivification:
ok 3
Autovivification with incorrect password:
ok 4
Encryption and serialization of implicit references at FETCH:
ok 5
Recovery from password change:
ok 6
More Autovivification:
ok 7
ok 8
STORE/FETCH encrypted listref:
ok 9
ok 10
FETCH encrypted listref with incorrect password:
ok 11
ok 12
STORE/FETCH encrypted scalarref:
ok 13
STORE/FETCH encrypted scalarref with incorrect password:
ok 14
ok 15
ok
t\reforgy..........1..1
generating a large, random data structure...
$VAR1 = {
          '_Arag' => 'Blowfish +etowgmta/yGkmD0YbHOiQ 53616c7465645f5fb60404df803c0799490ce2df0118e2faaff81db436c4bc74f6f35eb1dd233b9e1eaf104e5f1c797a8409edbb0b13d0bfbad5773b322fe13b7a05085a58ac8eac5333bffa4eb358f9a7cbf0d83ad0843fa64645458bd053349ee99abca053f71b',
          '_Aran' => 'Blowfish z0mpSie8W4SqYGRO6FcHwg 53616c7465645f5fb56e0d8976c191d9ea29f8f61e2b5e474c0f856fc8b74aff9838acf06d0512c05f2a87ed56a5c0afdfdabf6596fe421edd408b60dc8bdcbd7d4b68d161b3db30cd2bb0441f7e10baf60ad2d585ef446f468e5c489abb647a',
          '_Arat' => 'Blowfish tRmFWnxeH4SMP7y9CFAFGg 53616c7465645f5fee28c7540c76f086bb7554c3547e45b04cbaf07e0908702ef543d36060ef7719d5b63168b94a0d080576bdcf897f65a1e750e981aecdb015a1353ced636d66e961ee7eb308df045d48f5acfd397c59cf3d0dcf1e023e56b33668f24653af2bd0727b7ecfef28ef0724dfdd07d1808c80189596b655304a0eb89a41f1a49b0d32',
          '_Araz' => 'Blowfish qE2gea9E8NtE9gj/F7CYqg 53616c7465645f5fb8c1d66d71b47791acea0deee59077b9bcf982866340a99af2314306f4f38bd2d06f26f56999b6cab4700443fbddf32352cf1faed5eb49d4c17b04fcd39e234ded11fd1bfe39cab78f38c5b11a9aa56b064def7ce2307a5fc9caac784b07f52b1127cbd5af758af4ac858ec956841e69db1a5538aeef038c544370d7f0a4424602f78e78ad99910536919c010cfd5ed8',
          '_Aram' => 'Blowfish 5R77XZgrHH9sEjssjpjRxQ 53616c7465645f5f8cfa650ad765e6408d075981ca022280250f1d55eeb78cb32dd2246dbf4bbb93916814b0980e8ed6679373fb7fe41972b4b71b377caf64048d8b8fa3914b5d2a7448a12af37f3991814de342725178d0491d8007c431b7ce269bbbb1dcd5ab5ee4c776aa057f4830',
          '_Arah' => 'Blowfish 57t3a1AtFudkTsMOGW4aUA 53616c7465645f5ff40959d82ed9ebb8f0d38cc82cbe161cfb9ad759d6a2bc19979fe8bfb5fc569d04b0d56e24cbeb68db5f3a3233745dbe4568e8751947f63e900118f45e89288d941f7943069f3b97b8e531735eb0c9d2eef7b4b383f4d9c46c2e9b81fa6de23c4a9c35a88af21513',
          '_Arab' => 'Blowfish 173fSADs9iztLyOhH2oOLw 53616c7465645f5f0e0620877dbb408f91651e6be01b141e8abbd1e4dc53e4cef7a281207e9a780ae4ec52955f5d570a019faaeb7bc68305',
          '_Araw' => 'Blowfish n8QX8x3FbbmUGjERv0Jpyg 53616c7465645f5fb8652274dc266f90457c8f41dba6e4554e45a92e4905179d2bc1124851e3bae094aeb94d31b6ee7b07ca6d6ced5b5b44fd114010d34de4f52b97a16819e52f09',
          '_Aray' => 'Blowfish L+8I4Phu/LOVAEn9eQkjhQ 53616c7465645f5f58a6d37d0adc3395e0b33b5c4f89b8d36e01842b3b0285b89ce1295debf10fa7e387c64b2c44af127dd1b0fe3f8b264cd8aca60f039adaaa8d2f6430bb8aa9852008216be5f39afd24606377e8830318befa837f9f8da5e71a6ae2dcdca1645b67b57306913dd20c2359cfb9fe2b74015afdd3273113097c387294f91e27634c5b5318210a1db4fb',
          '_Araj' => 'Blowfish hp4Cr41F5BsXc6VYD0BdcA 53616c7465645f5f471065e8aa987883961c3c9d51afd6bb8d31135800d1d68d2708cc03e942ca8589885b6ade0a7492abeafbb02f041d7a473b48aab2f0656b',
          '_Arae' => 'Blowfish ore86Hz8b/y3MTEEEcmeVA 53616c7465645f5fd79f16721884fb6b4431cc37e63fe60481cdb0aacfdd26fd74a16e98d2abc069',
          '_Arac' => 'Blowfish Wpu6rq6ZBJY1lGLzXyuOLA 53616c7465645f5ffd03227de5ce8ec23430e3490e4efc9474cf056c0280d0a0592903d619510e5c1fbc422463c5a0e2da05fdc0542f8af75a6c4606971aa6e4c25790170d6bd3cdaed5405714845dc9',
          '_Arar' => 'Blowfish Fu45XFyNDt752c712jP8Og 53616c7465645f5f9cc5585bef60f5c35891b7f3a1ee0dc27276cb3b40a0961e718b9f5526a2089138d3278150d51f6c9dd827475d829c8e01cbde720bee7462b304fb6a7786bf24',
          '_Arao' => 'Blowfish BAZL7LchwMpVkfvm01Oesw 53616c7465645f5f6b9144bd19ae6ae859880879cfbc2aa06b31dfe220f2d62cfac25201ca2318a0296743f7b4b992eab143fb39a6540fae83513bc819a9e44147a399494196db2a819ad49c2ee11364a59ba07923c98516',
          '_Araq' => 'Blowfish rIgRGswyyI4hcOUfrwmj/Q 53616c7465645f5f8096053ea7b3be88b609d636c7ff92d66d42f9c7374d8682640a494f115b98826e02a3242c55b777d92920344c435da248c358f3580c8e685ebec484a7b357cc07d056f87e93a9e2458a5b637e1530c9909335edf5e8eb3cdbef94c4299259465172f71877b08916d4f789308e53a18d6ec1aafeb73f6051',
          '_Arak' => 'Blowfish cRemtnl3k0rik6vLVSfuvQ 53616c7465645f5f780cbe123100199753e5bfba2ff7e1aa4e588233696717267d7342b5d69a8b4ec3279e2d09a3051c86e5060cd218b92c67d26261b388d238ec9f028758b5a0f63089037182ecdbb670cdba08236da703f6b81e9ba9face751e5dc13439266064d3cdc4fcda2f9e26',
          '_Arav' => 'Blowfish pYkyXTbwnKNVZL6lYZcrNQ 53616c7465645f5f41dda4d144f5597ee08d2a933eb0edd136a7edd41898e9c39a98530900cb3e06d76ce9696c5535808357937078c2e70554ebea87e5b79fcfc6ef3e43e90bd974f3091764a2cffa0953d2f2e4ea78e6b864795e9bbadba5ba8cf31632407227dbaf625719cf846158f55c4e50bb980147',
          '_Arap' => 'Blowfish deWOngyG4FBLow9U7j1WgQ 53616c7465645f5f8262b1659513181c7abb2b40bbce2fc2772cec1c9b3e920f82c34e3a1c081e0fd269c7a62483e950768ab3c791fa094b9e7104d7c930cf65d1b50f0b3eecc3d538b2e1dfdbc59577f1bbced9f19a7309f4368f3868eeba5c1f72a69defde8cb33609e6dd635a430b325ba06e06249568ce52519ec713bb9dc85b7b20bddcecfa1b1f24cb574a8e62',
          '_Arad' => 'Blowfish zZklxzlYAhMMf+3nnrxElg 53616c7465645f5fa552f519dc724ae139412fb0098454678329b109464eda05b2e5f4145876d54f7d6ceeae939474d999c3300cbe2465af2adde892c531f50b48318381c99f6dc47d5a148b1fbce99cca7b1746628d0b82d45b7b1c774a60e3bd76b4369a1a4cbacb5ccac66c1b790bbf2fd716786e3d69a3c70be98733e51113591bc44cfac63d133273d2e6f1e70ac1d5126329808386e8084f20479b0a640ad01efa6de632daa912e9587d8990f6ffce6566741acc5e',
          '_Aras' => 'Blowfish PpkITdCxGN2MZakCLKWrAg 53616c7465645f5f7ebd86c34d577b0b1cb2682ad985ebd87d303d3aa27cc07cccd481ae06753dd036f97bf3302237cb690dcd50aaa013b3a2a8a90dbca1a7355cd979ea218bc6f748a21665bc53938dd9203f516db171f75c52ff0820c32a1d2fc344fb4c77591a',
          '_Araa' => 'Blowfish XzkjK7quqflIdmQvfkWuQQ 53616c7465645f5f97391210b0eab704467546b145183cc55ae55f21d1ba7bbcc8ab122b1a43976b463da0aa0579d623f4401501a00605208cac8e0b336d35407079531016c371ebfe65755f4319c23a6528ca419371857543326e0b3df96ece4a27b2c92484bc1ad4401e8443840a5746f864d7f3010e89b663c3f8d4b8ba0f7876f4087e3fc650a2604865badadd9ce8aa23ac4a026f42',
          '_Arai' => 'Blowfish yZs+dYIXMwO0VnOIosq72w 53616c7465645f5f172310f51d0504df300e954d24d7ac7f4855d3620ddcf2421231994c7cb5d0b9e835c3feeb612fbb1f99ab175a389f730b977c4fac7cecd674f7b46909a81f81025e18acb54b3c8e8e719cbc50676dd1f078ba27d109afc3c0b3cc25ae4d318b65d31c6e39f6eba527b3bf6616c1287f945ef1fa78e1375e',
          '_Arax' => 'Blowfish RQJZS+z1AeRIKvFApXqYmA 53616c7465645f5f4b04913b523289f5141d90ce1649a136e96046643193d59cb28048cbd4292c25c650eb97df40ab51309618cb08c221dd',
          '_Aral' => 'Blowfish DL+MCWyFY2jWuJZvi9V/vA 53616c7465645f5fcf18b029abb84a9f18e510c09c81a055cbed9cf5bc4dc1401071a93e1df1e80c43ca15006ee646403d19551c5cf132df4db9d65fb7f6822a7cecac159b556458ea006752ebe264fd141869cb782f905442dfa6724aac6da46571b6fa13b7b00e9365cea2f2153d5bde69b33883fcc333cfa96e7baa169aee0e312bbd74d808a1',
          '_Arau' => 'Blowfish VoTFQP8jAspvzmlOYux84A 53616c7465645f5f59f0a354c0d48d18b5d9f470e4bdaa3fe6c421201172df432351802b8ea1d417dd4ea78bf0483ebe01fea35c87cbf26410a59ac7f652546606981418cb5dfd5db272b0c61479f631597ce1c3dceba5ea',
          '_Araf' => 'Blowfish 4Izs+l9q6PLKXaoxX6TsYQ 53616c7465645f5f1e3a6e8b990ed677d934e8740e649b0ffd61fae9e993303ca6cbd9a2604979d459e3975d54bb7f4c8d7cc62bb6fd065c0d1c554bb121676dfa0b907d7847ac94dc96d9d1d78d6384a482cce97b0e44bacfe3c40a9323927dd508f7f65c8a0a2ddc10ad5df913cd28e5456961fc401a386b0629f278acb8ae75cb0a0bff7b4a330e4082c6ca11e370e551bdfeeb7df4ef'
        };
$VAR1 = {
          '_Arag' => [
                       {
                         '_Arar' => [
                                      1,
                                      2
                                    ]
                       },
                       undef,
                       {
                         '_Araw' => [
                                      1,
                                      2
                                    ]
                       },
                       {
                         '_Arar' => '_Arag_Aral'
                       }
                     ],
          '_Aran' => [
                       {
                         '_Araw' => []
                       },
                       {
                         '_Aral' => '_Aram'
                       },
                       {
                         '_Arac' => '_Aran'
                       }
                     ],
          '_Arat' => [
                       {
                         '_Aran' => [
                                      1,
                                      2,
                                      3
                                    ]
                       },
                       {
                         '_Aram' => [
                                      1
                                    ]
                       },
                       {
                         '_Araw' => [
                                      {
                                        '_Arat' => [
                                                     1,
                                                     2
                                                   ]
                                      }
                                    ],
                         '_Arae' => [
                                      {
                                        '_Araw' => []
                                      }
                                    ]
                       }
                     ],
          '_Araz' => [
                       {
                         '_Aral' => [
                                      undef,
                                      {
                                        '_Araa' => [
                                                     1,
                                                     2,
                                                     3
                                                   ]
                                      }
                                    ]
                       },
                       undef,
                       {
                         '_Arat' => '_Araz'
                       },
                       {
                         '_Araq' => [
                                      undef,
                                      undef,
                                      undef,
                                      {
                                        '_Arah' => [
                                                     1
                                                   ]
                                      }
                                    ]
                       }
                     ],
          '_Aram' => [
                       {
                         '_Arap' => []
                       },
                       {
                         '_Araz' => [
                                      1,
                                      2
                                    ]
                       },
                       undef,
                       {
                         '_Aran' => [
                                      undef,
                                      {
                                        '_Araj' => [
                                                     1
                                                   ]
                                      }
                                    ]
                       }
                     ],
          '_Arah' => [
                       {
                         '_Arac' => [
                                      1,
                                      2,
                                      3
                                    ]
                       },
                       {
                         '_Arar' => []
                       },
                       undef,
                       {
                         '_Arav' => [
                                      {
                                        '_Araz' => [
                                                     1,
                                                     2,
                                                     3
                                                   ]
                                      }
                                    ]
                       }
                     ],
          '_Arab' => [
                       undef,
                       {
                         '_Arah' => [
                                      1,
                                      2
                                    ]
                       }
                     ],
          '_Araw' => [
                       undef,
                       {
                         '_Aran' => [
                                      {
                                        '_Arae' => [
                                                     1
                                                   ]
                                      }
                                    ]
                       }
                     ],
          '_Aray' => [
                       {
                         '_Arax' => [
                                      {
                                        '_Arao' => [
                                                     1
                                                   ]
                                      }
                                    ],
                         '_Arar' => {
                                      '_Arad' => '_Arag'
                                    }
                       },
                       undef,
                       undef,
                       {
                         '_Aram' => {
                                      '_Araa' => '_Araf'
                                    }
                       }
                     ],
          '_Araj' => [
                       {
                         '_Arab' => '_Arax_Araj'
                       }
                     ],
          '_Arae' => [
                       {},
                       {}
                     ],
          '_Arac' => [
                       {
                         '_Arad' => [
                                      1,
                                      2
                                    ]
                       },
                       undef,
                       {
                         '_Arav' => '_Arax'
                       }
                     ],
          '_Arar' => [
                       undef,
                       {
                         '_Araz' => []
                       },
                       {
                         '_Aray' => [
                                      1,
                                      2
                                    ]
                       }
                     ],
          '_Arao' => [
                       {
                         '_Arah' => [
                                      1
                                    ]
                       },
                       undef,
                       {
                         '_Aram' => [
                                      {
                                        '_Araj' => [
                                                     1,
                                                     2
                                                   ]
                                      }
                                    ]
                       }
                     ],
          '_Araq' => [
                       {
                         '_Arax' => [
                                      {
                                        '_Arat' => [
                                                     1
                                                   ]
                                      }
                                    ],
                         '_Arar' => [
                                      1
                                    ]
                       },
                       undef,
                       {
                         '_Aras' => '_Arab'
                       },
                       {
                         '_Arar' => [
                                      1,
                                      2
                                    ]
                       }
                     ],
          '_Arak' => [
                       undef,
                       {
                         '_Araq' => []
                       },
                       {
                         '_Araq' => [
                                      undef,
                                      {
                                        '_Aram' => []
                                      }
                                    ]
                       },
                       {
                         '_Arad' => [
                                      1,
                                      2,
                                      3
                                    ]
                       }
                     ],
          '_Arav' => [
                       {
                         '_Arad' => [
                                      1,
                                      2,
                                      3
                                    ]
                       },
                       {
                         '_Araa' => {
                                      '_Aray' => '_Arap'
                                    },
                         '_Arau' => '_Arat'
                       },
                       undef,
                       {}
                     ],
          '_Arap' => [
                       undef,
                       {
                         '_Arax' => '_Arao_Arak'
                       },
                       {
                         '_Araj' => [
                                      undef,
                                      {
                                        '_Arad' => [
                                                     1,
                                                     2
                                                   ]
                                      }
                                    ],
                         '_Arap' => '_Arat'
                       },
                       {
                         '_Arag' => [
                                      1
                                    ]
                       }
                     ],
          '_Arad' => [
                       {
                         '_Araz' => [
                                      undef,
                                      undef,
                                      {
                                        '_Aram' => [
                                                     1,
                                                     2
                                                   ]
                                      }
                                    ]
                       },
                       {
                         '_Arau' => [
                                      undef,
                                      undef,
                                      {
                                        '_Aram' => []
                                      }
                                    ]
                       },
                       {
                         '_Aray' => [
                                      1
                                    ]
                       },
                       {
                         '_Arav' => [
                                      undef,
                                      undef,
                                      {
                                        '_Araw' => []
                                      }
                                    ]
                       }
                     ],
          '_Aras' => [
                       {
                         '_Araw' => {
                                      '_Arax' => '_Arae'
                                    }
                       },
                       {
                         '_Arao' => []
                       },
                       {
                         '_Arav' => [
                                      1
                                    ]
                       }
                     ],
          '_Araa' => [
                       {
                         '_Arax' => [
                                      undef,
                                      undef,
                                      {
                                        '_Aral' => [
                                                     1
                                                   ]
                                      }
                                    ]
                       },
                       {
                         '_Araz' => [
                                      undef,
                                      {
                                        '_Arae' => []
                                      }
                                    ]
                       },
                       {
                         '_Aram' => []
                       },
                       {
                         '_Arae' => '_Arae'
                       }
                     ],
          '_Arai' => [
                       undef,
                       {
                         '_Arat' => '_Arad'
                       },
                       {
                         '_Araf' => [
                                      undef,
                                      {
                                        '_Arak' => [
                                                     1
                                                   ]
                                      }
                                    ]
                       },
                       {
                         '_Araj' => '_Araw_Arah'
                       }
                     ],
          '_Arax' => [
                       undef,
                       undef,
                       undef,
                       {}
                     ],
          '_Aral' => [
                       {
                         '_Aras' => [
                                      undef,
                                      undef,
                                      {
                                        '_Aram' => [
                                                     1,
                                                     2
                                                   ]
                                      }
                                    ]
                       },
                       {
                         '_Aral' => '_Arau'
                       },
                       {
                         '_Arax' => '_Arah'
                       },
                       {
                         '_Araa' => [
                                      1
                                    ]
                       }
                     ],
          '_Arau' => [
                       undef,
                       undef,
                       {
                         '_Arad' => [
                                      1,
                                      2
                                    ]
                       },
                       {
                         '_Arac' => '_Arae_Aram'
                       }
                     ],
          '_Araf' => [
                       {
                         '_Arai' => '_Araz'
                       },
                       undef,
                       {
                         '_Arap' => [
                                      undef,
                                      undef,
                                      undef,
                                      {
                                        '_Arak' => [
                                                     1,
                                                     2
                                                   ]
                                      }
                                    ],
                         '_Araz' => [
                                      1,
                                      2
                                    ]
                       },
                       {
                         '_Araf' => [
                                      1,
                                      2,
                                      3
                                    ]
                       }
                     ]
        };
ok 1
ok
All tests successful.
Files=7, Tests=98,  5 wallclock secs ( 0.00 cusr +  0.00 csys =  0.00 CPU)