sbuild (Debian sbuild) 0.85.10 (30 May 2024) on carme.larted.org.uk +==============================================================================+ | libautovivification-perl 0.18-2+b4 (amd64) Sat, 14 Sep 2024 11:57:24 +0000 | +==============================================================================+ Package: libautovivification-perl Version: 0.18-2+b4 Source Version: 0.18-2 Distribution: perl-5.40 Machine Architecture: amd64 Host Architecture: amd64 Build Architecture: amd64 Build Type: any I: NOTICE: Log filtering will replace 'var/run/schroot/mount/perl-5.40-amd64-debomatic-02116366-96ba-4404-8c4e-bc453a419c96' with '<>' +------------------------------------------------------------------------------+ | Chroot Setup Commands | +------------------------------------------------------------------------------+ /usr/share/debomatic/sbuildcommands/chroot-setup-commands/dpkg-speedup libautovivification-perl_0.18-2 perl-5.40 amd64 ---------------------------------------------------------------------------------------------------------------------- I: Finished running '/usr/share/debomatic/sbuildcommands/chroot-setup-commands/dpkg-speedup libautovivification-perl_0.18-2 perl-5.40 amd64'. Finished processing commands. -------------------------------------------------------------------------------- I: NOTICE: Log filtering will replace 'build/libautovivification-perl-6Cr1Le/resolver-6k8AqT' with '<>' +------------------------------------------------------------------------------+ | Update chroot | +------------------------------------------------------------------------------+ Get:1 file:/srv/reprepro perl-5.40 InRelease [3042 B] Hit:2 http://deb.debian.org/debian unstable InRelease Hit:3 http://localhost:3142/debian sid InRelease Get:1 file:/srv/reprepro perl-5.40 InRelease [3042 B] Reading package lists... Reading package lists... Building dependency tree... Reading state information... Calculating upgrade... 0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. +------------------------------------------------------------------------------+ | Fetch source files | +------------------------------------------------------------------------------+ Local sources ------------- /srv/debomatic/incoming/libautovivification-perl_0.18-2.dsc exists in /srv/debomatic/incoming; copying to chroot I: NOTICE: Log filtering will replace 'build/libautovivification-perl-6Cr1Le/libautovivification-perl-0.18' with '<>' I: NOTICE: Log filtering will replace 'build/libautovivification-perl-6Cr1Le' with '<>' +------------------------------------------------------------------------------+ | Install package build dependencies | +------------------------------------------------------------------------------+ Setup apt archive ----------------- Merged Build-Depends: debhelper-compat (= 13), perl-xs-dev, perl, build-essential, fakeroot Filtered Build-Depends: debhelper-compat (= 13), perl-xs-dev, perl, build-essential, fakeroot dpkg-deb: building package 'sbuild-build-depends-main-dummy' in '/<>/apt_archive/sbuild-build-depends-main-dummy.deb'. Ign:1 copy:/<>/apt_archive ./ InRelease Get:2 copy:/<>/apt_archive ./ Release [609 B] Ign:3 copy:/<>/apt_archive ./ Release.gpg Get:4 copy:/<>/apt_archive ./ Sources [643 B] Get:5 copy:/<>/apt_archive ./ Packages [668 B] Fetched 1920 B in 0s (0 B/s) Reading package lists... Reading package lists... Install main build dependencies (apt-based resolver) ---------------------------------------------------- Installing build dependencies Reading package lists... Building dependency tree... Reading state information... The following additional packages will be installed: autoconf automake autopoint autotools-dev bsdextrautils debhelper dh-autoreconf dh-strip-nondeterminism dwz fakeroot file gettext gettext-base groff-base intltool-debian libarchive-zip-perl libdebhelper-perl libelf1t64 libfakeroot libfile-stripnondeterminism-perl libicu72 libmagic-mgc libmagic1t64 libperl-dev libpipeline1 libtool libuchardet0 libxml2 m4 man-db po-debconf sensible-utils Suggested packages: autoconf-archive gnu-standards autoconf-doc dh-make gettext-doc libasprintf-dev libgettextpo-dev groff libtool-doc gfortran | fortran95-compiler gcj-jdk m4-doc apparmor less www-browser libmail-box-perl Recommended packages: curl | wget | lynx libarchive-cpio-perl libltdl-dev libmail-sendmail-perl The following NEW packages will be installed: autoconf automake autopoint autotools-dev bsdextrautils debhelper dh-autoreconf dh-strip-nondeterminism dwz fakeroot file gettext gettext-base groff-base intltool-debian libarchive-zip-perl libdebhelper-perl libelf1t64 libfakeroot libfile-stripnondeterminism-perl libicu72 libmagic-mgc libmagic1t64 libperl-dev libpipeline1 libtool libuchardet0 libxml2 m4 man-db po-debconf sbuild-build-depends-main-dummy sensible-utils 0 upgraded, 33 newly installed, 0 to remove and 0 not upgraded. Need to get 19.9 MB/21.0 MB of archives. After this operation, 81.2 MB of additional disk space will be used. Get:1 copy:/<>/apt_archive ./ sbuild-build-depends-main-dummy 0.invalid.0 [888 B] Get:2 http://deb.debian.org/debian unstable/main amd64 sensible-utils all 0.0.24 [24.8 kB] Get:3 http://deb.debian.org/debian unstable/main amd64 libmagic-mgc amd64 1:5.45-3 [314 kB] Get:4 file:/srv/reprepro perl-5.40/main amd64 libperl-dev amd64 5.40.0-5 [1112 kB] Get:5 http://deb.debian.org/debian unstable/main amd64 libmagic1t64 amd64 1:5.45-3 [105 kB] Get:6 http://deb.debian.org/debian unstable/main amd64 file amd64 1:5.45-3 [42.9 kB] Get:7 http://deb.debian.org/debian unstable/main amd64 gettext-base amd64 0.22.5-2 [200 kB] Get:8 http://deb.debian.org/debian unstable/main amd64 libuchardet0 amd64 0.0.8-1+b1 [68.8 kB] Get:9 http://deb.debian.org/debian unstable/main amd64 groff-base amd64 1.23.0-5 [1181 kB] Get:10 http://deb.debian.org/debian unstable/main amd64 bsdextrautils amd64 2.40.2-8 [97.3 kB] Get:11 http://deb.debian.org/debian unstable/main amd64 libpipeline1 amd64 1.5.8-1 [42.0 kB] Get:12 http://deb.debian.org/debian unstable/main amd64 man-db amd64 2.13.0-1 [1420 kB] Get:13 http://deb.debian.org/debian unstable/main amd64 m4 amd64 1.4.19-4 [287 kB] Get:14 http://deb.debian.org/debian unstable/main amd64 autoconf all 2.72-3 [493 kB] Get:15 http://deb.debian.org/debian unstable/main amd64 autotools-dev all 20220109.1 [51.6 kB] Get:16 http://deb.debian.org/debian unstable/main amd64 automake all 1:1.16.5-1.3 [823 kB] Get:17 http://deb.debian.org/debian unstable/main amd64 autopoint all 0.22.5-2 [723 kB] Get:18 http://deb.debian.org/debian unstable/main amd64 libdebhelper-perl all 13.20 [89.7 kB] Get:19 http://deb.debian.org/debian unstable/main amd64 libtool all 2.4.7-7 [517 kB] Get:20 http://deb.debian.org/debian unstable/main amd64 dh-autoreconf all 20 [17.1 kB] Get:21 http://deb.debian.org/debian unstable/main amd64 libarchive-zip-perl all 1.68-1 [104 kB] Get:22 http://deb.debian.org/debian unstable/main amd64 libfile-stripnondeterminism-perl all 1.14.0-1 [19.5 kB] Get:23 http://deb.debian.org/debian unstable/main amd64 dh-strip-nondeterminism all 1.14.0-1 [8448 B] Get:24 http://deb.debian.org/debian unstable/main amd64 libelf1t64 amd64 0.191-2 [188 kB] Get:25 http://deb.debian.org/debian unstable/main amd64 dwz amd64 0.15-1+b1 [110 kB] Get:26 http://deb.debian.org/debian unstable/main amd64 libicu72 amd64 72.1-5 [9396 kB] Get:27 http://deb.debian.org/debian unstable/main amd64 libxml2 amd64 2.12.7+dfsg-3+b1 [671 kB] Get:28 http://deb.debian.org/debian unstable/main amd64 gettext amd64 0.22.5-2 [1601 kB] Get:29 http://deb.debian.org/debian unstable/main amd64 intltool-debian all 0.35.0+20060710.6 [22.9 kB] Get:30 http://deb.debian.org/debian unstable/main amd64 po-debconf all 1.0.21+nmu1 [248 kB] Get:31 http://deb.debian.org/debian unstable/main amd64 debhelper all 13.20 [915 kB] Get:32 http://deb.debian.org/debian unstable/main amd64 libfakeroot amd64 1.36-1 [29.1 kB] Get:33 http://deb.debian.org/debian unstable/main amd64 fakeroot amd64 1.36-1 [75.1 kB] debconf: delaying package configuration, since apt-utils is not installed Fetched 19.9 MB in 0s (151 MB/s) Selecting previously unselected package sensible-utils. (Reading database ... 22986 files and directories currently installed.) Preparing to unpack .../00-sensible-utils_0.0.24_all.deb ... Unpacking sensible-utils (0.0.24) ... Selecting previously unselected package libmagic-mgc. Preparing to unpack .../01-libmagic-mgc_1%3a5.45-3_amd64.deb ... Unpacking libmagic-mgc (1:5.45-3) ... Selecting previously unselected package libmagic1t64:amd64. Preparing to unpack .../02-libmagic1t64_1%3a5.45-3_amd64.deb ... Unpacking libmagic1t64:amd64 (1:5.45-3) ... Selecting previously unselected package file. Preparing to unpack .../03-file_1%3a5.45-3_amd64.deb ... Unpacking file (1:5.45-3) ... Selecting previously unselected package gettext-base. Preparing to unpack .../04-gettext-base_0.22.5-2_amd64.deb ... Unpacking gettext-base (0.22.5-2) ... Selecting previously unselected package libuchardet0:amd64. Preparing to unpack .../05-libuchardet0_0.0.8-1+b1_amd64.deb ... Unpacking libuchardet0:amd64 (0.0.8-1+b1) ... Selecting previously unselected package groff-base. Preparing to unpack .../06-groff-base_1.23.0-5_amd64.deb ... Unpacking groff-base (1.23.0-5) ... Selecting previously unselected package bsdextrautils. Preparing to unpack .../07-bsdextrautils_2.40.2-8_amd64.deb ... Unpacking bsdextrautils (2.40.2-8) ... Selecting previously unselected package libpipeline1:amd64. Preparing to unpack .../08-libpipeline1_1.5.8-1_amd64.deb ... Unpacking libpipeline1:amd64 (1.5.8-1) ... Selecting previously unselected package man-db. Preparing to unpack .../09-man-db_2.13.0-1_amd64.deb ... Unpacking man-db (2.13.0-1) ... Selecting previously unselected package m4. Preparing to unpack .../10-m4_1.4.19-4_amd64.deb ... Unpacking m4 (1.4.19-4) ... Selecting previously unselected package autoconf. Preparing to unpack .../11-autoconf_2.72-3_all.deb ... Unpacking autoconf (2.72-3) ... Selecting previously unselected package autotools-dev. Preparing to unpack .../12-autotools-dev_20220109.1_all.deb ... Unpacking autotools-dev (20220109.1) ... Selecting previously unselected package automake. Preparing to unpack .../13-automake_1%3a1.16.5-1.3_all.deb ... Unpacking automake (1:1.16.5-1.3) ... Selecting previously unselected package autopoint. Preparing to unpack .../14-autopoint_0.22.5-2_all.deb ... Unpacking autopoint (0.22.5-2) ... Selecting previously unselected package libdebhelper-perl. Preparing to unpack .../15-libdebhelper-perl_13.20_all.deb ... Unpacking libdebhelper-perl (13.20) ... Selecting previously unselected package libtool. Preparing to unpack .../16-libtool_2.4.7-7_all.deb ... Unpacking libtool (2.4.7-7) ... Selecting previously unselected package dh-autoreconf. Preparing to unpack .../17-dh-autoreconf_20_all.deb ... Unpacking dh-autoreconf (20) ... Selecting previously unselected package libarchive-zip-perl. Preparing to unpack .../18-libarchive-zip-perl_1.68-1_all.deb ... Unpacking libarchive-zip-perl (1.68-1) ... Selecting previously unselected package libfile-stripnondeterminism-perl. Preparing to unpack .../19-libfile-stripnondeterminism-perl_1.14.0-1_all.deb ... Unpacking libfile-stripnondeterminism-perl (1.14.0-1) ... Selecting previously unselected package dh-strip-nondeterminism. Preparing to unpack .../20-dh-strip-nondeterminism_1.14.0-1_all.deb ... Unpacking dh-strip-nondeterminism (1.14.0-1) ... Selecting previously unselected package libelf1t64:amd64. Preparing to unpack .../21-libelf1t64_0.191-2_amd64.deb ... Unpacking libelf1t64:amd64 (0.191-2) ... Selecting previously unselected package dwz. Preparing to unpack .../22-dwz_0.15-1+b1_amd64.deb ... Unpacking dwz (0.15-1+b1) ... Selecting previously unselected package libicu72:amd64. Preparing to unpack .../23-libicu72_72.1-5_amd64.deb ... Unpacking libicu72:amd64 (72.1-5) ... Selecting previously unselected package libxml2:amd64. Preparing to unpack .../24-libxml2_2.12.7+dfsg-3+b1_amd64.deb ... Unpacking libxml2:amd64 (2.12.7+dfsg-3+b1) ... Selecting previously unselected package gettext. Preparing to unpack .../25-gettext_0.22.5-2_amd64.deb ... Unpacking gettext (0.22.5-2) ... Selecting previously unselected package intltool-debian. Preparing to unpack .../26-intltool-debian_0.35.0+20060710.6_all.deb ... Unpacking intltool-debian (0.35.0+20060710.6) ... Selecting previously unselected package po-debconf. Preparing to unpack .../27-po-debconf_1.0.21+nmu1_all.deb ... Unpacking po-debconf (1.0.21+nmu1) ... Selecting previously unselected package debhelper. Preparing to unpack .../28-debhelper_13.20_all.deb ... Unpacking debhelper (13.20) ... Selecting previously unselected package libfakeroot:amd64. Preparing to unpack .../29-libfakeroot_1.36-1_amd64.deb ... Unpacking libfakeroot:amd64 (1.36-1) ... Selecting previously unselected package fakeroot. Preparing to unpack .../30-fakeroot_1.36-1_amd64.deb ... Unpacking fakeroot (1.36-1) ... Selecting previously unselected package libperl-dev:amd64. Preparing to unpack .../31-libperl-dev_5.40.0-5_amd64.deb ... Unpacking libperl-dev:amd64 (5.40.0-5) ... Selecting previously unselected package sbuild-build-depends-main-dummy. Preparing to unpack .../32-sbuild-build-depends-main-dummy_0.invalid.0_amd64.deb ... Unpacking sbuild-build-depends-main-dummy (0.invalid.0) ... Setting up libpipeline1:amd64 (1.5.8-1) ... Setting up libicu72:amd64 (72.1-5) ... Setting up bsdextrautils (2.40.2-8) ... Setting up libmagic-mgc (1:5.45-3) ... Setting up libarchive-zip-perl (1.68-1) ... Setting up libdebhelper-perl (13.20) ... Setting up libmagic1t64:amd64 (1:5.45-3) ... Setting up gettext-base (0.22.5-2) ... Setting up m4 (1.4.19-4) ... Setting up libperl-dev:amd64 (5.40.0-5) ... Setting up file (1:5.45-3) ... Setting up libfakeroot:amd64 (1.36-1) ... Setting up libelf1t64:amd64 (0.191-2) ... Setting up fakeroot (1.36-1) ... update-alternatives: using /usr/bin/fakeroot-sysv to provide /usr/bin/fakeroot (fakeroot) in auto mode Setting up autotools-dev (20220109.1) ... Setting up autopoint (0.22.5-2) ... Setting up autoconf (2.72-3) ... Setting up dwz (0.15-1+b1) ... Setting up sensible-utils (0.0.24) ... Setting up libuchardet0:amd64 (0.0.8-1+b1) ... Setting up libxml2:amd64 (2.12.7+dfsg-3+b1) ... Setting up automake (1:1.16.5-1.3) ... update-alternatives: using /usr/bin/automake-1.16 to provide /usr/bin/automake (automake) in auto mode Setting up libfile-stripnondeterminism-perl (1.14.0-1) ... Setting up gettext (0.22.5-2) ... Setting up libtool (2.4.7-7) ... Setting up intltool-debian (0.35.0+20060710.6) ... Setting up dh-autoreconf (20) ... Setting up dh-strip-nondeterminism (1.14.0-1) ... Setting up groff-base (1.23.0-5) ... Setting up po-debconf (1.0.21+nmu1) ... Setting up man-db (2.13.0-1) ... Not building database; man-db/auto-update is not 'true'. Setting up debhelper (13.20) ... Setting up sbuild-build-depends-main-dummy (0.invalid.0) ... Processing triggers for libc-bin (2.40-2) ... +------------------------------------------------------------------------------+ | Check architectures | +------------------------------------------------------------------------------+ Arch check ok (amd64 included in any) +------------------------------------------------------------------------------+ | Build environment | +------------------------------------------------------------------------------+ Kernel: Linux 6.9.7-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.9.7-1 (2024-06-27) amd64 (x86_64) Toolchain package versions: binutils_2.43.1-4 dpkg-dev_1.22.11 g++-13_13.3.0-6 g++-14_14.2.0-4 gcc-13_13.3.0-6 gcc-14_14.2.0-4 libc6-dev_2.40-2 libstdc++-13-dev_13.3.0-6 libstdc++-14-dev_14.2.0-4 libstdc++6_14.2.0-4 linux-libc-dev_6.10.9-1 Package versions: adduser_3.137 apt_2.9.8 autoconf_2.72-3 automake_1:1.16.5-1.3 autopoint_0.22.5-2 autotools-dev_20220109.1 base-files_13.5 base-passwd_3.6.4 bash_5.2.32-1+b1 binutils_2.43.1-4 binutils-common_2.43.1-4 binutils-x86-64-linux-gnu_2.43.1-4 bsdextrautils_2.40.2-8 bsdutils_1:2.40.2-8 build-essential_12.10 bzip2_1.0.8-6 coreutils_9.4-3.1 cpp_4:14.1.0-2 cpp-13_13.3.0-6 cpp-13-x86-64-linux-gnu_13.3.0-6 cpp-14_14.2.0-4 cpp-14-x86-64-linux-gnu_14.2.0-4 cpp-x86-64-linux-gnu_4:14.1.0-2 dash_0.5.12-9 debconf_1.5.87 debhelper_13.20 debian-archive-keyring_2023.4 debianutils_5.20 dh-autoreconf_20 dh-strip-nondeterminism_1.14.0-1 diffutils_1:3.10-1 dirmngr_2.2.43-8+b1 dpkg_1.22.11 dpkg-dev_1.22.11 dwz_0.15-1+b1 eatmydata_131-2 fakeroot_1.36-1 file_1:5.45-3 findutils_4.10.0-3 g++_4:14.1.0-2 g++-13_13.3.0-6 g++-13-x86-64-linux-gnu_13.3.0-6 g++-14_14.2.0-4 g++-14-x86-64-linux-gnu_14.2.0-4 g++-x86-64-linux-gnu_4:14.1.0-2 gcc_4:14.1.0-2 gcc-13_13.3.0-6 gcc-13-base_13.3.0-6 gcc-13-x86-64-linux-gnu_13.3.0-6 gcc-14_14.2.0-4 gcc-14-base_14.2.0-4 gcc-14-x86-64-linux-gnu_14.2.0-4 gcc-x86-64-linux-gnu_4:14.1.0-2 gettext_0.22.5-2 gettext-base_0.22.5-2 gnupg_2.2.43-8 gnupg-l10n_2.2.43-8 gnupg-utils_2.2.43-8+b1 gpg_2.2.43-8+b1 gpg-agent_2.2.43-8+b1 gpg-wks-client_2.2.43-8+b1 gpgconf_2.2.43-8+b1 gpgsm_2.2.43-8+b1 gpgv_2.2.43-8+b1 grep_3.11-4 groff-base_1.23.0-5 gzip_1.12-1.1 hostname_3.23+nmu2 init-system-helpers_1.66 intltool-debian_0.35.0+20060710.6 libacl1_2.3.2-2 libapt-pkg6.0t64_2.9.8 libarchive-zip-perl_1.68-1 libasan8_14.2.0-4 libassuan0_2.5.6-1+b1 libassuan9_3.0.1-2 libatomic1_14.2.0-4 libattr1_1:2.5.2-1 libaudit-common_1:4.0.1-1 libaudit1_1:4.0.1-1 libbinutils_2.43.1-4 libblkid1_2.40.2-8 libbsd0_0.12.2-1 libbz2-1.0_1.0.8-6 libc-bin_2.40-2 libc-dev-bin_2.40-2 libc-l10n_2.40-2 libc6_2.40-2 libc6-dev_2.40-2 libcap-ng0_0.8.5-2 libcap2_1:2.66-5 libcc1-0_14.2.0-4 libcrypt-dev_1:4.4.36-5 libcrypt1_1:4.4.36-5 libctf-nobfd0_2.43.1-4 libctf0_2.43.1-4 libdb5.3t64_5.3.28+dfsg2-7 libdebconfclient0_0.272 libdebhelper-perl_13.20 libdpkg-perl_1.22.11 libeatmydata1_131-2 libelf1t64_0.191-2 libfakeroot_1.36-1 libffi8_3.4.6-1 libfile-stripnondeterminism-perl_1.14.0-1 libgcc-13-dev_13.3.0-6 libgcc-14-dev_14.2.0-4 libgcc-s1_14.2.0-4 libgcrypt20_1.11.0-6 libgdbm-compat4t64_1.24-2 libgdbm6t64_1.24-2 libgmp10_2:6.3.0+dfsg-2+b1 libgnutls30t64_3.8.6-2 libgomp1_14.2.0-4 libgpg-error0_1.50-3 libgprofng0_2.43.1-4 libhogweed6t64_3.10-1 libhwasan0_14.2.0-4 libicu72_72.1-5 libidn2-0_2.3.7-2 libisl23_0.27-1 libitm1_14.2.0-4 libjansson4_2.14-2+b2 libksba8_1.6.7-2 libldap-2.5-0_2.5.18+dfsg-3+b1 liblsan0_14.2.0-4 liblz4-1_1.9.4-3 liblzma5_5.6.2-2 libmagic-mgc_1:5.45-3 libmagic1t64_1:5.45-3 libmd0_1.1.0-2 libmount1_2.40.2-8 libmpc3_1.3.1-1+b2 libmpfr6_4.2.1-1+b1 libncursesw6_6.5-2 libnettle8t64_3.10-1 libnpth0t64_1.6-3.1 libp11-kit0_0.25.5-2 libpam-modules_1.5.3-7 libpam-modules-bin_1.5.3-7 libpam-runtime_1.5.3-7 libpam0g_1.5.3-7 libpcre2-8-0_10.42-4+b1 libperl-dev_5.40.0-5 libperl5.38t64_5.38.2-5 libperl5.40_5.40.0-5 libpipeline1_1.5.8-1 libquadmath0_14.2.0-4 libreadline8t64_8.2-5 libsasl2-2_2.1.28+dfsg1-8 libsasl2-modules-db_2.1.28+dfsg1-8 libseccomp2_2.5.5-1+b1 libselinux1_3.7-3 libsemanage-common_3.7-2 libsemanage2_3.7-2 libsepol2_3.7-1 libsframe1_2.43.1-4 libsmartcols1_2.40.2-8 libsqlite3-0_3.46.1-1 libssl3t64_3.3.2-1 libstdc++-13-dev_13.3.0-6 libstdc++-14-dev_14.2.0-4 libstdc++6_14.2.0-4 libsystemd0_256.6-1 libtasn1-6_4.19.0-3+b2 libtinfo6_6.5-2 libtool_2.4.7-7 libtsan2_14.2.0-4 libubsan1_14.2.0-4 libuchardet0_0.0.8-1+b1 libudev1_256.6-1 libunistring5_1.2-1 libuuid1_2.40.2-8 libxml2_2.12.7+dfsg-3+b1 libxxhash0_0.8.2-2+b1 libzstd1_1.5.6+dfsg-1 linux-libc-dev_6.10.9-1 locales-all_2.40-2 login_1:4.16.0-2+really2.40.2-8 login.defs_1:4.16.0-4 m4_1.4.19-4 make_4.3-4.1 man-db_2.13.0-1 mawk_1.3.4.20240905-1 ncurses-base_6.5-2 ncurses-bin_6.5-2 openssl-provider-legacy_3.3.2-1 passwd_1:4.16.0-4 patch_2.7.6-7 perl_5.40.0-5 perl-base_5.40.0-5 perl-modules-5.38_5.38.2-5 perl-modules-5.40_5.40.0-5 pinentry-curses_1.2.1-4+b1 po-debconf_1.0.21+nmu1 readline-common_8.2-5 rpcsvc-proto_1.4.3-1 sbuild-build-depends-main-dummy_0.invalid.0 sed_4.9-2 sensible-utils_0.0.24 sysvinit-utils_3.10-2 tar_1.35+dfsg-3 usr-is-merged_39 util-linux_2.40.2-8 xz-utils_5.6.2-2 zlib1g_1:1.3.dfsg+really1.3.1-1 +------------------------------------------------------------------------------+ | Build | +------------------------------------------------------------------------------+ Unpack source ------------- -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA512 Format: 3.0 (quilt) Source: libautovivification-perl Binary: libautovivification-perl Architecture: any Version: 0.18-2 Maintainer: Debian Perl Group Uploaders: Ivan Kohler , gregor herrmann , Xavier Guimard Homepage: https://metacpan.org/release/autovivification Standards-Version: 4.1.3 Vcs-Browser: https://salsa.debian.org/perl-team/modules/packages/libautovivification-perl Vcs-Git: https://salsa.debian.org/perl-team/modules/packages/libautovivification-perl.git Testsuite: autopkgtest-pkg-perl Build-Depends: debhelper-compat (= 13), perl-xs-dev, perl:native Package-List: libautovivification-perl deb perl optional arch=any Checksums-Sha1: 7a2dc5e20f85c88bc88b591551fdfd693f914e3c 55854 libautovivification-perl_0.18.orig.tar.gz cdcacd6e7bea6d966c6e1840a4053365f9662243 3588 libautovivification-perl_0.18-2.debian.tar.xz Checksums-Sha256: 2d99975685242980d0a9904f639144c059d6ece15899efde4acb742d3253f105 55854 libautovivification-perl_0.18.orig.tar.gz 7c812f6196e5695d2937869be0fe8746763ee3c4568d287bc1ba86571d272048 3588 libautovivification-perl_0.18-2.debian.tar.xz Files: 8dec994e1e7d368e055f21a5777385a0 55854 libautovivification-perl_0.18.orig.tar.gz 192c059360b5707f8e5960f19cf95406 3588 libautovivification-perl_0.18-2.debian.tar.xz -----BEGIN PGP SIGNATURE----- iQIzBAEBCgAdFiEEsjhixBXWVlpOhsvXV5wWDUyeI+gFAmKg92EACgkQV5wWDUye I+iMVhAAl0O0XJjUuH/ipeDof582agvqcm+C9brE4GITZOXg/8qdvfH6UCLyJkWO KohTRx9oK1ZRDOgKgf/siN+6dqzMbjF95gJS2Rk09lmdEANwwl6FlMZ5Szd0CnWV RSl6iZTVv1Y9ggGvkzqcea/xTUxJOJ+X9xsPp3mJbtMBvCvXMd05ARxhFEq+NUi1 gxzpHCtLGNGnqH1XNjfUY5s7fVnqsyRerZ7VIaWz4FK+YpwVA7Hibnc7orgnX9xa 64XcyQ4EVfKfmka/DI0Yx9GyY7rVOvJWlkg9PRhmqq3zJMC3twJ3jccjmEMDN17S Q4+aRBRIFE9OmHpqJJzwGZKB5Hwi5Ub/qnirg2Xa+eDf69e7KTPoPK8OU7NMwY8h EvTNbebSaNbSMIkNlVfYOWJFmF+Q6/Cgfij6+v+9ILSxmpiB3s8qtrRjyZYh7VYm OHiI/2cmik2PXqjNLTS6ivKkaALExYSS+J/tobs/RNbb3daoaJrqxT6Gj51INMd8 OvbGLI50eOswcRQT6fH2BBHURcpEcLjLCYXfj8vw4f43RlBoloehz+VvDKNTED/6 nNvbcfIk8Q2FaL0P7Ax1N4zjSg48FEbxPSj5+m3+SOtwiVQzJZkOkUWPgA5eDnj7 tmmTGZJnIvZYj33BdVARpH4aOtUwP/lTkTL3pT56FBw7tTV2oPA= =utqY -----END PGP SIGNATURE----- gpgv: Signature made Wed Jun 8 19:24:17 2022 UTC gpgv: using RSA key B23862C415D6565A4E86CBD7579C160D4C9E23E8 gpgv: Can't check signature: No public key dpkg-source: warning: cannot verify inline signature for ./libautovivification-perl_0.18-2.dsc: no acceptable signature found dpkg-source: info: extracting libautovivification-perl in /<> dpkg-source: info: unpacking libautovivification-perl_0.18.orig.tar.gz dpkg-source: info: unpacking libautovivification-perl_0.18-2.debian.tar.xz Check disk space ---------------- Sufficient free space for build Hack binNMU version ------------------- Created changelog entry for binNMU version 0.18-2+b4 +------------------------------------------------------------------------------+ | Starting Timed Build Commands | +------------------------------------------------------------------------------+ /usr/share/debomatic/sbuildcommands/starting-build-commands/no-network libautovivification-perl_0.18-2 perl-5.40 amd64 ---------------------------------------------------------------------------------------------------------------------- I: Finished running '/usr/share/debomatic/sbuildcommands/starting-build-commands/no-network libautovivification-perl_0.18-2 perl-5.40 amd64'. Finished processing commands. -------------------------------------------------------------------------------- User Environment ---------------- APT_CONFIG=/var/lib/sbuild/apt.conf HOME=/sbuild-nonexistent LANG=en_GB.UTF-8 LANGUAGE=en_GB:en LC_ALL=C.UTF-8 LD_LIBRARY_PATH=/usr/lib/libeatmydata LD_PRELOAD=libeatmydata.so LOGNAME=debomatic PATH=/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin:/usr/games PWD=/<> SCHROOT_ALIAS_NAME=perl-5.40-amd64-debomatic SCHROOT_CHROOT_NAME=perl-5.40-amd64-debomatic SCHROOT_COMMAND=env SCHROOT_GID=110 SCHROOT_GROUP=sbuild SCHROOT_SESSION_ID=perl-5.40-amd64-debomatic-02116366-96ba-4404-8c4e-bc453a419c96 SCHROOT_UID=1002 SCHROOT_USER=debomatic SHELL=/bin/sh USER=debomatic dpkg-buildpackage ----------------- Command: dpkg-buildpackage --sanitize-env -us -uc -mDebian Perl autobuilder -B -rfakeroot -Zxz dpkg-buildpackage: info: source package libautovivification-perl dpkg-buildpackage: info: source version 0.18-2+b4 dpkg-buildpackage: info: source distribution perl-5.40 dpkg-source -Zxz --before-build . dpkg-buildpackage: info: host architecture amd64 fakeroot debian/rules clean dh clean dh_clean debian/rules build-arch dh build-arch dh_update_autotools_config -a dh_autoreconf -a dh_auto_configure -a /usr/bin/perl Makefile.PL INSTALLDIRS=vendor "OPTIMIZE=-g -O2 -Werror=implicit-function-declaration -ffile-prefix-map=/<>=. -fstack-protector-strong -fstack-clash-protection -Wformat -Werror=format-security -fcf-protection -Wdate-time -D_FORTIFY_SOURCE=2" "LD=x86_64-linux-gnu-gcc -g -O2 -Werror=implicit-function-declaration -ffile-prefix-map=/<>=. -fstack-protector-strong -fstack-clash-protection -Wformat -Werror=format-security -fcf-protection -Wl,-z,relro -Wl,-z,now" Checking if this is gcc 3.4 on Windows trying to link against an import library... no Checking if your kit is complete... Looks good Generating a Unix-style Makefile Writing Makefile for autovivification Writing MYMETA.yml and MYMETA.json dh_auto_build -a make -j2 make[1]: Entering directory '/<>' Running Mkbootstrap for autovivification () chmod 644 "autovivification.bs" "/usr/bin/perl" "/usr/share/perl/5.40/ExtUtils/xsubpp" -typemap '/usr/share/perl/5.40/ExtUtils/typemap' autovivification.xs > autovivification.xsc cp lib/autovivification.pm blib/lib/autovivification.pm "/usr/bin/perl" -MExtUtils::Command::MM -e 'cp_nonempty' -- autovivification.bs blib/arch/auto/autovivification/autovivification.bs 644 mv autovivification.xsc autovivification.c x86_64-linux-gnu-gcc -c -D_REENTRANT -D_GNU_SOURCE -DDEBIAN -fwrapv -fno-strict-aliasing -pipe -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -Werror=implicit-function-declaration -ffile-prefix-map=/<>=. -fstack-protector-strong -fstack-clash-protection -Wformat -Werror=format-security -fcf-protection -Wdate-time -D_FORTIFY_SOURCE=2 -DVERSION=\"0.18\" -DXS_VERSION=\"0.18\" -fPIC "-I/usr/lib/x86_64-linux-gnu/perl/5.40/CORE" autovivification.c rm -f blib/arch/auto/autovivification/autovivification.so x86_64-linux-gnu-gcc -g -O2 -Werror=implicit-function-declaration -ffile-prefix-map=/<>=. -fstack-protector-strong -fstack-clash-protection -Wformat -Werror=format-security -fcf-protection -Wl,-z,relro -Wl,-z,now -shared -L/usr/local/lib -fstack-protector-strong autovivification.o -o blib/arch/auto/autovivification/autovivification.so \ \ chmod 755 blib/arch/auto/autovivification/autovivification.so Manifying 1 pod document make[1]: Leaving directory '/<>' dh_auto_test -a make -j2 test TEST_VERBOSE=1 make[1]: Entering directory '/<>' "/usr/bin/perl" -MExtUtils::Command::MM -e 'cp_nonempty' -- autovivification.bs blib/arch/auto/autovivification/autovivification.bs 644 PERL_DL_NONLAZY=1 "/usr/bin/perl" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harness::Switches; test_harness(1, 'blib/lib', 'blib/arch')" t/*.t # Testing autovivification 0.18, Perl 5.040000, /usr/bin/perl t/00-load.t .............. 1..1 ok 1 - use autovivification; ok # Using threads 2.40 # Using threads::shared 1.69 t/09-load-threads.t ...... ok 1 - main body, beginning: module not loaded ok 2 - first serial thread, beginning: module not loaded ok 3 - first serial thread, after loading: module loaded ok 4 - main body, in between serial loadings: module not loaded ok 5 - second serial thread, beginning: module not loaded ok 6 - second serial thread, after loading: module loaded ok 7 - main body, after serial loadings: module not loaded ok 8 - parent thread, beginning: module not loaded ok 9 - child thread, beginning: module not loaded ok 10 - child thread, after loading: module loaded ok 11 - parent thread, after child terminated: module not loaded ok 12 - parent thread, after loading: module loaded ok 13 - main body, after nested loadings: module not loaded ok 14 - first simultaneous thread (finishes last), beginning: module not loaded ok 15 - second simultaneous thread (finishes first), beginning: module not loaded ok 16 - first simultaneous thread (finishes last), after loading: module loaded ok 17 - second simultaneous thread (finishes first), loaded in other thread but not here: module not loaded ok 18 - second simultaneous thread (finishes first), after loading: module loaded ok 19 - first simultaneous thread (finishes last), still loaded while also loaded in the other thread: module loaded ok 20 - second simultaneous thread (finishes first), end: module loaded ok 21 - first simultaneous thread (finishes last), end: module loaded ok 22 - main body, after simultaneous threads: module not loaded ok 23 - first simultaneous thread (finishes first), beginning: module not loaded ok 24 - second simultaneous thread (finishes last), beginning: module not loaded ok 25 - first simultaneous thread (finishes first), after loading: module loaded ok 26 - second simultaneous thread (finishes last), loaded in other thread but not here: module not loaded ok 27 - second simultaneous thread (finishes last), after loading: module loaded ok 28 - first simultaneous thread (finishes first), still loaded while also loaded in the other thread: module loaded ok 29 - first simultaneous thread (finishes first), end: module loaded ok 30 - second simultaneous thread (finishes last), end: module loaded ok 31 - main body, after simultaneous threads: module not loaded ok 32 - simple clone, parent thread, beginning: module not loaded ok 33 - simple clone, parent thread, after loading: module loaded ok 34 - simple clone, child thread, beginning: module loaded ok 35 - simple clone, parent thread, after child terminated: module loaded ok 36 - main body, after simple clone: module not loaded ok 37 - outliving clone, parent thread, beginning: module not loaded ok 38 - outliving clone, parent thread, after loading: module loaded ok 39 - outliving clone, parent thread, end: module loaded ok 40 - outliving clone, child thread, beginning: module loaded ok 41 - outliving clone, child thread, end: module loaded ok 42 - main body, after outliving clone: module not loaded ok 43 - main body, loaded at end: module loaded 1..43 ok t/20-hash.t .............. 1..8154 ok 1 - my $x; $x->{a} [exception] ok 2 - my $x; $x->{a} [return] ok 3 - my $x; $x->{a} [variable] ok 4 - our $x; local $x; use strict; $x->{a} [exception] ok 5 - our $x; local $x; use strict; $x->{a} [return] ok 6 - our $x; local $x; use strict; $x->{a} [variable] ok 7 - our $x; local $x; no strict; $x->{a} [exception] ok 8 - our $x; local $x; no strict; $x->{a} [return] ok 9 - our $x; local $x; no strict; $x->{a} [variable] ok 10 - my $x; $$x{a} [exception] ok 11 - my $x; $$x{a} [return] ok 12 - my $x; $$x{a} [variable] ok 13 - our $x; local $x; use strict; $$x{a} [exception] ok 14 - our $x; local $x; use strict; $$x{a} [return] ok 15 - our $x; local $x; use strict; $$x{a} [variable] ok 16 - our $x; local $x; no strict; $$x{a} [exception] ok 17 - our $x; local $x; no strict; $$x{a} [return] ok 18 - our $x; local $x; no strict; $$x{a} [variable] ok 19 - my %x; $x{a} [exception] ok 20 - my %x; $x{a} [return] ok 21 - my %x; $x{a} [variable] ok 22 - our %x; local %x; use strict; $x{a} [exception] ok 23 - our %x; local %x; use strict; $x{a} [return] ok 24 - our %x; local %x; use strict; $x{a} [variable] ok 25 - our %x; local %x; no strict; $x{a} [exception] ok 26 - our %x; local %x; no strict; $x{a} [return] ok 27 - our %x; local %x; no strict; $x{a} [variable] ok 28 - my $x; $x->{a} [exception] ok 29 - my $x; $x->{a} [return] ok 30 - my $x; $x->{a} [variable] ok 31 - our $x; local $x; use strict; $x->{a} [exception] ok 32 - our $x; local $x; use strict; $x->{a} [return] ok 33 - our $x; local $x; use strict; $x->{a} [variable] ok 34 - our $x; local $x; no strict; $x->{a} [exception] ok 35 - our $x; local $x; no strict; $x->{a} [return] ok 36 - our $x; local $x; no strict; $x->{a} [variable] ok 37 - my $x; $$x{a} [exception] ok 38 - my $x; $$x{a} [return] ok 39 - my $x; $$x{a} [variable] ok 40 - our $x; local $x; use strict; $$x{a} [exception] ok 41 - our $x; local $x; use strict; $$x{a} [return] ok 42 - our $x; local $x; use strict; $$x{a} [variable] ok 43 - our $x; local $x; no strict; $$x{a} [exception] ok 44 - our $x; local $x; no strict; $$x{a} [return] ok 45 - our $x; local $x; no strict; $$x{a} [variable] ok 46 - my %x; $x{a} [exception] ok 47 - my %x; $x{a} [return] ok 48 - my %x; $x{a} [variable] ok 49 - our %x; local %x; use strict; $x{a} [exception] ok 50 - our %x; local %x; use strict; $x{a} [return] ok 51 - our %x; local %x; use strict; $x{a} [variable] ok 52 - our %x; local %x; no strict; $x{a} [exception] ok 53 - our %x; local %x; no strict; $x{a} [return] ok 54 - our %x; local %x; no strict; $x{a} [variable] ok 55 - my $x; $x->{a} <+fetch> [exception] ok 56 - my $x; $x->{a} <+fetch> [return] ok 57 - my $x; $x->{a} <+fetch> [variable] ok 58 - our $x; local $x; use strict; $x->{a} <+fetch> [exception] ok 59 - our $x; local $x; use strict; $x->{a} <+fetch> [return] ok 60 - our $x; local $x; use strict; $x->{a} <+fetch> [variable] ok 61 - our $x; local $x; no strict; $x->{a} <+fetch> [exception] ok 62 - our $x; local $x; no strict; $x->{a} <+fetch> [return] ok 63 - our $x; local $x; no strict; $x->{a} <+fetch> [variable] ok 64 - my $x; $$x{a} <+fetch> [exception] ok 65 - my $x; $$x{a} <+fetch> [return] ok 66 - my $x; $$x{a} <+fetch> [variable] ok 67 - our $x; local $x; use strict; $$x{a} <+fetch> [exception] ok 68 - our $x; local $x; use strict; $$x{a} <+fetch> [return] ok 69 - our $x; local $x; use strict; $$x{a} <+fetch> [variable] ok 70 - our $x; local $x; no strict; $$x{a} <+fetch> [exception] ok 71 - our $x; local $x; no strict; $$x{a} <+fetch> [return] ok 72 - our $x; local $x; no strict; $$x{a} <+fetch> [variable] ok 73 - my %x; $x{a} <+fetch> [exception] ok 74 - my %x; $x{a} <+fetch> [return] ok 75 - my %x; $x{a} <+fetch> [variable] ok 76 - our %x; local %x; use strict; $x{a} <+fetch> [exception] ok 77 - our %x; local %x; use strict; $x{a} <+fetch> [return] ok 78 - our %x; local %x; use strict; $x{a} <+fetch> [variable] ok 79 - our %x; local %x; no strict; $x{a} <+fetch> [exception] ok 80 - our %x; local %x; no strict; $x{a} <+fetch> [return] ok 81 - our %x; local %x; no strict; $x{a} <+fetch> [variable] ok 82 - my $x; $x->{a} <+exists> [exception] ok 83 - my $x; $x->{a} <+exists> [return] ok 84 - my $x; $x->{a} <+exists> [variable] ok 85 - our $x; local $x; use strict; $x->{a} <+exists> [exception] ok 86 - our $x; local $x; use strict; $x->{a} <+exists> [return] ok 87 - our $x; local $x; use strict; $x->{a} <+exists> [variable] ok 88 - our $x; local $x; no strict; $x->{a} <+exists> [exception] ok 89 - our $x; local $x; no strict; $x->{a} <+exists> [return] ok 90 - our $x; local $x; no strict; $x->{a} <+exists> [variable] ok 91 - my $x; $$x{a} <+exists> [exception] ok 92 - my $x; $$x{a} <+exists> [return] ok 93 - my $x; $$x{a} <+exists> [variable] ok 94 - our $x; local $x; use strict; $$x{a} <+exists> [exception] ok 95 - our $x; local $x; use strict; $$x{a} <+exists> [return] ok 96 - our $x; local $x; use strict; $$x{a} <+exists> [variable] ok 97 - our $x; local $x; no strict; $$x{a} <+exists> [exception] ok 98 - our $x; local $x; no strict; $$x{a} <+exists> [return] ok 99 - our $x; local $x; no strict; $$x{a} <+exists> [variable] ok 100 - my %x; $x{a} <+exists> [exception] ok 101 - my %x; $x{a} <+exists> [return] ok 102 - my %x; $x{a} <+exists> [variable] ok 103 - our %x; local %x; use strict; $x{a} <+exists> [exception] ok 104 - our %x; local %x; use strict; $x{a} <+exists> [return] ok 105 - our %x; local %x; use strict; $x{a} <+exists> [variable] ok 106 - our %x; local %x; no strict; $x{a} <+exists> [exception] ok 107 - our %x; local %x; no strict; $x{a} <+exists> [return] ok 108 - our %x; local %x; no strict; $x{a} <+exists> [variable] ok 109 - my $x; $x->{a} <+delete> [exception] ok 110 - my $x; $x->{a} <+delete> [return] ok 111 - my $x; $x->{a} <+delete> [variable] ok 112 - our $x; local $x; use strict; $x->{a} <+delete> [exception] ok 113 - our $x; local $x; use strict; $x->{a} <+delete> [return] ok 114 - our $x; local $x; use strict; $x->{a} <+delete> [variable] ok 115 - our $x; local $x; no strict; $x->{a} <+delete> [exception] ok 116 - our $x; local $x; no strict; $x->{a} <+delete> [return] ok 117 - our $x; local $x; no strict; $x->{a} <+delete> [variable] ok 118 - my $x; $$x{a} <+delete> [exception] ok 119 - my $x; $$x{a} <+delete> [return] ok 120 - my $x; $$x{a} <+delete> [variable] ok 121 - our $x; local $x; use strict; $$x{a} <+delete> [exception] ok 122 - our $x; local $x; use strict; $$x{a} <+delete> [return] ok 123 - our $x; local $x; use strict; $$x{a} <+delete> [variable] ok 124 - our $x; local $x; no strict; $$x{a} <+delete> [exception] ok 125 - our $x; local $x; no strict; $$x{a} <+delete> [return] ok 126 - our $x; local $x; no strict; $$x{a} <+delete> [variable] ok 127 - my %x; $x{a} <+delete> [exception] ok 128 - my %x; $x{a} <+delete> [return] ok 129 - my %x; $x{a} <+delete> [variable] ok 130 - our %x; local %x; use strict; $x{a} <+delete> [exception] ok 131 - our %x; local %x; use strict; $x{a} <+delete> [return] ok 132 - our %x; local %x; use strict; $x{a} <+delete> [variable] ok 133 - our %x; local %x; no strict; $x{a} <+delete> [exception] ok 134 - our %x; local %x; no strict; $x{a} <+delete> [return] ok 135 - our %x; local %x; no strict; $x{a} <+delete> [variable] ok 136 - my $x; $x->{a} <+store> [exception] ok 137 - my $x; $x->{a} <+store> [return] ok 138 - my $x; $x->{a} <+store> [variable] ok 139 - our $x; local $x; use strict; $x->{a} <+store> [exception] ok 140 - our $x; local $x; use strict; $x->{a} <+store> [return] ok 141 - our $x; local $x; use strict; $x->{a} <+store> [variable] ok 142 - our $x; local $x; no strict; $x->{a} <+store> [exception] ok 143 - our $x; local $x; no strict; $x->{a} <+store> [return] ok 144 - our $x; local $x; no strict; $x->{a} <+store> [variable] ok 145 - my $x; $$x{a} <+store> [exception] ok 146 - my $x; $$x{a} <+store> [return] ok 147 - my $x; $$x{a} <+store> [variable] ok 148 - our $x; local $x; use strict; $$x{a} <+store> [exception] ok 149 - our $x; local $x; use strict; $$x{a} <+store> [return] ok 150 - our $x; local $x; use strict; $$x{a} <+store> [variable] ok 151 - our $x; local $x; no strict; $$x{a} <+store> [exception] ok 152 - our $x; local $x; no strict; $$x{a} <+store> [return] ok 153 - our $x; local $x; no strict; $$x{a} <+store> [variable] ok 154 - my %x; $x{a} <+store> [exception] ok 155 - my %x; $x{a} <+store> [return] ok 156 - my %x; $x{a} <+store> [variable] ok 157 - our %x; local %x; use strict; $x{a} <+store> [exception] ok 158 - our %x; local %x; use strict; $x{a} <+store> [return] ok 159 - our %x; local %x; use strict; $x{a} <+store> [variable] ok 160 - our %x; local %x; no strict; $x{a} <+store> [exception] ok 161 - our %x; local %x; no strict; $x{a} <+store> [return] ok 162 - our %x; local %x; no strict; $x{a} <+store> [variable] ok 163 - my $x; $x->{a} <-fetch> [exception] ok 164 - my $x; $x->{a} <-fetch> [return] ok 165 - my $x; $x->{a} <-fetch> [variable] ok 166 - our $x; local $x; use strict; $x->{a} <-fetch> [exception] ok 167 - our $x; local $x; use strict; $x->{a} <-fetch> [return] ok 168 - our $x; local $x; use strict; $x->{a} <-fetch> [variable] ok 169 - our $x; local $x; no strict; $x->{a} <-fetch> [exception] ok 170 - our $x; local $x; no strict; $x->{a} <-fetch> [return] ok 171 - our $x; local $x; no strict; $x->{a} <-fetch> [variable] ok 172 - my $x; $$x{a} <-fetch> [exception] ok 173 - my $x; $$x{a} <-fetch> [return] ok 174 - my $x; $$x{a} <-fetch> [variable] ok 175 - our $x; local $x; use strict; $$x{a} <-fetch> [exception] ok 176 - our $x; local $x; use strict; $$x{a} <-fetch> [return] ok 177 - our $x; local $x; use strict; $$x{a} <-fetch> [variable] ok 178 - our $x; local $x; no strict; $$x{a} <-fetch> [exception] ok 179 - our $x; local $x; no strict; $$x{a} <-fetch> [return] ok 180 - our $x; local $x; no strict; $$x{a} <-fetch> [variable] ok 181 - my %x; $x{a} <-fetch> [exception] ok 182 - my %x; $x{a} <-fetch> [return] ok 183 - my %x; $x{a} <-fetch> [variable] ok 184 - our %x; local %x; use strict; $x{a} <-fetch> [exception] ok 185 - our %x; local %x; use strict; $x{a} <-fetch> [return] ok 186 - our %x; local %x; use strict; $x{a} <-fetch> [variable] ok 187 - our %x; local %x; no strict; $x{a} <-fetch> [exception] ok 188 - our %x; local %x; no strict; $x{a} <-fetch> [return] ok 189 - our %x; local %x; no strict; $x{a} <-fetch> [variable] ok 190 - my $x; $x->{a} <+fetch -fetch> [exception] ok 191 - my $x; $x->{a} <+fetch -fetch> [return] ok 192 - my $x; $x->{a} <+fetch -fetch> [variable] ok 193 - our $x; local $x; use strict; $x->{a} <+fetch -fetch> [exception] ok 194 - our $x; local $x; use strict; $x->{a} <+fetch -fetch> [return] ok 195 - our $x; local $x; use strict; $x->{a} <+fetch -fetch> [variable] ok 196 - our $x; local $x; no strict; $x->{a} <+fetch -fetch> [exception] ok 197 - our $x; local $x; no strict; $x->{a} <+fetch -fetch> [return] ok 198 - our $x; local $x; no strict; $x->{a} <+fetch -fetch> [variable] ok 199 - my $x; $$x{a} <+fetch -fetch> [exception] ok 200 - my $x; $$x{a} <+fetch -fetch> [return] ok 201 - my $x; $$x{a} <+fetch -fetch> [variable] ok 202 - our $x; local $x; use strict; $$x{a} <+fetch -fetch> [exception] ok 203 - our $x; local $x; use strict; $$x{a} <+fetch -fetch> [return] ok 204 - our $x; local $x; use strict; $$x{a} <+fetch -fetch> [variable] ok 205 - our $x; local $x; no strict; $$x{a} <+fetch -fetch> [exception] ok 206 - our $x; local $x; no strict; $$x{a} <+fetch -fetch> [return] ok 207 - our $x; local $x; no strict; $$x{a} <+fetch -fetch> [variable] ok 208 - my %x; $x{a} <+fetch -fetch> [exception] ok 209 - my %x; $x{a} <+fetch -fetch> [return] ok 210 - my %x; $x{a} <+fetch -fetch> [variable] ok 211 - our %x; local %x; use strict; $x{a} <+fetch -fetch> [exception] ok 212 - our %x; local %x; use strict; $x{a} <+fetch -fetch> [return] ok 213 - our %x; local %x; use strict; $x{a} <+fetch -fetch> [variable] ok 214 - our %x; local %x; no strict; $x{a} <+fetch -fetch> [exception] ok 215 - our %x; local %x; no strict; $x{a} <+fetch -fetch> [return] ok 216 - our %x; local %x; no strict; $x{a} <+fetch -fetch> [variable] ok 217 - my $x; $x->{a} <-fetch +fetch> [exception] ok 218 - my $x; $x->{a} <-fetch +fetch> [return] ok 219 - my $x; $x->{a} <-fetch +fetch> [variable] ok 220 - our $x; local $x; use strict; $x->{a} <-fetch +fetch> [exception] ok 221 - our $x; local $x; use strict; $x->{a} <-fetch +fetch> [return] ok 222 - our $x; local $x; use strict; $x->{a} <-fetch +fetch> [variable] ok 223 - our $x; local $x; no strict; $x->{a} <-fetch +fetch> [exception] ok 224 - our $x; local $x; no strict; $x->{a} <-fetch +fetch> [return] ok 225 - our $x; local $x; no strict; $x->{a} <-fetch +fetch> [variable] ok 226 - my $x; $$x{a} <-fetch +fetch> [exception] ok 227 - my $x; $$x{a} <-fetch +fetch> [return] ok 228 - my $x; $$x{a} <-fetch +fetch> [variable] ok 229 - our $x; local $x; use strict; $$x{a} <-fetch +fetch> [exception] ok 230 - our $x; local $x; use strict; $$x{a} <-fetch +fetch> [return] ok 231 - our $x; local $x; use strict; $$x{a} <-fetch +fetch> [variable] ok 232 - our $x; local $x; no strict; $$x{a} <-fetch +fetch> [exception] ok 233 - our $x; local $x; no strict; $$x{a} <-fetch +fetch> [return] ok 234 - our $x; local $x; no strict; $$x{a} <-fetch +fetch> [variable] ok 235 - my %x; $x{a} <-fetch +fetch> [exception] ok 236 - my %x; $x{a} <-fetch +fetch> [return] ok 237 - my %x; $x{a} <-fetch +fetch> [variable] ok 238 - our %x; local %x; use strict; $x{a} <-fetch +fetch> [exception] ok 239 - our %x; local %x; use strict; $x{a} <-fetch +fetch> [return] ok 240 - our %x; local %x; use strict; $x{a} <-fetch +fetch> [variable] ok 241 - our %x; local %x; no strict; $x{a} <-fetch +fetch> [exception] ok 242 - our %x; local %x; no strict; $x{a} <-fetch +fetch> [return] ok 243 - our %x; local %x; no strict; $x{a} <-fetch +fetch> [variable] ok 244 - my $x; $x->{a} <+fetch -exists> [exception] ok 245 - my $x; $x->{a} <+fetch -exists> [return] ok 246 - my $x; $x->{a} <+fetch -exists> [variable] ok 247 - our $x; local $x; use strict; $x->{a} <+fetch -exists> [exception] ok 248 - our $x; local $x; use strict; $x->{a} <+fetch -exists> [return] ok 249 - our $x; local $x; use strict; $x->{a} <+fetch -exists> [variable] ok 250 - our $x; local $x; no strict; $x->{a} <+fetch -exists> [exception] ok 251 - our $x; local $x; no strict; $x->{a} <+fetch -exists> [return] ok 252 - our $x; local $x; no strict; $x->{a} <+fetch -exists> [variable] ok 253 - my $x; $$x{a} <+fetch -exists> [exception] ok 254 - my $x; $$x{a} <+fetch -exists> [return] ok 255 - my $x; $$x{a} <+fetch -exists> [variable] ok 256 - our $x; local $x; use strict; $$x{a} <+fetch -exists> [exception] ok 257 - our $x; local $x; use strict; $$x{a} <+fetch -exists> [return] ok 258 - our $x; local $x; use strict; $$x{a} <+fetch -exists> [variable] ok 259 - our $x; local $x; no strict; $$x{a} <+fetch -exists> [exception] ok 260 - our $x; local $x; no strict; $$x{a} <+fetch -exists> [return] ok 261 - our $x; local $x; no strict; $$x{a} <+fetch -exists> [variable] ok 262 - my %x; $x{a} <+fetch -exists> [exception] ok 263 - my %x; $x{a} <+fetch -exists> [return] ok 264 - my %x; $x{a} <+fetch -exists> [variable] ok 265 - our %x; local %x; use strict; $x{a} <+fetch -exists> [exception] ok 266 - our %x; local %x; use strict; $x{a} <+fetch -exists> [return] ok 267 - our %x; local %x; use strict; $x{a} <+fetch -exists> [variable] ok 268 - our %x; local %x; no strict; $x{a} <+fetch -exists> [exception] ok 269 - our %x; local %x; no strict; $x{a} <+fetch -exists> [return] ok 270 - our %x; local %x; no strict; $x{a} <+fetch -exists> [variable] ok 271 - my $x; $x->{a} <+strict +fetch> [exception] ok 272 - my $x; $x->{a} <+strict +fetch> [return] ok 273 - my $x; $x->{a} <+strict +fetch> [variable] ok 274 - our $x; local $x; use strict; $x->{a} <+strict +fetch> [exception] ok 275 - our $x; local $x; use strict; $x->{a} <+strict +fetch> [return] ok 276 - our $x; local $x; use strict; $x->{a} <+strict +fetch> [variable] ok 277 - our $x; local $x; no strict; $x->{a} <+strict +fetch> [exception] ok 278 - our $x; local $x; no strict; $x->{a} <+strict +fetch> [return] ok 279 - our $x; local $x; no strict; $x->{a} <+strict +fetch> [variable] ok 280 - my $x; $$x{a} <+strict +fetch> [exception] ok 281 - my $x; $$x{a} <+strict +fetch> [return] ok 282 - my $x; $$x{a} <+strict +fetch> [variable] ok 283 - our $x; local $x; use strict; $$x{a} <+strict +fetch> [exception] ok 284 - our $x; local $x; use strict; $$x{a} <+strict +fetch> [return] ok 285 - our $x; local $x; use strict; $$x{a} <+strict +fetch> [variable] ok 286 - our $x; local $x; no strict; $$x{a} <+strict +fetch> [exception] ok 287 - our $x; local $x; no strict; $$x{a} <+strict +fetch> [return] ok 288 - our $x; local $x; no strict; $$x{a} <+strict +fetch> [variable] ok 289 - my %x; 1 <+strict +fetch> [exception] ok 290 - my %x; 1 <+strict +fetch> [return] ok 291 - my %x; 1 <+strict +fetch> [variable] ok 292 - our %x; local %x; use strict; 1 <+strict +fetch> [exception] ok 293 - our %x; local %x; use strict; 1 <+strict +fetch> [return] ok 294 - our %x; local %x; use strict; 1 <+strict +fetch> [variable] ok 295 - our %x; local %x; no strict; 1 <+strict +fetch> [exception] ok 296 - our %x; local %x; no strict; 1 <+strict +fetch> [return] ok 297 - our %x; local %x; no strict; 1 <+strict +fetch> [variable] ok 298 - my $x; $x->{a} <+strict +exists> [exception] ok 299 - my $x; $x->{a} <+strict +exists> [return] ok 300 - my $x; $x->{a} <+strict +exists> [variable] ok 301 - our $x; local $x; use strict; $x->{a} <+strict +exists> [exception] ok 302 - our $x; local $x; use strict; $x->{a} <+strict +exists> [return] ok 303 - our $x; local $x; use strict; $x->{a} <+strict +exists> [variable] ok 304 - our $x; local $x; no strict; $x->{a} <+strict +exists> [exception] ok 305 - our $x; local $x; no strict; $x->{a} <+strict +exists> [return] ok 306 - our $x; local $x; no strict; $x->{a} <+strict +exists> [variable] ok 307 - my $x; $$x{a} <+strict +exists> [exception] ok 308 - my $x; $$x{a} <+strict +exists> [return] ok 309 - my $x; $$x{a} <+strict +exists> [variable] ok 310 - our $x; local $x; use strict; $$x{a} <+strict +exists> [exception] ok 311 - our $x; local $x; use strict; $$x{a} <+strict +exists> [return] ok 312 - our $x; local $x; use strict; $$x{a} <+strict +exists> [variable] ok 313 - our $x; local $x; no strict; $$x{a} <+strict +exists> [exception] ok 314 - our $x; local $x; no strict; $$x{a} <+strict +exists> [return] ok 315 - our $x; local $x; no strict; $$x{a} <+strict +exists> [variable] ok 316 - my %x; $x{a} <+strict +exists> [exception] ok 317 - my %x; $x{a} <+strict +exists> [return] ok 318 - my %x; $x{a} <+strict +exists> [variable] ok 319 - our %x; local %x; use strict; $x{a} <+strict +exists> [exception] ok 320 - our %x; local %x; use strict; $x{a} <+strict +exists> [return] ok 321 - our %x; local %x; use strict; $x{a} <+strict +exists> [variable] ok 322 - our %x; local %x; no strict; $x{a} <+strict +exists> [exception] ok 323 - our %x; local %x; no strict; $x{a} <+strict +exists> [return] ok 324 - our %x; local %x; no strict; $x{a} <+strict +exists> [variable] ok 325 - my $x; $x->{a} <+strict +delete> [exception] ok 326 - my $x; $x->{a} <+strict +delete> [return] ok 327 - my $x; $x->{a} <+strict +delete> [variable] ok 328 - our $x; local $x; use strict; $x->{a} <+strict +delete> [exception] ok 329 - our $x; local $x; use strict; $x->{a} <+strict +delete> [return] ok 330 - our $x; local $x; use strict; $x->{a} <+strict +delete> [variable] ok 331 - our $x; local $x; no strict; $x->{a} <+strict +delete> [exception] ok 332 - our $x; local $x; no strict; $x->{a} <+strict +delete> [return] ok 333 - our $x; local $x; no strict; $x->{a} <+strict +delete> [variable] ok 334 - my $x; $$x{a} <+strict +delete> [exception] ok 335 - my $x; $$x{a} <+strict +delete> [return] ok 336 - my $x; $$x{a} <+strict +delete> [variable] ok 337 - our $x; local $x; use strict; $$x{a} <+strict +delete> [exception] ok 338 - our $x; local $x; use strict; $$x{a} <+strict +delete> [return] ok 339 - our $x; local $x; use strict; $$x{a} <+strict +delete> [variable] ok 340 - our $x; local $x; no strict; $$x{a} <+strict +delete> [exception] ok 341 - our $x; local $x; no strict; $$x{a} <+strict +delete> [return] ok 342 - our $x; local $x; no strict; $$x{a} <+strict +delete> [variable] ok 343 - my %x; $x{a} <+strict +delete> [exception] ok 344 - my %x; $x{a} <+strict +delete> [return] ok 345 - my %x; $x{a} <+strict +delete> [variable] ok 346 - our %x; local %x; use strict; $x{a} <+strict +delete> [exception] ok 347 - our %x; local %x; use strict; $x{a} <+strict +delete> [return] ok 348 - our %x; local %x; use strict; $x{a} <+strict +delete> [variable] ok 349 - our %x; local %x; no strict; $x{a} <+strict +delete> [exception] ok 350 - our %x; local %x; no strict; $x{a} <+strict +delete> [return] ok 351 - our %x; local %x; no strict; $x{a} <+strict +delete> [variable] ok 352 - my $x; $x->{a} <+strict +store> [exception] ok 353 - my $x; $x->{a} <+strict +store> [return] ok 354 - my $x; $x->{a} <+strict +store> [variable] ok 355 - our $x; local $x; use strict; $x->{a} <+strict +store> [exception] ok 356 - our $x; local $x; use strict; $x->{a} <+strict +store> [return] ok 357 - our $x; local $x; use strict; $x->{a} <+strict +store> [variable] ok 358 - our $x; local $x; no strict; $x->{a} <+strict +store> [exception] ok 359 - our $x; local $x; no strict; $x->{a} <+strict +store> [return] ok 360 - our $x; local $x; no strict; $x->{a} <+strict +store> [variable] ok 361 - my $x; $$x{a} <+strict +store> [exception] ok 362 - my $x; $$x{a} <+strict +store> [return] ok 363 - my $x; $$x{a} <+strict +store> [variable] ok 364 - our $x; local $x; use strict; $$x{a} <+strict +store> [exception] ok 365 - our $x; local $x; use strict; $$x{a} <+strict +store> [return] ok 366 - our $x; local $x; use strict; $$x{a} <+strict +store> [variable] ok 367 - our $x; local $x; no strict; $$x{a} <+strict +store> [exception] ok 368 - our $x; local $x; no strict; $$x{a} <+strict +store> [return] ok 369 - our $x; local $x; no strict; $$x{a} <+strict +store> [variable] ok 370 - my %x; $x{a} <+strict +store> [exception] ok 371 - my %x; $x{a} <+strict +store> [return] ok 372 - my %x; $x{a} <+strict +store> [variable] ok 373 - our %x; local %x; use strict; $x{a} <+strict +store> [exception] ok 374 - our %x; local %x; use strict; $x{a} <+strict +store> [return] ok 375 - our %x; local %x; use strict; $x{a} <+strict +store> [variable] ok 376 - our %x; local %x; no strict; $x{a} <+strict +store> [exception] ok 377 - our %x; local %x; no strict; $x{a} <+strict +store> [return] ok 378 - our %x; local %x; no strict; $x{a} <+strict +store> [variable] ok 379 - my $x; $x->{a}->{b} [exception] ok 380 - my $x; $x->{a}->{b} [return] ok 381 - my $x; $x->{a}->{b} [variable] ok 382 - our $x; local $x; use strict; $x->{a}->{b} [exception] ok 383 - our $x; local $x; use strict; $x->{a}->{b} [return] ok 384 - our $x; local $x; use strict; $x->{a}->{b} [variable] ok 385 - our $x; local $x; no strict; $x->{a}->{b} [exception] ok 386 - our $x; local $x; no strict; $x->{a}->{b} [return] ok 387 - our $x; local $x; no strict; $x->{a}->{b} [variable] ok 388 - my $x; $$x{a}->{b} [exception] ok 389 - my $x; $$x{a}->{b} [return] ok 390 - my $x; $$x{a}->{b} [variable] ok 391 - our $x; local $x; use strict; $$x{a}->{b} [exception] ok 392 - our $x; local $x; use strict; $$x{a}->{b} [return] ok 393 - our $x; local $x; use strict; $$x{a}->{b} [variable] ok 394 - our $x; local $x; no strict; $$x{a}->{b} [exception] ok 395 - our $x; local $x; no strict; $$x{a}->{b} [return] ok 396 - our $x; local $x; no strict; $$x{a}->{b} [variable] ok 397 - my %x; $x{a}->{b} [exception] ok 398 - my %x; $x{a}->{b} [return] ok 399 - my %x; $x{a}->{b} [variable] ok 400 - our %x; local %x; use strict; $x{a}->{b} [exception] ok 401 - our %x; local %x; use strict; $x{a}->{b} [return] ok 402 - our %x; local %x; use strict; $x{a}->{b} [variable] ok 403 - our %x; local %x; no strict; $x{a}->{b} [exception] ok 404 - our %x; local %x; no strict; $x{a}->{b} [return] ok 405 - our %x; local %x; no strict; $x{a}->{b} [variable] ok 406 - my $x; $x->{a}->{b} [exception] ok 407 - my $x; $x->{a}->{b} [return] ok 408 - my $x; $x->{a}->{b} [variable] ok 409 - our $x; local $x; use strict; $x->{a}->{b} [exception] ok 410 - our $x; local $x; use strict; $x->{a}->{b} [return] ok 411 - our $x; local $x; use strict; $x->{a}->{b} [variable] ok 412 - our $x; local $x; no strict; $x->{a}->{b} [exception] ok 413 - our $x; local $x; no strict; $x->{a}->{b} [return] ok 414 - our $x; local $x; no strict; $x->{a}->{b} [variable] ok 415 - my $x; $$x{a}->{b} [exception] ok 416 - my $x; $$x{a}->{b} [return] ok 417 - my $x; $$x{a}->{b} [variable] ok 418 - our $x; local $x; use strict; $$x{a}->{b} [exception] ok 419 - our $x; local $x; use strict; $$x{a}->{b} [return] ok 420 - our $x; local $x; use strict; $$x{a}->{b} [variable] ok 421 - our $x; local $x; no strict; $$x{a}->{b} [exception] ok 422 - our $x; local $x; no strict; $$x{a}->{b} [return] ok 423 - our $x; local $x; no strict; $$x{a}->{b} [variable] ok 424 - my %x; $x{a}->{b} [exception] ok 425 - my %x; $x{a}->{b} [return] ok 426 - my %x; $x{a}->{b} [variable] ok 427 - our %x; local %x; use strict; $x{a}->{b} [exception] ok 428 - our %x; local %x; use strict; $x{a}->{b} [return] ok 429 - our %x; local %x; use strict; $x{a}->{b} [variable] ok 430 - our %x; local %x; no strict; $x{a}->{b} [exception] ok 431 - our %x; local %x; no strict; $x{a}->{b} [return] ok 432 - our %x; local %x; no strict; $x{a}->{b} [variable] ok 433 - my $x; $x->{a}->{b} <+fetch> [exception] ok 434 - my $x; $x->{a}->{b} <+fetch> [return] ok 435 - my $x; $x->{a}->{b} <+fetch> [variable] ok 436 - our $x; local $x; use strict; $x->{a}->{b} <+fetch> [exception] ok 437 - our $x; local $x; use strict; $x->{a}->{b} <+fetch> [return] ok 438 - our $x; local $x; use strict; $x->{a}->{b} <+fetch> [variable] ok 439 - our $x; local $x; no strict; $x->{a}->{b} <+fetch> [exception] ok 440 - our $x; local $x; no strict; $x->{a}->{b} <+fetch> [return] ok 441 - our $x; local $x; no strict; $x->{a}->{b} <+fetch> [variable] ok 442 - my $x; $$x{a}->{b} <+fetch> [exception] ok 443 - my $x; $$x{a}->{b} <+fetch> [return] ok 444 - my $x; $$x{a}->{b} <+fetch> [variable] ok 445 - our $x; local $x; use strict; $$x{a}->{b} <+fetch> [exception] ok 446 - our $x; local $x; use strict; $$x{a}->{b} <+fetch> [return] ok 447 - our $x; local $x; use strict; $$x{a}->{b} <+fetch> [variable] ok 448 - our $x; local $x; no strict; $$x{a}->{b} <+fetch> [exception] ok 449 - our $x; local $x; no strict; $$x{a}->{b} <+fetch> [return] ok 450 - our $x; local $x; no strict; $$x{a}->{b} <+fetch> [variable] ok 451 - my %x; $x{a}->{b} <+fetch> [exception] ok 452 - my %x; $x{a}->{b} <+fetch> [return] ok 453 - my %x; $x{a}->{b} <+fetch> [variable] ok 454 - our %x; local %x; use strict; $x{a}->{b} <+fetch> [exception] ok 455 - our %x; local %x; use strict; $x{a}->{b} <+fetch> [return] ok 456 - our %x; local %x; use strict; $x{a}->{b} <+fetch> [variable] ok 457 - our %x; local %x; no strict; $x{a}->{b} <+fetch> [exception] ok 458 - our %x; local %x; no strict; $x{a}->{b} <+fetch> [return] ok 459 - our %x; local %x; no strict; $x{a}->{b} <+fetch> [variable] ok 460 - my $x; $x->{a}->{b} <+exists> [exception] ok 461 - my $x; $x->{a}->{b} <+exists> [return] ok 462 - my $x; $x->{a}->{b} <+exists> [variable] ok 463 - our $x; local $x; use strict; $x->{a}->{b} <+exists> [exception] ok 464 - our $x; local $x; use strict; $x->{a}->{b} <+exists> [return] ok 465 - our $x; local $x; use strict; $x->{a}->{b} <+exists> [variable] ok 466 - our $x; local $x; no strict; $x->{a}->{b} <+exists> [exception] ok 467 - our $x; local $x; no strict; $x->{a}->{b} <+exists> [return] ok 468 - our $x; local $x; no strict; $x->{a}->{b} <+exists> [variable] ok 469 - my $x; $$x{a}->{b} <+exists> [exception] ok 470 - my $x; $$x{a}->{b} <+exists> [return] ok 471 - my $x; $$x{a}->{b} <+exists> [variable] ok 472 - our $x; local $x; use strict; $$x{a}->{b} <+exists> [exception] ok 473 - our $x; local $x; use strict; $$x{a}->{b} <+exists> [return] ok 474 - our $x; local $x; use strict; $$x{a}->{b} <+exists> [variable] ok 475 - our $x; local $x; no strict; $$x{a}->{b} <+exists> [exception] ok 476 - our $x; local $x; no strict; $$x{a}->{b} <+exists> [return] ok 477 - our $x; local $x; no strict; $$x{a}->{b} <+exists> [variable] ok 478 - my %x; $x{a}->{b} <+exists> [exception] ok 479 - my %x; $x{a}->{b} <+exists> [return] ok 480 - my %x; $x{a}->{b} <+exists> [variable] ok 481 - our %x; local %x; use strict; $x{a}->{b} <+exists> [exception] ok 482 - our %x; local %x; use strict; $x{a}->{b} <+exists> [return] ok 483 - our %x; local %x; use strict; $x{a}->{b} <+exists> [variable] ok 484 - our %x; local %x; no strict; $x{a}->{b} <+exists> [exception] ok 485 - our %x; local %x; no strict; $x{a}->{b} <+exists> [return] ok 486 - our %x; local %x; no strict; $x{a}->{b} <+exists> [variable] ok 487 - my $x; $x->{a}->{b} <+delete> [exception] ok 488 - my $x; $x->{a}->{b} <+delete> [return] ok 489 - my $x; $x->{a}->{b} <+delete> [variable] ok 490 - our $x; local $x; use strict; $x->{a}->{b} <+delete> [exception] ok 491 - our $x; local $x; use strict; $x->{a}->{b} <+delete> [return] ok 492 - our $x; local $x; use strict; $x->{a}->{b} <+delete> [variable] ok 493 - our $x; local $x; no strict; $x->{a}->{b} <+delete> [exception] ok 494 - our $x; local $x; no strict; $x->{a}->{b} <+delete> [return] ok 495 - our $x; local $x; no strict; $x->{a}->{b} <+delete> [variable] ok 496 - my $x; $$x{a}->{b} <+delete> [exception] ok 497 - my $x; $$x{a}->{b} <+delete> [return] ok 498 - my $x; $$x{a}->{b} <+delete> [variable] ok 499 - our $x; local $x; use strict; $$x{a}->{b} <+delete> [exception] ok 500 - our $x; local $x; use strict; $$x{a}->{b} <+delete> [return] ok 501 - our $x; local $x; use strict; $$x{a}->{b} <+delete> [variable] ok 502 - our $x; local $x; no strict; $$x{a}->{b} <+delete> [exception] ok 503 - our $x; local $x; no strict; $$x{a}->{b} <+delete> [return] ok 504 - our $x; local $x; no strict; $$x{a}->{b} <+delete> [variable] ok 505 - my %x; $x{a}->{b} <+delete> [exception] ok 506 - my %x; $x{a}->{b} <+delete> [return] ok 507 - my %x; $x{a}->{b} <+delete> [variable] ok 508 - our %x; local %x; use strict; $x{a}->{b} <+delete> [exception] ok 509 - our %x; local %x; use strict; $x{a}->{b} <+delete> [return] ok 510 - our %x; local %x; use strict; $x{a}->{b} <+delete> [variable] ok 511 - our %x; local %x; no strict; $x{a}->{b} <+delete> [exception] ok 512 - our %x; local %x; no strict; $x{a}->{b} <+delete> [return] ok 513 - our %x; local %x; no strict; $x{a}->{b} <+delete> [variable] ok 514 - my $x; $x->{a}->{b} <+store> [exception] ok 515 - my $x; $x->{a}->{b} <+store> [return] ok 516 - my $x; $x->{a}->{b} <+store> [variable] ok 517 - our $x; local $x; use strict; $x->{a}->{b} <+store> [exception] ok 518 - our $x; local $x; use strict; $x->{a}->{b} <+store> [return] ok 519 - our $x; local $x; use strict; $x->{a}->{b} <+store> [variable] ok 520 - our $x; local $x; no strict; $x->{a}->{b} <+store> [exception] ok 521 - our $x; local $x; no strict; $x->{a}->{b} <+store> [return] ok 522 - our $x; local $x; no strict; $x->{a}->{b} <+store> [variable] ok 523 - my $x; $$x{a}->{b} <+store> [exception] ok 524 - my $x; $$x{a}->{b} <+store> [return] ok 525 - my $x; $$x{a}->{b} <+store> [variable] ok 526 - our $x; local $x; use strict; $$x{a}->{b} <+store> [exception] ok 527 - our $x; local $x; use strict; $$x{a}->{b} <+store> [return] ok 528 - our $x; local $x; use strict; $$x{a}->{b} <+store> [variable] ok 529 - our $x; local $x; no strict; $$x{a}->{b} <+store> [exception] ok 530 - our $x; local $x; no strict; $$x{a}->{b} <+store> [return] ok 531 - our $x; local $x; no strict; $$x{a}->{b} <+store> [variable] ok 532 - my %x; $x{a}->{b} <+store> [exception] ok 533 - my %x; $x{a}->{b} <+store> [return] ok 534 - my %x; $x{a}->{b} <+store> [variable] ok 535 - our %x; local %x; use strict; $x{a}->{b} <+store> [exception] ok 536 - our %x; local %x; use strict; $x{a}->{b} <+store> [return] ok 537 - our %x; local %x; use strict; $x{a}->{b} <+store> [variable] ok 538 - our %x; local %x; no strict; $x{a}->{b} <+store> [exception] ok 539 - our %x; local %x; no strict; $x{a}->{b} <+store> [return] ok 540 - our %x; local %x; no strict; $x{a}->{b} <+store> [variable] ok 541 - my $x; $x->{a}->{b} <+strict +fetch> [exception] ok 542 - my $x; $x->{a}->{b} <+strict +fetch> [return] ok 543 - my $x; $x->{a}->{b} <+strict +fetch> [variable] ok 544 - our $x; local $x; use strict; $x->{a}->{b} <+strict +fetch> [exception] ok 545 - our $x; local $x; use strict; $x->{a}->{b} <+strict +fetch> [return] ok 546 - our $x; local $x; use strict; $x->{a}->{b} <+strict +fetch> [variable] ok 547 - our $x; local $x; no strict; $x->{a}->{b} <+strict +fetch> [exception] ok 548 - our $x; local $x; no strict; $x->{a}->{b} <+strict +fetch> [return] ok 549 - our $x; local $x; no strict; $x->{a}->{b} <+strict +fetch> [variable] ok 550 - my $x; $$x{a}->{b} <+strict +fetch> [exception] ok 551 - my $x; $$x{a}->{b} <+strict +fetch> [return] ok 552 - my $x; $$x{a}->{b} <+strict +fetch> [variable] ok 553 - our $x; local $x; use strict; $$x{a}->{b} <+strict +fetch> [exception] ok 554 - our $x; local $x; use strict; $$x{a}->{b} <+strict +fetch> [return] ok 555 - our $x; local $x; use strict; $$x{a}->{b} <+strict +fetch> [variable] ok 556 - our $x; local $x; no strict; $$x{a}->{b} <+strict +fetch> [exception] ok 557 - our $x; local $x; no strict; $$x{a}->{b} <+strict +fetch> [return] ok 558 - our $x; local $x; no strict; $$x{a}->{b} <+strict +fetch> [variable] ok 559 - my %x; $x{a}->{b} <+strict +fetch> [exception] ok 560 - my %x; $x{a}->{b} <+strict +fetch> [return] ok 561 - my %x; $x{a}->{b} <+strict +fetch> [variable] ok 562 - our %x; local %x; use strict; $x{a}->{b} <+strict +fetch> [exception] ok 563 - our %x; local %x; use strict; $x{a}->{b} <+strict +fetch> [return] ok 564 - our %x; local %x; use strict; $x{a}->{b} <+strict +fetch> [variable] ok 565 - our %x; local %x; no strict; $x{a}->{b} <+strict +fetch> [exception] ok 566 - our %x; local %x; no strict; $x{a}->{b} <+strict +fetch> [return] ok 567 - our %x; local %x; no strict; $x{a}->{b} <+strict +fetch> [variable] ok 568 - my $x; $x->{a}->{b} <+strict +exists> [exception] ok 569 - my $x; $x->{a}->{b} <+strict +exists> [return] ok 570 - my $x; $x->{a}->{b} <+strict +exists> [variable] ok 571 - our $x; local $x; use strict; $x->{a}->{b} <+strict +exists> [exception] ok 572 - our $x; local $x; use strict; $x->{a}->{b} <+strict +exists> [return] ok 573 - our $x; local $x; use strict; $x->{a}->{b} <+strict +exists> [variable] ok 574 - our $x; local $x; no strict; $x->{a}->{b} <+strict +exists> [exception] ok 575 - our $x; local $x; no strict; $x->{a}->{b} <+strict +exists> [return] ok 576 - our $x; local $x; no strict; $x->{a}->{b} <+strict +exists> [variable] ok 577 - my $x; $$x{a}->{b} <+strict +exists> [exception] ok 578 - my $x; $$x{a}->{b} <+strict +exists> [return] ok 579 - my $x; $$x{a}->{b} <+strict +exists> [variable] ok 580 - our $x; local $x; use strict; $$x{a}->{b} <+strict +exists> [exception] ok 581 - our $x; local $x; use strict; $$x{a}->{b} <+strict +exists> [return] ok 582 - our $x; local $x; use strict; $$x{a}->{b} <+strict +exists> [variable] ok 583 - our $x; local $x; no strict; $$x{a}->{b} <+strict +exists> [exception] ok 584 - our $x; local $x; no strict; $$x{a}->{b} <+strict +exists> [return] ok 585 - our $x; local $x; no strict; $$x{a}->{b} <+strict +exists> [variable] ok 586 - my %x; $x{a}->{b} <+strict +exists> [exception] ok 587 - my %x; $x{a}->{b} <+strict +exists> [return] ok 588 - my %x; $x{a}->{b} <+strict +exists> [variable] ok 589 - our %x; local %x; use strict; $x{a}->{b} <+strict +exists> [exception] ok 590 - our %x; local %x; use strict; $x{a}->{b} <+strict +exists> [return] ok 591 - our %x; local %x; use strict; $x{a}->{b} <+strict +exists> [variable] ok 592 - our %x; local %x; no strict; $x{a}->{b} <+strict +exists> [exception] ok 593 - our %x; local %x; no strict; $x{a}->{b} <+strict +exists> [return] ok 594 - our %x; local %x; no strict; $x{a}->{b} <+strict +exists> [variable] ok 595 - my $x; $x->{a}->{b} <+strict +delete> [exception] ok 596 - my $x; $x->{a}->{b} <+strict +delete> [return] ok 597 - my $x; $x->{a}->{b} <+strict +delete> [variable] ok 598 - our $x; local $x; use strict; $x->{a}->{b} <+strict +delete> [exception] ok 599 - our $x; local $x; use strict; $x->{a}->{b} <+strict +delete> [return] ok 600 - our $x; local $x; use strict; $x->{a}->{b} <+strict +delete> [variable] ok 601 - our $x; local $x; no strict; $x->{a}->{b} <+strict +delete> [exception] ok 602 - our $x; local $x; no strict; $x->{a}->{b} <+strict +delete> [return] ok 603 - our $x; local $x; no strict; $x->{a}->{b} <+strict +delete> [variable] ok 604 - my $x; $$x{a}->{b} <+strict +delete> [exception] ok 605 - my $x; $$x{a}->{b} <+strict +delete> [return] ok 606 - my $x; $$x{a}->{b} <+strict +delete> [variable] ok 607 - our $x; local $x; use strict; $$x{a}->{b} <+strict +delete> [exception] ok 608 - our $x; local $x; use strict; $$x{a}->{b} <+strict +delete> [return] ok 609 - our $x; local $x; use strict; $$x{a}->{b} <+strict +delete> [variable] ok 610 - our $x; local $x; no strict; $$x{a}->{b} <+strict +delete> [exception] ok 611 - our $x; local $x; no strict; $$x{a}->{b} <+strict +delete> [return] ok 612 - our $x; local $x; no strict; $$x{a}->{b} <+strict +delete> [variable] ok 613 - my %x; $x{a}->{b} <+strict +delete> [exception] ok 614 - my %x; $x{a}->{b} <+strict +delete> [return] ok 615 - my %x; $x{a}->{b} <+strict +delete> [variable] ok 616 - our %x; local %x; use strict; $x{a}->{b} <+strict +delete> [exception] ok 617 - our %x; local %x; use strict; $x{a}->{b} <+strict +delete> [return] ok 618 - our %x; local %x; use strict; $x{a}->{b} <+strict +delete> [variable] ok 619 - our %x; local %x; no strict; $x{a}->{b} <+strict +delete> [exception] ok 620 - our %x; local %x; no strict; $x{a}->{b} <+strict +delete> [return] ok 621 - our %x; local %x; no strict; $x{a}->{b} <+strict +delete> [variable] ok 622 - my $x; $x->{a}->{b} <+strict +store> [exception] ok 623 - my $x; $x->{a}->{b} <+strict +store> [return] ok 624 - my $x; $x->{a}->{b} <+strict +store> [variable] ok 625 - our $x; local $x; use strict; $x->{a}->{b} <+strict +store> [exception] ok 626 - our $x; local $x; use strict; $x->{a}->{b} <+strict +store> [return] ok 627 - our $x; local $x; use strict; $x->{a}->{b} <+strict +store> [variable] ok 628 - our $x; local $x; no strict; $x->{a}->{b} <+strict +store> [exception] ok 629 - our $x; local $x; no strict; $x->{a}->{b} <+strict +store> [return] ok 630 - our $x; local $x; no strict; $x->{a}->{b} <+strict +store> [variable] ok 631 - my $x; $$x{a}->{b} <+strict +store> [exception] ok 632 - my $x; $$x{a}->{b} <+strict +store> [return] ok 633 - my $x; $$x{a}->{b} <+strict +store> [variable] ok 634 - our $x; local $x; use strict; $$x{a}->{b} <+strict +store> [exception] ok 635 - our $x; local $x; use strict; $$x{a}->{b} <+strict +store> [return] ok 636 - our $x; local $x; use strict; $$x{a}->{b} <+strict +store> [variable] ok 637 - our $x; local $x; no strict; $$x{a}->{b} <+strict +store> [exception] ok 638 - our $x; local $x; no strict; $$x{a}->{b} <+strict +store> [return] ok 639 - our $x; local $x; no strict; $$x{a}->{b} <+strict +store> [variable] ok 640 - my %x; $x{a}->{b} <+strict +store> [exception] ok 641 - my %x; $x{a}->{b} <+strict +store> [return] ok 642 - my %x; $x{a}->{b} <+strict +store> [variable] ok 643 - our %x; local %x; use strict; $x{a}->{b} <+strict +store> [exception] ok 644 - our %x; local %x; use strict; $x{a}->{b} <+strict +store> [return] ok 645 - our %x; local %x; use strict; $x{a}->{b} <+strict +store> [variable] ok 646 - our %x; local %x; no strict; $x{a}->{b} <+strict +store> [exception] ok 647 - our %x; local %x; no strict; $x{a}->{b} <+strict +store> [return] ok 648 - our %x; local %x; no strict; $x{a}->{b} <+strict +store> [variable] ok 649 - my $x; $x->{a} = 1; $x->{a} <+fetch> [exception] ok 650 - my $x; $x->{a} = 1; $x->{a} <+fetch> [return] ok 651 - my $x; $x->{a} = 1; $x->{a} <+fetch> [variable] ok 652 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+fetch> [exception] ok 653 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+fetch> [return] ok 654 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+fetch> [variable] ok 655 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+fetch> [exception] ok 656 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+fetch> [return] ok 657 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+fetch> [variable] ok 658 - my $x; $x->{a} = 1; $$x{a} <+fetch> [exception] ok 659 - my $x; $x->{a} = 1; $$x{a} <+fetch> [return] ok 660 - my $x; $x->{a} = 1; $$x{a} <+fetch> [variable] ok 661 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+fetch> [exception] ok 662 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+fetch> [return] ok 663 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+fetch> [variable] ok 664 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+fetch> [exception] ok 665 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+fetch> [return] ok 666 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+fetch> [variable] ok 667 - my %x; $x{a} = 1; $x{a} <+fetch> [exception] ok 668 - my %x; $x{a} = 1; $x{a} <+fetch> [return] ok 669 - my %x; $x{a} = 1; $x{a} <+fetch> [variable] ok 670 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+fetch> [exception] ok 671 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+fetch> [return] ok 672 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+fetch> [variable] ok 673 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+fetch> [exception] ok 674 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+fetch> [return] ok 675 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+fetch> [variable] ok 676 - my $x; $x->{a} = 1; $x->{b} <+fetch> [exception] ok 677 - my $x; $x->{a} = 1; $x->{b} <+fetch> [return] ok 678 - my $x; $x->{a} = 1; $x->{b} <+fetch> [variable] ok 679 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+fetch> [exception] ok 680 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+fetch> [return] ok 681 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+fetch> [variable] ok 682 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+fetch> [exception] ok 683 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+fetch> [return] ok 684 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+fetch> [variable] ok 685 - my $x; $x->{a} = 1; $$x{b} <+fetch> [exception] ok 686 - my $x; $x->{a} = 1; $$x{b} <+fetch> [return] ok 687 - my $x; $x->{a} = 1; $$x{b} <+fetch> [variable] ok 688 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+fetch> [exception] ok 689 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+fetch> [return] ok 690 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+fetch> [variable] ok 691 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+fetch> [exception] ok 692 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+fetch> [return] ok 693 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+fetch> [variable] ok 694 - my %x; $x{a} = 1; $x{b} <+fetch> [exception] ok 695 - my %x; $x{a} = 1; $x{b} <+fetch> [return] ok 696 - my %x; $x{a} = 1; $x{b} <+fetch> [variable] ok 697 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+fetch> [exception] ok 698 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+fetch> [return] ok 699 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+fetch> [variable] ok 700 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+fetch> [exception] ok 701 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+fetch> [return] ok 702 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+fetch> [variable] ok 703 - my $x; $x->{a} = 1; $x->{a} <+exists> [exception] ok 704 - my $x; $x->{a} = 1; $x->{a} <+exists> [return] ok 705 - my $x; $x->{a} = 1; $x->{a} <+exists> [variable] ok 706 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+exists> [exception] ok 707 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+exists> [return] ok 708 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+exists> [variable] ok 709 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+exists> [exception] ok 710 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+exists> [return] ok 711 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+exists> [variable] ok 712 - my $x; $x->{a} = 1; $$x{a} <+exists> [exception] ok 713 - my $x; $x->{a} = 1; $$x{a} <+exists> [return] ok 714 - my $x; $x->{a} = 1; $$x{a} <+exists> [variable] ok 715 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+exists> [exception] ok 716 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+exists> [return] ok 717 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+exists> [variable] ok 718 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+exists> [exception] ok 719 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+exists> [return] ok 720 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+exists> [variable] ok 721 - my %x; $x{a} = 1; $x{a} <+exists> [exception] ok 722 - my %x; $x{a} = 1; $x{a} <+exists> [return] ok 723 - my %x; $x{a} = 1; $x{a} <+exists> [variable] ok 724 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+exists> [exception] ok 725 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+exists> [return] ok 726 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+exists> [variable] ok 727 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+exists> [exception] ok 728 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+exists> [return] ok 729 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+exists> [variable] ok 730 - my $x; $x->{a} = 1; $x->{b} <+exists> [exception] ok 731 - my $x; $x->{a} = 1; $x->{b} <+exists> [return] ok 732 - my $x; $x->{a} = 1; $x->{b} <+exists> [variable] ok 733 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+exists> [exception] ok 734 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+exists> [return] ok 735 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+exists> [variable] ok 736 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+exists> [exception] ok 737 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+exists> [return] ok 738 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+exists> [variable] ok 739 - my $x; $x->{a} = 1; $$x{b} <+exists> [exception] ok 740 - my $x; $x->{a} = 1; $$x{b} <+exists> [return] ok 741 - my $x; $x->{a} = 1; $$x{b} <+exists> [variable] ok 742 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+exists> [exception] ok 743 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+exists> [return] ok 744 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+exists> [variable] ok 745 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+exists> [exception] ok 746 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+exists> [return] ok 747 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+exists> [variable] ok 748 - my %x; $x{a} = 1; $x{b} <+exists> [exception] ok 749 - my %x; $x{a} = 1; $x{b} <+exists> [return] ok 750 - my %x; $x{a} = 1; $x{b} <+exists> [variable] ok 751 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+exists> [exception] ok 752 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+exists> [return] ok 753 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+exists> [variable] ok 754 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+exists> [exception] ok 755 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+exists> [return] ok 756 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+exists> [variable] ok 757 - my $x; $x->{a} = 1; $x->{a} <+delete> [exception] ok 758 - my $x; $x->{a} = 1; $x->{a} <+delete> [return] ok 759 - my $x; $x->{a} = 1; $x->{a} <+delete> [variable] ok 760 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+delete> [exception] ok 761 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+delete> [return] ok 762 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+delete> [variable] ok 763 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+delete> [exception] ok 764 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+delete> [return] ok 765 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+delete> [variable] ok 766 - my $x; $x->{a} = 1; $$x{a} <+delete> [exception] ok 767 - my $x; $x->{a} = 1; $$x{a} <+delete> [return] ok 768 - my $x; $x->{a} = 1; $$x{a} <+delete> [variable] ok 769 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+delete> [exception] ok 770 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+delete> [return] ok 771 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+delete> [variable] ok 772 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+delete> [exception] ok 773 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+delete> [return] ok 774 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+delete> [variable] ok 775 - my %x; $x{a} = 1; $x{a} <+delete> [exception] ok 776 - my %x; $x{a} = 1; $x{a} <+delete> [return] ok 777 - my %x; $x{a} = 1; $x{a} <+delete> [variable] ok 778 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+delete> [exception] ok 779 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+delete> [return] ok 780 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+delete> [variable] ok 781 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+delete> [exception] ok 782 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+delete> [return] ok 783 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+delete> [variable] ok 784 - my $x; $x->{a} = 1; $x->{b} <+delete> [exception] ok 785 - my $x; $x->{a} = 1; $x->{b} <+delete> [return] ok 786 - my $x; $x->{a} = 1; $x->{b} <+delete> [variable] ok 787 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+delete> [exception] ok 788 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+delete> [return] ok 789 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+delete> [variable] ok 790 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+delete> [exception] ok 791 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+delete> [return] ok 792 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+delete> [variable] ok 793 - my $x; $x->{a} = 1; $$x{b} <+delete> [exception] ok 794 - my $x; $x->{a} = 1; $$x{b} <+delete> [return] ok 795 - my $x; $x->{a} = 1; $$x{b} <+delete> [variable] ok 796 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+delete> [exception] ok 797 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+delete> [return] ok 798 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+delete> [variable] ok 799 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+delete> [exception] ok 800 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+delete> [return] ok 801 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+delete> [variable] ok 802 - my %x; $x{a} = 1; $x{b} <+delete> [exception] ok 803 - my %x; $x{a} = 1; $x{b} <+delete> [return] ok 804 - my %x; $x{a} = 1; $x{b} <+delete> [variable] ok 805 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+delete> [exception] ok 806 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+delete> [return] ok 807 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+delete> [variable] ok 808 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+delete> [exception] ok 809 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+delete> [return] ok 810 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+delete> [variable] ok 811 - my $x; $x->{a} = 1; $x->{a} <+store> [exception] ok 812 - my $x; $x->{a} = 1; $x->{a} <+store> [return] ok 813 - my $x; $x->{a} = 1; $x->{a} <+store> [variable] ok 814 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+store> [exception] ok 815 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+store> [return] ok 816 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+store> [variable] ok 817 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+store> [exception] ok 818 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+store> [return] ok 819 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+store> [variable] ok 820 - my $x; $x->{a} = 1; $$x{a} <+store> [exception] ok 821 - my $x; $x->{a} = 1; $$x{a} <+store> [return] ok 822 - my $x; $x->{a} = 1; $$x{a} <+store> [variable] ok 823 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+store> [exception] ok 824 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+store> [return] ok 825 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+store> [variable] ok 826 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+store> [exception] ok 827 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+store> [return] ok 828 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+store> [variable] ok 829 - my %x; $x{a} = 1; $x{a} <+store> [exception] ok 830 - my %x; $x{a} = 1; $x{a} <+store> [return] ok 831 - my %x; $x{a} = 1; $x{a} <+store> [variable] ok 832 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+store> [exception] ok 833 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+store> [return] ok 834 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+store> [variable] ok 835 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+store> [exception] ok 836 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+store> [return] ok 837 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+store> [variable] ok 838 - my $x; $x->{a} = 1; $x->{b} <+store> [exception] ok 839 - my $x; $x->{a} = 1; $x->{b} <+store> [return] ok 840 - my $x; $x->{a} = 1; $x->{b} <+store> [variable] ok 841 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+store> [exception] ok 842 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+store> [return] ok 843 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+store> [variable] ok 844 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+store> [exception] ok 845 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+store> [return] ok 846 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+store> [variable] ok 847 - my $x; $x->{a} = 1; $$x{b} <+store> [exception] ok 848 - my $x; $x->{a} = 1; $$x{b} <+store> [return] ok 849 - my $x; $x->{a} = 1; $$x{b} <+store> [variable] ok 850 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+store> [exception] ok 851 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+store> [return] ok 852 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+store> [variable] ok 853 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+store> [exception] ok 854 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+store> [return] ok 855 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+store> [variable] ok 856 - my %x; $x{a} = 1; $x{b} <+store> [exception] ok 857 - my %x; $x{a} = 1; $x{b} <+store> [return] ok 858 - my %x; $x{a} = 1; $x{b} <+store> [variable] ok 859 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+store> [exception] ok 860 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+store> [return] ok 861 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+store> [variable] ok 862 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+store> [exception] ok 863 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+store> [return] ok 864 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+store> [variable] ok 865 - my $x; $x->{a} = 1; $x->{a} <+strict +fetch> [exception] ok 866 - my $x; $x->{a} = 1; $x->{a} <+strict +fetch> [return] ok 867 - my $x; $x->{a} = 1; $x->{a} <+strict +fetch> [variable] ok 868 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +fetch> [exception] ok 869 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +fetch> [return] ok 870 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +fetch> [variable] ok 871 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +fetch> [exception] ok 872 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +fetch> [return] ok 873 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +fetch> [variable] ok 874 - my $x; $x->{a} = 1; $$x{a} <+strict +fetch> [exception] ok 875 - my $x; $x->{a} = 1; $$x{a} <+strict +fetch> [return] ok 876 - my $x; $x->{a} = 1; $$x{a} <+strict +fetch> [variable] ok 877 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +fetch> [exception] ok 878 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +fetch> [return] ok 879 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +fetch> [variable] ok 880 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +fetch> [exception] ok 881 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +fetch> [return] ok 882 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +fetch> [variable] ok 883 - my %x; $x{a} = 1; $x{a} <+strict +fetch> [exception] ok 884 - my %x; $x{a} = 1; $x{a} <+strict +fetch> [return] ok 885 - my %x; $x{a} = 1; $x{a} <+strict +fetch> [variable] ok 886 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +fetch> [exception] ok 887 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +fetch> [return] ok 888 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +fetch> [variable] ok 889 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +fetch> [exception] ok 890 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +fetch> [return] ok 891 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +fetch> [variable] ok 892 - my $x; $x->{a} = 1; $x->{b} <+strict +fetch> [exception] ok 893 - my $x; $x->{a} = 1; $x->{b} <+strict +fetch> [return] ok 894 - my $x; $x->{a} = 1; $x->{b} <+strict +fetch> [variable] ok 895 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +fetch> [exception] ok 896 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +fetch> [return] ok 897 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +fetch> [variable] ok 898 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +fetch> [exception] ok 899 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +fetch> [return] ok 900 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +fetch> [variable] ok 901 - my $x; $x->{a} = 1; $$x{b} <+strict +fetch> [exception] ok 902 - my $x; $x->{a} = 1; $$x{b} <+strict +fetch> [return] ok 903 - my $x; $x->{a} = 1; $$x{b} <+strict +fetch> [variable] ok 904 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +fetch> [exception] ok 905 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +fetch> [return] ok 906 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +fetch> [variable] ok 907 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +fetch> [exception] ok 908 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +fetch> [return] ok 909 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +fetch> [variable] ok 910 - my %x; $x{a} = 1; $x{b} <+strict +fetch> [exception] ok 911 - my %x; $x{a} = 1; $x{b} <+strict +fetch> [return] ok 912 - my %x; $x{a} = 1; $x{b} <+strict +fetch> [variable] ok 913 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +fetch> [exception] ok 914 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +fetch> [return] ok 915 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +fetch> [variable] ok 916 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +fetch> [exception] ok 917 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +fetch> [return] ok 918 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +fetch> [variable] ok 919 - my $x; $x->{a} = 1; $x->{a} <+strict +exists> [exception] ok 920 - my $x; $x->{a} = 1; $x->{a} <+strict +exists> [return] ok 921 - my $x; $x->{a} = 1; $x->{a} <+strict +exists> [variable] ok 922 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +exists> [exception] ok 923 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +exists> [return] ok 924 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +exists> [variable] ok 925 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +exists> [exception] ok 926 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +exists> [return] ok 927 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +exists> [variable] ok 928 - my $x; $x->{a} = 1; $$x{a} <+strict +exists> [exception] ok 929 - my $x; $x->{a} = 1; $$x{a} <+strict +exists> [return] ok 930 - my $x; $x->{a} = 1; $$x{a} <+strict +exists> [variable] ok 931 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +exists> [exception] ok 932 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +exists> [return] ok 933 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +exists> [variable] ok 934 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +exists> [exception] ok 935 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +exists> [return] ok 936 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +exists> [variable] ok 937 - my %x; $x{a} = 1; $x{a} <+strict +exists> [exception] ok 938 - my %x; $x{a} = 1; $x{a} <+strict +exists> [return] ok 939 - my %x; $x{a} = 1; $x{a} <+strict +exists> [variable] ok 940 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +exists> [exception] ok 941 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +exists> [return] ok 942 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +exists> [variable] ok 943 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +exists> [exception] ok 944 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +exists> [return] ok 945 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +exists> [variable] ok 946 - my $x; $x->{a} = 1; $x->{b} <+strict +exists> [exception] ok 947 - my $x; $x->{a} = 1; $x->{b} <+strict +exists> [return] ok 948 - my $x; $x->{a} = 1; $x->{b} <+strict +exists> [variable] ok 949 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +exists> [exception] ok 950 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +exists> [return] ok 951 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +exists> [variable] ok 952 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +exists> [exception] ok 953 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +exists> [return] ok 954 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +exists> [variable] ok 955 - my $x; $x->{a} = 1; $$x{b} <+strict +exists> [exception] ok 956 - my $x; $x->{a} = 1; $$x{b} <+strict +exists> [return] ok 957 - my $x; $x->{a} = 1; $$x{b} <+strict +exists> [variable] ok 958 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +exists> [exception] ok 959 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +exists> [return] ok 960 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +exists> [variable] ok 961 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +exists> [exception] ok 962 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +exists> [return] ok 963 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +exists> [variable] ok 964 - my %x; $x{a} = 1; $x{b} <+strict +exists> [exception] ok 965 - my %x; $x{a} = 1; $x{b} <+strict +exists> [return] ok 966 - my %x; $x{a} = 1; $x{b} <+strict +exists> [variable] ok 967 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +exists> [exception] ok 968 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +exists> [return] ok 969 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +exists> [variable] ok 970 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +exists> [exception] ok 971 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +exists> [return] ok 972 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +exists> [variable] ok 973 - my $x; $x->{a} = 1; $x->{a} <+strict +delete> [exception] ok 974 - my $x; $x->{a} = 1; $x->{a} <+strict +delete> [return] ok 975 - my $x; $x->{a} = 1; $x->{a} <+strict +delete> [variable] ok 976 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +delete> [exception] ok 977 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +delete> [return] ok 978 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +delete> [variable] ok 979 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +delete> [exception] ok 980 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +delete> [return] ok 981 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +delete> [variable] ok 982 - my $x; $x->{a} = 1; $$x{a} <+strict +delete> [exception] ok 983 - my $x; $x->{a} = 1; $$x{a} <+strict +delete> [return] ok 984 - my $x; $x->{a} = 1; $$x{a} <+strict +delete> [variable] ok 985 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +delete> [exception] ok 986 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +delete> [return] ok 987 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +delete> [variable] ok 988 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +delete> [exception] ok 989 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +delete> [return] ok 990 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +delete> [variable] ok 991 - my %x; $x{a} = 1; $x{a} <+strict +delete> [exception] ok 992 - my %x; $x{a} = 1; $x{a} <+strict +delete> [return] ok 993 - my %x; $x{a} = 1; $x{a} <+strict +delete> [variable] ok 994 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +delete> [exception] ok 995 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +delete> [return] ok 996 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +delete> [variable] ok 997 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +delete> [exception] ok 998 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +delete> [return] ok 999 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +delete> [variable] ok 1000 - my $x; $x->{a} = 1; $x->{b} <+strict +delete> [exception] ok 1001 - my $x; $x->{a} = 1; $x->{b} <+strict +delete> [return] ok 1002 - my $x; $x->{a} = 1; $x->{b} <+strict +delete> [variable] ok 1003 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +delete> [exception] ok 1004 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +delete> [return] ok 1005 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +delete> [variable] ok 1006 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +delete> [exception] ok 1007 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +delete> [return] ok 1008 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +delete> [variable] ok 1009 - my $x; $x->{a} = 1; $$x{b} <+strict +delete> [exception] ok 1010 - my $x; $x->{a} = 1; $$x{b} <+strict +delete> [return] ok 1011 - my $x; $x->{a} = 1; $$x{b} <+strict +delete> [variable] ok 1012 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +delete> [exception] ok 1013 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +delete> [return] ok 1014 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +delete> [variable] ok 1015 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +delete> [exception] ok 1016 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +delete> [return] ok 1017 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +delete> [variable] ok 1018 - my %x; $x{a} = 1; $x{b} <+strict +delete> [exception] ok 1019 - my %x; $x{a} = 1; $x{b} <+strict +delete> [return] ok 1020 - my %x; $x{a} = 1; $x{b} <+strict +delete> [variable] ok 1021 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +delete> [exception] ok 1022 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +delete> [return] ok 1023 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +delete> [variable] ok 1024 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +delete> [exception] ok 1025 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +delete> [return] ok 1026 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +delete> [variable] ok 1027 - my $x; $x->{a} = 1; $x->{a} <+strict +store> [exception] ok 1028 - my $x; $x->{a} = 1; $x->{a} <+strict +store> [return] ok 1029 - my $x; $x->{a} = 1; $x->{a} <+strict +store> [variable] ok 1030 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +store> [exception] ok 1031 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +store> [return] ok 1032 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +store> [variable] ok 1033 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +store> [exception] ok 1034 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +store> [return] ok 1035 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +store> [variable] ok 1036 - my $x; $x->{a} = 1; $$x{a} <+strict +store> [exception] ok 1037 - my $x; $x->{a} = 1; $$x{a} <+strict +store> [return] ok 1038 - my $x; $x->{a} = 1; $$x{a} <+strict +store> [variable] ok 1039 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +store> [exception] ok 1040 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +store> [return] ok 1041 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +store> [variable] ok 1042 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +store> [exception] ok 1043 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +store> [return] ok 1044 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +store> [variable] ok 1045 - my %x; $x{a} = 1; $x{a} <+strict +store> [exception] ok 1046 - my %x; $x{a} = 1; $x{a} <+strict +store> [return] ok 1047 - my %x; $x{a} = 1; $x{a} <+strict +store> [variable] ok 1048 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +store> [exception] ok 1049 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +store> [return] ok 1050 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +store> [variable] ok 1051 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +store> [exception] ok 1052 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +store> [return] ok 1053 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +store> [variable] ok 1054 - my $x; $x->{a} = 1; $x->{b} <+strict +store> [exception] ok 1055 - my $x; $x->{a} = 1; $x->{b} <+strict +store> [return] ok 1056 - my $x; $x->{a} = 1; $x->{b} <+strict +store> [variable] ok 1057 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +store> [exception] ok 1058 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +store> [return] ok 1059 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +store> [variable] ok 1060 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +store> [exception] ok 1061 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +store> [return] ok 1062 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +store> [variable] ok 1063 - my $x; $x->{a} = 1; $$x{b} <+strict +store> [exception] ok 1064 - my $x; $x->{a} = 1; $$x{b} <+strict +store> [return] ok 1065 - my $x; $x->{a} = 1; $$x{b} <+strict +store> [variable] ok 1066 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +store> [exception] ok 1067 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +store> [return] ok 1068 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +store> [variable] ok 1069 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +store> [exception] ok 1070 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +store> [return] ok 1071 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +store> [variable] ok 1072 - my %x; $x{a} = 1; $x{b} <+strict +store> [exception] ok 1073 - my %x; $x{a} = 1; $x{b} <+strict +store> [return] ok 1074 - my %x; $x{a} = 1; $x{b} <+strict +store> [variable] ok 1075 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +store> [exception] ok 1076 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +store> [return] ok 1077 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +store> [variable] ok 1078 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +store> [exception] ok 1079 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +store> [return] ok 1080 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +store> [variable] ok 1081 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [exception] ok 1082 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [return] ok 1083 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [variable] ok 1084 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [exception] ok 1085 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [return] ok 1086 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [variable] ok 1087 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [exception] ok 1088 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [return] ok 1089 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [variable] ok 1090 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [exception] ok 1091 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [return] ok 1092 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [variable] ok 1093 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [exception] ok 1094 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [return] ok 1095 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [variable] ok 1096 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [exception] ok 1097 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [return] ok 1098 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [variable] ok 1099 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [exception] ok 1100 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [return] ok 1101 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [variable] ok 1102 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [exception] ok 1103 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [return] ok 1104 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [variable] ok 1105 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [exception] ok 1106 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [return] ok 1107 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [variable] ok 1108 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [exception] ok 1109 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [return] ok 1110 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [variable] ok 1111 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [exception] ok 1112 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [return] ok 1113 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [variable] ok 1114 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [exception] ok 1115 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [return] ok 1116 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [variable] ok 1117 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [exception] ok 1118 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [return] ok 1119 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [variable] ok 1120 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [exception] ok 1121 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [return] ok 1122 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [variable] ok 1123 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [exception] ok 1124 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [return] ok 1125 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [variable] ok 1126 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [exception] ok 1127 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [return] ok 1128 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [variable] ok 1129 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [exception] ok 1130 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [return] ok 1131 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [variable] ok 1132 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [exception] ok 1133 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [return] ok 1134 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [variable] ok 1135 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [exception] ok 1136 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [return] ok 1137 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [variable] ok 1138 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [exception] ok 1139 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [return] ok 1140 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [variable] ok 1141 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [exception] ok 1142 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [return] ok 1143 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [variable] ok 1144 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [exception] ok 1145 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [return] ok 1146 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [variable] ok 1147 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [exception] ok 1148 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [return] ok 1149 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [variable] ok 1150 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [exception] ok 1151 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [return] ok 1152 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [variable] ok 1153 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [exception] ok 1154 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [return] ok 1155 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [variable] ok 1156 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [exception] ok 1157 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [return] ok 1158 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [variable] ok 1159 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [exception] ok 1160 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [return] ok 1161 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [variable] ok 1162 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [exception] ok 1163 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [return] ok 1164 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [variable] ok 1165 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [exception] ok 1166 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [return] ok 1167 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [variable] ok 1168 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [exception] ok 1169 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [return] ok 1170 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [variable] ok 1171 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [exception] ok 1172 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [return] ok 1173 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [variable] ok 1174 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [exception] ok 1175 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [return] ok 1176 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [variable] ok 1177 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [exception] ok 1178 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [return] ok 1179 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [variable] ok 1180 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+exists> [exception] ok 1181 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+exists> [return] ok 1182 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+exists> [variable] ok 1183 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+exists> [exception] ok 1184 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+exists> [return] ok 1185 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+exists> [variable] ok 1186 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+exists> [exception] ok 1187 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+exists> [return] ok 1188 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+exists> [variable] ok 1189 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [exception] ok 1190 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [return] ok 1191 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [variable] ok 1192 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [exception] ok 1193 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [return] ok 1194 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [variable] ok 1195 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [exception] ok 1196 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [return] ok 1197 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [variable] ok 1198 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [exception] ok 1199 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [return] ok 1200 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [variable] ok 1201 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [exception] ok 1202 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [return] ok 1203 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [variable] ok 1204 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [exception] ok 1205 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [return] ok 1206 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [variable] ok 1207 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+exists> [exception] ok 1208 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+exists> [return] ok 1209 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+exists> [variable] ok 1210 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+exists> [exception] ok 1211 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+exists> [return] ok 1212 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+exists> [variable] ok 1213 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+exists> [exception] ok 1214 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+exists> [return] ok 1215 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+exists> [variable] ok 1216 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [exception] ok 1217 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [return] ok 1218 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [variable] ok 1219 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [exception] ok 1220 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [return] ok 1221 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [variable] ok 1222 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [exception] ok 1223 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [return] ok 1224 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [variable] ok 1225 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [exception] ok 1226 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [return] ok 1227 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [variable] ok 1228 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [exception] ok 1229 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [return] ok 1230 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [variable] ok 1231 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [exception] ok 1232 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [return] ok 1233 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [variable] ok 1234 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+exists> [exception] ok 1235 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+exists> [return] ok 1236 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+exists> [variable] ok 1237 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+exists> [exception] ok 1238 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+exists> [return] ok 1239 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+exists> [variable] ok 1240 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+exists> [exception] ok 1241 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+exists> [return] ok 1242 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+exists> [variable] ok 1243 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [exception] ok 1244 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [return] ok 1245 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [variable] ok 1246 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [exception] ok 1247 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [return] ok 1248 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [variable] ok 1249 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [exception] ok 1250 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [return] ok 1251 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [variable] ok 1252 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [exception] ok 1253 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [return] ok 1254 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [variable] ok 1255 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [exception] ok 1256 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [return] ok 1257 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [variable] ok 1258 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [exception] ok 1259 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [return] ok 1260 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [variable] ok 1261 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+delete> [exception] ok 1262 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+delete> [return] ok 1263 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+delete> [variable] ok 1264 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+delete> [exception] ok 1265 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+delete> [return] ok 1266 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+delete> [variable] ok 1267 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+delete> [exception] ok 1268 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+delete> [return] ok 1269 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+delete> [variable] ok 1270 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [exception] ok 1271 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [return] ok 1272 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [variable] ok 1273 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [exception] ok 1274 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [return] ok 1275 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [variable] ok 1276 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [exception] ok 1277 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [return] ok 1278 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [variable] ok 1279 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [exception] ok 1280 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [return] ok 1281 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [variable] ok 1282 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [exception] ok 1283 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [return] ok 1284 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [variable] ok 1285 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [exception] ok 1286 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [return] ok 1287 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [variable] ok 1288 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+delete> [exception] ok 1289 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+delete> [return] ok 1290 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+delete> [variable] ok 1291 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+delete> [exception] ok 1292 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+delete> [return] ok 1293 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+delete> [variable] ok 1294 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+delete> [exception] ok 1295 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+delete> [return] ok 1296 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+delete> [variable] ok 1297 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [exception] ok 1298 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [return] ok 1299 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [variable] ok 1300 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [exception] ok 1301 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [return] ok 1302 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [variable] ok 1303 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [exception] ok 1304 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [return] ok 1305 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [variable] ok 1306 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [exception] ok 1307 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [return] ok 1308 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [variable] ok 1309 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [exception] ok 1310 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [return] ok 1311 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [variable] ok 1312 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [exception] ok 1313 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [return] ok 1314 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [variable] ok 1315 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+delete> [exception] ok 1316 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+delete> [return] ok 1317 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+delete> [variable] ok 1318 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+delete> [exception] ok 1319 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+delete> [return] ok 1320 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+delete> [variable] ok 1321 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+delete> [exception] ok 1322 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+delete> [return] ok 1323 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+delete> [variable] ok 1324 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [exception] ok 1325 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [return] ok 1326 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [variable] ok 1327 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [exception] ok 1328 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [return] ok 1329 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [variable] ok 1330 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [exception] ok 1331 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [return] ok 1332 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [variable] ok 1333 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [exception] ok 1334 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [return] ok 1335 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [variable] ok 1336 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [exception] ok 1337 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [return] ok 1338 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [variable] ok 1339 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [exception] ok 1340 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [return] ok 1341 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [variable] ok 1342 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+store> [exception] ok 1343 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+store> [return] ok 1344 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+store> [variable] ok 1345 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+store> [exception] ok 1346 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+store> [return] ok 1347 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+store> [variable] ok 1348 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+store> [exception] ok 1349 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+store> [return] ok 1350 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+store> [variable] ok 1351 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [exception] ok 1352 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [return] ok 1353 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [variable] ok 1354 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [exception] ok 1355 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [return] ok 1356 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [variable] ok 1357 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [exception] ok 1358 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [return] ok 1359 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [variable] ok 1360 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [exception] ok 1361 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [return] ok 1362 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [variable] ok 1363 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [exception] ok 1364 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [return] ok 1365 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [variable] ok 1366 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [exception] ok 1367 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [return] ok 1368 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [variable] ok 1369 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+store> [exception] ok 1370 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+store> [return] ok 1371 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+store> [variable] ok 1372 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+store> [exception] ok 1373 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+store> [return] ok 1374 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+store> [variable] ok 1375 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+store> [exception] ok 1376 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+store> [return] ok 1377 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+store> [variable] ok 1378 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [exception] ok 1379 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [return] ok 1380 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [variable] ok 1381 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [exception] ok 1382 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [return] ok 1383 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [variable] ok 1384 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [exception] ok 1385 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [return] ok 1386 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [variable] ok 1387 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [exception] ok 1388 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [return] ok 1389 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [variable] ok 1390 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [exception] ok 1391 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [return] ok 1392 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [variable] ok 1393 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [exception] ok 1394 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [return] ok 1395 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [variable] ok 1396 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+store> [exception] ok 1397 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+store> [return] ok 1398 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+store> [variable] ok 1399 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+store> [exception] ok 1400 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+store> [return] ok 1401 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+store> [variable] ok 1402 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+store> [exception] ok 1403 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+store> [return] ok 1404 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+store> [variable] ok 1405 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [exception] ok 1406 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [return] ok 1407 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [variable] ok 1408 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [exception] ok 1409 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [return] ok 1410 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [variable] ok 1411 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [exception] ok 1412 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [return] ok 1413 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [variable] ok 1414 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [exception] ok 1415 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [return] ok 1416 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [variable] ok 1417 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [exception] ok 1418 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [return] ok 1419 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [variable] ok 1420 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [exception] ok 1421 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [return] ok 1422 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [variable] ok 1423 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [exception] ok 1424 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [return] ok 1425 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [variable] ok 1426 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [exception] ok 1427 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [return] ok 1428 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [variable] ok 1429 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [exception] ok 1430 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [return] ok 1431 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [variable] ok 1432 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [exception] ok 1433 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [return] ok 1434 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [variable] ok 1435 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [exception] ok 1436 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [return] ok 1437 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [variable] ok 1438 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [exception] ok 1439 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [return] ok 1440 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [variable] ok 1441 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [exception] ok 1442 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [return] ok 1443 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [variable] ok 1444 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [exception] ok 1445 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [return] ok 1446 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [variable] ok 1447 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [exception] ok 1448 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [return] ok 1449 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [variable] ok 1450 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [exception] ok 1451 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [return] ok 1452 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [variable] ok 1453 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [exception] ok 1454 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [return] ok 1455 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [variable] ok 1456 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [exception] ok 1457 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [return] ok 1458 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [variable] ok 1459 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [exception] ok 1460 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [return] ok 1461 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [variable] ok 1462 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [exception] ok 1463 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [return] ok 1464 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [variable] ok 1465 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [exception] ok 1466 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [return] ok 1467 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [variable] ok 1468 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [exception] ok 1469 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [return] ok 1470 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [variable] ok 1471 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [exception] ok 1472 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [return] ok 1473 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [variable] ok 1474 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [exception] ok 1475 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [return] ok 1476 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [variable] ok 1477 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [exception] ok 1478 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [return] ok 1479 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [variable] ok 1480 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [exception] ok 1481 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [return] ok 1482 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [variable] ok 1483 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [exception] ok 1484 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [return] ok 1485 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [variable] ok 1486 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [exception] ok 1487 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [return] ok 1488 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [variable] ok 1489 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [exception] ok 1490 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [return] ok 1491 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [variable] ok 1492 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [exception] ok 1493 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [return] ok 1494 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [variable] ok 1495 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [exception] ok 1496 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [return] ok 1497 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [variable] ok 1498 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [exception] ok 1499 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [return] ok 1500 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [variable] ok 1501 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [exception] ok 1502 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [return] ok 1503 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [variable] ok 1504 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [exception] ok 1505 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [return] ok 1506 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [variable] ok 1507 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [exception] ok 1508 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [return] ok 1509 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [variable] ok 1510 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [exception] ok 1511 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [return] ok 1512 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [variable] ok 1513 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [exception] ok 1514 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [return] ok 1515 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [variable] ok 1516 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [exception] ok 1517 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [return] ok 1518 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [variable] ok 1519 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [exception] ok 1520 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [return] ok 1521 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [variable] ok 1522 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [exception] ok 1523 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [return] ok 1524 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [variable] ok 1525 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [exception] ok 1526 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [return] ok 1527 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [variable] ok 1528 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [exception] ok 1529 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [return] ok 1530 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [variable] ok 1531 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [exception] ok 1532 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [return] ok 1533 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [variable] ok 1534 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [exception] ok 1535 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [return] ok 1536 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [variable] ok 1537 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [exception] ok 1538 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [return] ok 1539 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [variable] ok 1540 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [exception] ok 1541 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [return] ok 1542 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [variable] ok 1543 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [exception] ok 1544 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [return] ok 1545 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [variable] ok 1546 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [exception] ok 1547 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [return] ok 1548 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [variable] ok 1549 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [exception] ok 1550 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [return] ok 1551 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [variable] ok 1552 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [exception] ok 1553 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [return] ok 1554 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [variable] ok 1555 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [exception] ok 1556 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [return] ok 1557 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [variable] ok 1558 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [exception] ok 1559 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [return] ok 1560 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [variable] ok 1561 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [exception] ok 1562 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [return] ok 1563 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [variable] ok 1564 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [exception] ok 1565 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [return] ok 1566 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [variable] ok 1567 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [exception] ok 1568 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [return] ok 1569 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [variable] ok 1570 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [exception] ok 1571 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [return] ok 1572 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [variable] ok 1573 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [exception] ok 1574 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [return] ok 1575 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [variable] ok 1576 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [exception] ok 1577 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [return] ok 1578 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [variable] ok 1579 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [exception] ok 1580 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [return] ok 1581 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [variable] ok 1582 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [exception] ok 1583 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [return] ok 1584 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [variable] ok 1585 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [exception] ok 1586 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [return] ok 1587 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [variable] ok 1588 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [exception] ok 1589 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [return] ok 1590 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [variable] ok 1591 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [exception] ok 1592 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [return] ok 1593 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [variable] ok 1594 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [exception] ok 1595 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [return] ok 1596 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [variable] ok 1597 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [exception] ok 1598 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [return] ok 1599 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [variable] ok 1600 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [exception] ok 1601 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [return] ok 1602 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [variable] ok 1603 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [exception] ok 1604 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [return] ok 1605 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [variable] ok 1606 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [exception] ok 1607 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [return] ok 1608 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [variable] ok 1609 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [exception] ok 1610 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [return] ok 1611 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [variable] ok 1612 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [exception] ok 1613 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [return] ok 1614 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [variable] ok 1615 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [exception] ok 1616 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [return] ok 1617 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [variable] ok 1618 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [exception] ok 1619 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [return] ok 1620 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [variable] ok 1621 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [exception] ok 1622 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [return] ok 1623 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [variable] ok 1624 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [exception] ok 1625 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [return] ok 1626 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [variable] ok 1627 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [exception] ok 1628 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [return] ok 1629 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [variable] ok 1630 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [exception] ok 1631 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [return] ok 1632 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [variable] ok 1633 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [exception] ok 1634 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [return] ok 1635 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [variable] ok 1636 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [exception] ok 1637 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [return] ok 1638 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [variable] ok 1639 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [exception] ok 1640 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [return] ok 1641 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [variable] ok 1642 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [exception] ok 1643 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [return] ok 1644 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [variable] ok 1645 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [exception] ok 1646 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [return] ok 1647 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [variable] ok 1648 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [exception] ok 1649 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [return] ok 1650 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [variable] ok 1651 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [exception] ok 1652 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [return] ok 1653 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [variable] ok 1654 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [exception] ok 1655 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [return] ok 1656 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [variable] ok 1657 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [exception] ok 1658 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [return] ok 1659 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [variable] ok 1660 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [exception] ok 1661 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [return] ok 1662 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [variable] ok 1663 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [exception] ok 1664 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [return] ok 1665 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [variable] ok 1666 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [exception] ok 1667 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [return] ok 1668 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [variable] ok 1669 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [exception] ok 1670 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [return] ok 1671 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [variable] ok 1672 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [exception] ok 1673 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [return] ok 1674 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [variable] ok 1675 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [exception] ok 1676 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [return] ok 1677 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [variable] ok 1678 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [exception] ok 1679 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [return] ok 1680 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [variable] ok 1681 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [exception] ok 1682 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [return] ok 1683 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [variable] ok 1684 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [exception] ok 1685 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [return] ok 1686 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [variable] ok 1687 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [exception] ok 1688 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [return] ok 1689 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [variable] ok 1690 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [exception] ok 1691 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [return] ok 1692 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [variable] ok 1693 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [exception] ok 1694 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [return] ok 1695 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [variable] ok 1696 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [exception] ok 1697 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [return] ok 1698 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [variable] ok 1699 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [exception] ok 1700 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [return] ok 1701 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [variable] ok 1702 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [exception] ok 1703 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [return] ok 1704 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [variable] ok 1705 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [exception] ok 1706 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [return] ok 1707 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [variable] ok 1708 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [exception] ok 1709 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [return] ok 1710 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [variable] ok 1711 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [exception] ok 1712 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [return] ok 1713 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [variable] ok 1714 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [exception] ok 1715 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [return] ok 1716 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [variable] ok 1717 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [exception] ok 1718 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [return] ok 1719 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [variable] ok 1720 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [exception] ok 1721 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [return] ok 1722 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [variable] ok 1723 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [exception] ok 1724 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [return] ok 1725 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [variable] ok 1726 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [exception] ok 1727 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [return] ok 1728 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [variable] ok 1729 - my $x; 1 for $x->{a}; () [exception] ok 1730 - my $x; 1 for $x->{a}; () [return] ok 1731 - my $x; 1 for $x->{a}; () [variable] ok 1732 - our $x; local $x; use strict; 1 for $x->{a}; () [exception] ok 1733 - our $x; local $x; use strict; 1 for $x->{a}; () [return] ok 1734 - our $x; local $x; use strict; 1 for $x->{a}; () [variable] ok 1735 - our $x; local $x; no strict; 1 for $x->{a}; () [exception] ok 1736 - our $x; local $x; no strict; 1 for $x->{a}; () [return] ok 1737 - our $x; local $x; no strict; 1 for $x->{a}; () [variable] ok 1738 - my $x; 1 for $$x{a}; () [exception] ok 1739 - my $x; 1 for $$x{a}; () [return] ok 1740 - my $x; 1 for $$x{a}; () [variable] ok 1741 - our $x; local $x; use strict; 1 for $$x{a}; () [exception] ok 1742 - our $x; local $x; use strict; 1 for $$x{a}; () [return] ok 1743 - our $x; local $x; use strict; 1 for $$x{a}; () [variable] ok 1744 - our $x; local $x; no strict; 1 for $$x{a}; () [exception] ok 1745 - our $x; local $x; no strict; 1 for $$x{a}; () [return] ok 1746 - our $x; local $x; no strict; 1 for $$x{a}; () [variable] ok 1747 - my %x; 1 for $x{a}; () [exception] ok 1748 - my %x; 1 for $x{a}; () [return] ok 1749 - my %x; 1 for $x{a}; () [variable] ok 1750 - our %x; local %x; use strict; 1 for $x{a}; () [exception] ok 1751 - our %x; local %x; use strict; 1 for $x{a}; () [return] ok 1752 - our %x; local %x; use strict; 1 for $x{a}; () [variable] ok 1753 - our %x; local %x; no strict; 1 for $x{a}; () [exception] ok 1754 - our %x; local %x; no strict; 1 for $x{a}; () [return] ok 1755 - our %x; local %x; no strict; 1 for $x{a}; () [variable] ok 1756 - my $x; 1 for $x->{a}; () [exception] ok 1757 - my $x; 1 for $x->{a}; () [return] ok 1758 - my $x; 1 for $x->{a}; () [variable] ok 1759 - our $x; local $x; use strict; 1 for $x->{a}; () [exception] ok 1760 - our $x; local $x; use strict; 1 for $x->{a}; () [return] ok 1761 - our $x; local $x; use strict; 1 for $x->{a}; () [variable] ok 1762 - our $x; local $x; no strict; 1 for $x->{a}; () [exception] ok 1763 - our $x; local $x; no strict; 1 for $x->{a}; () [return] ok 1764 - our $x; local $x; no strict; 1 for $x->{a}; () [variable] ok 1765 - my $x; 1 for $$x{a}; () [exception] ok 1766 - my $x; 1 for $$x{a}; () [return] ok 1767 - my $x; 1 for $$x{a}; () [variable] ok 1768 - our $x; local $x; use strict; 1 for $$x{a}; () [exception] ok 1769 - our $x; local $x; use strict; 1 for $$x{a}; () [return] ok 1770 - our $x; local $x; use strict; 1 for $$x{a}; () [variable] ok 1771 - our $x; local $x; no strict; 1 for $$x{a}; () [exception] ok 1772 - our $x; local $x; no strict; 1 for $$x{a}; () [return] ok 1773 - our $x; local $x; no strict; 1 for $$x{a}; () [variable] ok 1774 - my %x; 1 for $x{a}; () [exception] ok 1775 - my %x; 1 for $x{a}; () [return] ok 1776 - my %x; 1 for $x{a}; () [variable] ok 1777 - our %x; local %x; use strict; 1 for $x{a}; () [exception] ok 1778 - our %x; local %x; use strict; 1 for $x{a}; () [return] ok 1779 - our %x; local %x; use strict; 1 for $x{a}; () [variable] ok 1780 - our %x; local %x; no strict; 1 for $x{a}; () [exception] ok 1781 - our %x; local %x; no strict; 1 for $x{a}; () [return] ok 1782 - our %x; local %x; no strict; 1 for $x{a}; () [variable] ok 1783 - my $x; 1 for $x->{a}; () <+fetch> [exception] ok 1784 - my $x; 1 for $x->{a}; () <+fetch> [return] ok 1785 - my $x; 1 for $x->{a}; () <+fetch> [variable] ok 1786 - our $x; local $x; use strict; 1 for $x->{a}; () <+fetch> [exception] ok 1787 - our $x; local $x; use strict; 1 for $x->{a}; () <+fetch> [return] ok 1788 - our $x; local $x; use strict; 1 for $x->{a}; () <+fetch> [variable] ok 1789 - our $x; local $x; no strict; 1 for $x->{a}; () <+fetch> [exception] ok 1790 - our $x; local $x; no strict; 1 for $x->{a}; () <+fetch> [return] ok 1791 - our $x; local $x; no strict; 1 for $x->{a}; () <+fetch> [variable] ok 1792 - my $x; 1 for $$x{a}; () <+fetch> [exception] ok 1793 - my $x; 1 for $$x{a}; () <+fetch> [return] ok 1794 - my $x; 1 for $$x{a}; () <+fetch> [variable] ok 1795 - our $x; local $x; use strict; 1 for $$x{a}; () <+fetch> [exception] ok 1796 - our $x; local $x; use strict; 1 for $$x{a}; () <+fetch> [return] ok 1797 - our $x; local $x; use strict; 1 for $$x{a}; () <+fetch> [variable] ok 1798 - our $x; local $x; no strict; 1 for $$x{a}; () <+fetch> [exception] ok 1799 - our $x; local $x; no strict; 1 for $$x{a}; () <+fetch> [return] ok 1800 - our $x; local $x; no strict; 1 for $$x{a}; () <+fetch> [variable] ok 1801 - my %x; 1 for $x{a}; () <+fetch> [exception] ok 1802 - my %x; 1 for $x{a}; () <+fetch> [return] ok 1803 - my %x; 1 for $x{a}; () <+fetch> [variable] ok 1804 - our %x; local %x; use strict; 1 for $x{a}; () <+fetch> [exception] ok 1805 - our %x; local %x; use strict; 1 for $x{a}; () <+fetch> [return] ok 1806 - our %x; local %x; use strict; 1 for $x{a}; () <+fetch> [variable] ok 1807 - our %x; local %x; no strict; 1 for $x{a}; () <+fetch> [exception] ok 1808 - our %x; local %x; no strict; 1 for $x{a}; () <+fetch> [return] ok 1809 - our %x; local %x; no strict; 1 for $x{a}; () <+fetch> [variable] ok 1810 - my $x; 1 for $x->{a}; () <+exists> [exception] ok 1811 - my $x; 1 for $x->{a}; () <+exists> [return] ok 1812 - my $x; 1 for $x->{a}; () <+exists> [variable] ok 1813 - our $x; local $x; use strict; 1 for $x->{a}; () <+exists> [exception] ok 1814 - our $x; local $x; use strict; 1 for $x->{a}; () <+exists> [return] ok 1815 - our $x; local $x; use strict; 1 for $x->{a}; () <+exists> [variable] ok 1816 - our $x; local $x; no strict; 1 for $x->{a}; () <+exists> [exception] ok 1817 - our $x; local $x; no strict; 1 for $x->{a}; () <+exists> [return] ok 1818 - our $x; local $x; no strict; 1 for $x->{a}; () <+exists> [variable] ok 1819 - my $x; 1 for $$x{a}; () <+exists> [exception] ok 1820 - my $x; 1 for $$x{a}; () <+exists> [return] ok 1821 - my $x; 1 for $$x{a}; () <+exists> [variable] ok 1822 - our $x; local $x; use strict; 1 for $$x{a}; () <+exists> [exception] ok 1823 - our $x; local $x; use strict; 1 for $$x{a}; () <+exists> [return] ok 1824 - our $x; local $x; use strict; 1 for $$x{a}; () <+exists> [variable] ok 1825 - our $x; local $x; no strict; 1 for $$x{a}; () <+exists> [exception] ok 1826 - our $x; local $x; no strict; 1 for $$x{a}; () <+exists> [return] ok 1827 - our $x; local $x; no strict; 1 for $$x{a}; () <+exists> [variable] ok 1828 - my %x; 1 for $x{a}; () <+exists> [exception] ok 1829 - my %x; 1 for $x{a}; () <+exists> [return] ok 1830 - my %x; 1 for $x{a}; () <+exists> [variable] ok 1831 - our %x; local %x; use strict; 1 for $x{a}; () <+exists> [exception] ok 1832 - our %x; local %x; use strict; 1 for $x{a}; () <+exists> [return] ok 1833 - our %x; local %x; use strict; 1 for $x{a}; () <+exists> [variable] ok 1834 - our %x; local %x; no strict; 1 for $x{a}; () <+exists> [exception] ok 1835 - our %x; local %x; no strict; 1 for $x{a}; () <+exists> [return] ok 1836 - our %x; local %x; no strict; 1 for $x{a}; () <+exists> [variable] ok 1837 - my $x; 1 for $x->{a}; () <+delete> [exception] ok 1838 - my $x; 1 for $x->{a}; () <+delete> [return] ok 1839 - my $x; 1 for $x->{a}; () <+delete> [variable] ok 1840 - our $x; local $x; use strict; 1 for $x->{a}; () <+delete> [exception] ok 1841 - our $x; local $x; use strict; 1 for $x->{a}; () <+delete> [return] ok 1842 - our $x; local $x; use strict; 1 for $x->{a}; () <+delete> [variable] ok 1843 - our $x; local $x; no strict; 1 for $x->{a}; () <+delete> [exception] ok 1844 - our $x; local $x; no strict; 1 for $x->{a}; () <+delete> [return] ok 1845 - our $x; local $x; no strict; 1 for $x->{a}; () <+delete> [variable] ok 1846 - my $x; 1 for $$x{a}; () <+delete> [exception] ok 1847 - my $x; 1 for $$x{a}; () <+delete> [return] ok 1848 - my $x; 1 for $$x{a}; () <+delete> [variable] ok 1849 - our $x; local $x; use strict; 1 for $$x{a}; () <+delete> [exception] ok 1850 - our $x; local $x; use strict; 1 for $$x{a}; () <+delete> [return] ok 1851 - our $x; local $x; use strict; 1 for $$x{a}; () <+delete> [variable] ok 1852 - our $x; local $x; no strict; 1 for $$x{a}; () <+delete> [exception] ok 1853 - our $x; local $x; no strict; 1 for $$x{a}; () <+delete> [return] ok 1854 - our $x; local $x; no strict; 1 for $$x{a}; () <+delete> [variable] ok 1855 - my %x; 1 for $x{a}; () <+delete> [exception] ok 1856 - my %x; 1 for $x{a}; () <+delete> [return] ok 1857 - my %x; 1 for $x{a}; () <+delete> [variable] ok 1858 - our %x; local %x; use strict; 1 for $x{a}; () <+delete> [exception] ok 1859 - our %x; local %x; use strict; 1 for $x{a}; () <+delete> [return] ok 1860 - our %x; local %x; use strict; 1 for $x{a}; () <+delete> [variable] ok 1861 - our %x; local %x; no strict; 1 for $x{a}; () <+delete> [exception] ok 1862 - our %x; local %x; no strict; 1 for $x{a}; () <+delete> [return] ok 1863 - our %x; local %x; no strict; 1 for $x{a}; () <+delete> [variable] ok 1864 - my $x; 1 for $x->{a}; () <+store> [exception] ok 1865 - my $x; 1 for $x->{a}; () <+store> [return] ok 1866 - my $x; 1 for $x->{a}; () <+store> [variable] ok 1867 - our $x; local $x; use strict; 1 for $x->{a}; () <+store> [exception] ok 1868 - our $x; local $x; use strict; 1 for $x->{a}; () <+store> [return] ok 1869 - our $x; local $x; use strict; 1 for $x->{a}; () <+store> [variable] ok 1870 - our $x; local $x; no strict; 1 for $x->{a}; () <+store> [exception] ok 1871 - our $x; local $x; no strict; 1 for $x->{a}; () <+store> [return] ok 1872 - our $x; local $x; no strict; 1 for $x->{a}; () <+store> [variable] ok 1873 - my $x; 1 for $$x{a}; () <+store> [exception] ok 1874 - my $x; 1 for $$x{a}; () <+store> [return] ok 1875 - my $x; 1 for $$x{a}; () <+store> [variable] ok 1876 - our $x; local $x; use strict; 1 for $$x{a}; () <+store> [exception] ok 1877 - our $x; local $x; use strict; 1 for $$x{a}; () <+store> [return] ok 1878 - our $x; local $x; use strict; 1 for $$x{a}; () <+store> [variable] ok 1879 - our $x; local $x; no strict; 1 for $$x{a}; () <+store> [exception] ok 1880 - our $x; local $x; no strict; 1 for $$x{a}; () <+store> [return] ok 1881 - our $x; local $x; no strict; 1 for $$x{a}; () <+store> [variable] ok 1882 - my %x; 1 <+store> [exception] ok 1883 - my %x; 1 <+store> [return] ok 1884 - my %x; 1 <+store> [variable] ok 1885 - our %x; local %x; use strict; 1 <+store> [exception] ok 1886 - our %x; local %x; use strict; 1 <+store> [return] ok 1887 - our %x; local %x; use strict; 1 <+store> [variable] ok 1888 - our %x; local %x; no strict; 1 <+store> [exception] ok 1889 - our %x; local %x; no strict; 1 <+store> [return] ok 1890 - our %x; local %x; no strict; 1 <+store> [variable] ok 1891 - my $x; $_ = 1 for $x->{a}; () [exception] ok 1892 - my $x; $_ = 1 for $x->{a}; () [return] ok 1893 - my $x; $_ = 1 for $x->{a}; () [variable] ok 1894 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () [exception] ok 1895 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () [return] ok 1896 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () [variable] ok 1897 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () [exception] ok 1898 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () [return] ok 1899 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () [variable] ok 1900 - my $x; $_ = 1 for $$x{a}; () [exception] ok 1901 - my $x; $_ = 1 for $$x{a}; () [return] ok 1902 - my $x; $_ = 1 for $$x{a}; () [variable] ok 1903 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () [exception] ok 1904 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () [return] ok 1905 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () [variable] ok 1906 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () [exception] ok 1907 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () [return] ok 1908 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () [variable] ok 1909 - my %x; $_ = 1 for $x{a}; () [exception] ok 1910 - my %x; $_ = 1 for $x{a}; () [return] ok 1911 - my %x; $_ = 1 for $x{a}; () [variable] ok 1912 - our %x; local %x; use strict; $_ = 1 for $x{a}; () [exception] ok 1913 - our %x; local %x; use strict; $_ = 1 for $x{a}; () [return] ok 1914 - our %x; local %x; use strict; $_ = 1 for $x{a}; () [variable] ok 1915 - our %x; local %x; no strict; $_ = 1 for $x{a}; () [exception] ok 1916 - our %x; local %x; no strict; $_ = 1 for $x{a}; () [return] ok 1917 - our %x; local %x; no strict; $_ = 1 for $x{a}; () [variable] ok 1918 - my $x; $_ = 1 for $x->{a}; () [exception] ok 1919 - my $x; $_ = 1 for $x->{a}; () [return] ok 1920 - my $x; $_ = 1 for $x->{a}; () [variable] ok 1921 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () [exception] ok 1922 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () [return] ok 1923 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () [variable] ok 1924 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () [exception] ok 1925 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () [return] ok 1926 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () [variable] ok 1927 - my $x; $_ = 1 for $$x{a}; () [exception] ok 1928 - my $x; $_ = 1 for $$x{a}; () [return] ok 1929 - my $x; $_ = 1 for $$x{a}; () [variable] ok 1930 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () [exception] ok 1931 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () [return] ok 1932 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () [variable] ok 1933 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () [exception] ok 1934 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () [return] ok 1935 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () [variable] ok 1936 - my %x; $_ = 1 for $x{a}; () [exception] ok 1937 - my %x; $_ = 1 for $x{a}; () [return] ok 1938 - my %x; $_ = 1 for $x{a}; () [variable] ok 1939 - our %x; local %x; use strict; $_ = 1 for $x{a}; () [exception] ok 1940 - our %x; local %x; use strict; $_ = 1 for $x{a}; () [return] ok 1941 - our %x; local %x; use strict; $_ = 1 for $x{a}; () [variable] ok 1942 - our %x; local %x; no strict; $_ = 1 for $x{a}; () [exception] ok 1943 - our %x; local %x; no strict; $_ = 1 for $x{a}; () [return] ok 1944 - our %x; local %x; no strict; $_ = 1 for $x{a}; () [variable] ok 1945 - my $x; $_ = 1 for $x->{a}; () <+fetch> [exception] ok 1946 - my $x; $_ = 1 for $x->{a}; () <+fetch> [return] ok 1947 - my $x; $_ = 1 for $x->{a}; () <+fetch> [variable] ok 1948 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+fetch> [exception] ok 1949 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+fetch> [return] ok 1950 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+fetch> [variable] ok 1951 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+fetch> [exception] ok 1952 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+fetch> [return] ok 1953 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+fetch> [variable] ok 1954 - my $x; $_ = 1 for $$x{a}; () <+fetch> [exception] ok 1955 - my $x; $_ = 1 for $$x{a}; () <+fetch> [return] ok 1956 - my $x; $_ = 1 for $$x{a}; () <+fetch> [variable] ok 1957 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+fetch> [exception] ok 1958 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+fetch> [return] ok 1959 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+fetch> [variable] ok 1960 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+fetch> [exception] ok 1961 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+fetch> [return] ok 1962 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+fetch> [variable] ok 1963 - my %x; $_ = 1 for $x{a}; () <+fetch> [exception] ok 1964 - my %x; $_ = 1 for $x{a}; () <+fetch> [return] ok 1965 - my %x; $_ = 1 for $x{a}; () <+fetch> [variable] ok 1966 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+fetch> [exception] ok 1967 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+fetch> [return] ok 1968 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+fetch> [variable] ok 1969 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+fetch> [exception] ok 1970 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+fetch> [return] ok 1971 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+fetch> [variable] ok 1972 - my $x; $_ = 1 for $x->{a}; () <+exists> [exception] ok 1973 - my $x; $_ = 1 for $x->{a}; () <+exists> [return] ok 1974 - my $x; $_ = 1 for $x->{a}; () <+exists> [variable] ok 1975 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+exists> [exception] ok 1976 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+exists> [return] ok 1977 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+exists> [variable] ok 1978 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+exists> [exception] ok 1979 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+exists> [return] ok 1980 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+exists> [variable] ok 1981 - my $x; $_ = 1 for $$x{a}; () <+exists> [exception] ok 1982 - my $x; $_ = 1 for $$x{a}; () <+exists> [return] ok 1983 - my $x; $_ = 1 for $$x{a}; () <+exists> [variable] ok 1984 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+exists> [exception] ok 1985 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+exists> [return] ok 1986 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+exists> [variable] ok 1987 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+exists> [exception] ok 1988 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+exists> [return] ok 1989 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+exists> [variable] ok 1990 - my %x; $_ = 1 for $x{a}; () <+exists> [exception] ok 1991 - my %x; $_ = 1 for $x{a}; () <+exists> [return] ok 1992 - my %x; $_ = 1 for $x{a}; () <+exists> [variable] ok 1993 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+exists> [exception] ok 1994 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+exists> [return] ok 1995 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+exists> [variable] ok 1996 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+exists> [exception] ok 1997 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+exists> [return] ok 1998 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+exists> [variable] ok 1999 - my $x; $_ = 1 for $x->{a}; () <+delete> [exception] ok 2000 - my $x; $_ = 1 for $x->{a}; () <+delete> [return] ok 2001 - my $x; $_ = 1 for $x->{a}; () <+delete> [variable] ok 2002 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+delete> [exception] ok 2003 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+delete> [return] ok 2004 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+delete> [variable] ok 2005 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+delete> [exception] ok 2006 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+delete> [return] ok 2007 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+delete> [variable] ok 2008 - my $x; $_ = 1 for $$x{a}; () <+delete> [exception] ok 2009 - my $x; $_ = 1 for $$x{a}; () <+delete> [return] ok 2010 - my $x; $_ = 1 for $$x{a}; () <+delete> [variable] ok 2011 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+delete> [exception] ok 2012 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+delete> [return] ok 2013 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+delete> [variable] ok 2014 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+delete> [exception] ok 2015 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+delete> [return] ok 2016 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+delete> [variable] ok 2017 - my %x; $_ = 1 for $x{a}; () <+delete> [exception] ok 2018 - my %x; $_ = 1 for $x{a}; () <+delete> [return] ok 2019 - my %x; $_ = 1 for $x{a}; () <+delete> [variable] ok 2020 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+delete> [exception] ok 2021 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+delete> [return] ok 2022 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+delete> [variable] ok 2023 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+delete> [exception] ok 2024 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+delete> [return] ok 2025 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+delete> [variable] ok 2026 - my $x; $_ = 1 for $x->{a}; () <+store> [exception] ok 2027 - my $x; $_ = 1 for $x->{a}; () <+store> [return] ok 2028 - my $x; $_ = 1 for $x->{a}; () <+store> [variable] ok 2029 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+store> [exception] ok 2030 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+store> [return] ok 2031 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+store> [variable] ok 2032 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+store> [exception] ok 2033 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+store> [return] ok 2034 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+store> [variable] ok 2035 - my $x; $_ = 1 for $$x{a}; () <+store> [exception] ok 2036 - my $x; $_ = 1 for $$x{a}; () <+store> [return] ok 2037 - my $x; $_ = 1 for $$x{a}; () <+store> [variable] ok 2038 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+store> [exception] ok 2039 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+store> [return] ok 2040 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+store> [variable] ok 2041 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+store> [exception] ok 2042 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+store> [return] ok 2043 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+store> [variable] ok 2044 - my %x; 1 <+store> [exception] ok 2045 - my %x; 1 <+store> [return] ok 2046 - my %x; 1 <+store> [variable] ok 2047 - our %x; local %x; use strict; 1 <+store> [exception] ok 2048 - our %x; local %x; use strict; 1 <+store> [return] ok 2049 - our %x; local %x; use strict; 1 <+store> [variable] ok 2050 - our %x; local %x; no strict; 1 <+store> [exception] ok 2051 - our %x; local %x; no strict; 1 <+store> [return] ok 2052 - our %x; local %x; no strict; 1 <+store> [variable] ok 2053 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [exception] ok 2054 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [return] ok 2055 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [variable] ok 2056 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [exception] ok 2057 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [return] ok 2058 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [variable] ok 2059 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [exception] ok 2060 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [return] ok 2061 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [variable] ok 2062 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [exception] ok 2063 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [return] ok 2064 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [variable] ok 2065 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [exception] ok 2066 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [return] ok 2067 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [variable] ok 2068 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [exception] ok 2069 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [return] ok 2070 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [variable] ok 2071 - my %x; $x{a} = 1; 1 for $x{a}; () <+fetch> [exception] ok 2072 - my %x; $x{a} = 1; 1 for $x{a}; () <+fetch> [return] ok 2073 - my %x; $x{a} = 1; 1 for $x{a}; () <+fetch> [variable] ok 2074 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+fetch> [exception] ok 2075 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+fetch> [return] ok 2076 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+fetch> [variable] ok 2077 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+fetch> [exception] ok 2078 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+fetch> [return] ok 2079 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+fetch> [variable] ok 2080 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [exception] ok 2081 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [return] ok 2082 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [variable] ok 2083 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [exception] ok 2084 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [return] ok 2085 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [variable] ok 2086 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [exception] ok 2087 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [return] ok 2088 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [variable] ok 2089 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [exception] ok 2090 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [return] ok 2091 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [variable] ok 2092 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [exception] ok 2093 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [return] ok 2094 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [variable] ok 2095 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [exception] ok 2096 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [return] ok 2097 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [variable] ok 2098 - my %x; $x{a} = 1; 1 for $x{b}; () <+fetch> [exception] ok 2099 - my %x; $x{a} = 1; 1 for $x{b}; () <+fetch> [return] ok 2100 - my %x; $x{a} = 1; 1 for $x{b}; () <+fetch> [variable] ok 2101 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+fetch> [exception] ok 2102 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+fetch> [return] ok 2103 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+fetch> [variable] ok 2104 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+fetch> [exception] ok 2105 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+fetch> [return] ok 2106 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+fetch> [variable] ok 2107 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+exists> [exception] ok 2108 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+exists> [return] ok 2109 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+exists> [variable] ok 2110 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+exists> [exception] ok 2111 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+exists> [return] ok 2112 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+exists> [variable] ok 2113 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+exists> [exception] ok 2114 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+exists> [return] ok 2115 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+exists> [variable] ok 2116 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+exists> [exception] ok 2117 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+exists> [return] ok 2118 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+exists> [variable] ok 2119 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+exists> [exception] ok 2120 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+exists> [return] ok 2121 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+exists> [variable] ok 2122 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+exists> [exception] ok 2123 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+exists> [return] ok 2124 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+exists> [variable] ok 2125 - my %x; $x{a} = 1; 1 for $x{a}; () <+exists> [exception] ok 2126 - my %x; $x{a} = 1; 1 for $x{a}; () <+exists> [return] ok 2127 - my %x; $x{a} = 1; 1 for $x{a}; () <+exists> [variable] ok 2128 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+exists> [exception] ok 2129 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+exists> [return] ok 2130 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+exists> [variable] ok 2131 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+exists> [exception] ok 2132 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+exists> [return] ok 2133 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+exists> [variable] ok 2134 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+exists> [exception] ok 2135 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+exists> [return] ok 2136 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+exists> [variable] ok 2137 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+exists> [exception] ok 2138 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+exists> [return] ok 2139 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+exists> [variable] ok 2140 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+exists> [exception] ok 2141 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+exists> [return] ok 2142 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+exists> [variable] ok 2143 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+exists> [exception] ok 2144 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+exists> [return] ok 2145 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+exists> [variable] ok 2146 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+exists> [exception] ok 2147 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+exists> [return] ok 2148 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+exists> [variable] ok 2149 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+exists> [exception] ok 2150 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+exists> [return] ok 2151 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+exists> [variable] ok 2152 - my %x; $x{a} = 1; 1 for $x{b}; () <+exists> [exception] ok 2153 - my %x; $x{a} = 1; 1 for $x{b}; () <+exists> [return] ok 2154 - my %x; $x{a} = 1; 1 for $x{b}; () <+exists> [variable] ok 2155 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+exists> [exception] ok 2156 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+exists> [return] ok 2157 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+exists> [variable] ok 2158 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+exists> [exception] ok 2159 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+exists> [return] ok 2160 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+exists> [variable] ok 2161 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+delete> [exception] ok 2162 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+delete> [return] ok 2163 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+delete> [variable] ok 2164 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+delete> [exception] ok 2165 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+delete> [return] ok 2166 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+delete> [variable] ok 2167 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+delete> [exception] ok 2168 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+delete> [return] ok 2169 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+delete> [variable] ok 2170 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+delete> [exception] ok 2171 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+delete> [return] ok 2172 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+delete> [variable] ok 2173 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+delete> [exception] ok 2174 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+delete> [return] ok 2175 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+delete> [variable] ok 2176 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+delete> [exception] ok 2177 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+delete> [return] ok 2178 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+delete> [variable] ok 2179 - my %x; $x{a} = 1; 1 for $x{a}; () <+delete> [exception] ok 2180 - my %x; $x{a} = 1; 1 for $x{a}; () <+delete> [return] ok 2181 - my %x; $x{a} = 1; 1 for $x{a}; () <+delete> [variable] ok 2182 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+delete> [exception] ok 2183 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+delete> [return] ok 2184 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+delete> [variable] ok 2185 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+delete> [exception] ok 2186 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+delete> [return] ok 2187 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+delete> [variable] ok 2188 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+delete> [exception] ok 2189 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+delete> [return] ok 2190 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+delete> [variable] ok 2191 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+delete> [exception] ok 2192 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+delete> [return] ok 2193 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+delete> [variable] ok 2194 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+delete> [exception] ok 2195 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+delete> [return] ok 2196 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+delete> [variable] ok 2197 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+delete> [exception] ok 2198 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+delete> [return] ok 2199 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+delete> [variable] ok 2200 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+delete> [exception] ok 2201 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+delete> [return] ok 2202 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+delete> [variable] ok 2203 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+delete> [exception] ok 2204 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+delete> [return] ok 2205 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+delete> [variable] ok 2206 - my %x; $x{a} = 1; 1 for $x{b}; () <+delete> [exception] ok 2207 - my %x; $x{a} = 1; 1 for $x{b}; () <+delete> [return] ok 2208 - my %x; $x{a} = 1; 1 for $x{b}; () <+delete> [variable] ok 2209 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+delete> [exception] ok 2210 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+delete> [return] ok 2211 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+delete> [variable] ok 2212 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+delete> [exception] ok 2213 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+delete> [return] ok 2214 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+delete> [variable] ok 2215 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+store> [exception] ok 2216 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+store> [return] ok 2217 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+store> [variable] ok 2218 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+store> [exception] ok 2219 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+store> [return] ok 2220 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+store> [variable] ok 2221 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+store> [exception] ok 2222 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+store> [return] ok 2223 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+store> [variable] ok 2224 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+store> [exception] ok 2225 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+store> [return] ok 2226 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+store> [variable] ok 2227 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+store> [exception] ok 2228 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+store> [return] ok 2229 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+store> [variable] ok 2230 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+store> [exception] ok 2231 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+store> [return] ok 2232 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+store> [variable] ok 2233 - my %x; $x{a} = 1; 1 for $x{a}; () <+store> [exception] ok 2234 - my %x; $x{a} = 1; 1 for $x{a}; () <+store> [return] ok 2235 - my %x; $x{a} = 1; 1 for $x{a}; () <+store> [variable] ok 2236 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+store> [exception] ok 2237 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+store> [return] ok 2238 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+store> [variable] ok 2239 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+store> [exception] ok 2240 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+store> [return] ok 2241 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+store> [variable] ok 2242 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+store> [exception] ok 2243 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+store> [return] ok 2244 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+store> [variable] ok 2245 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+store> [exception] ok 2246 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+store> [return] ok 2247 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+store> [variable] ok 2248 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+store> [exception] ok 2249 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+store> [return] ok 2250 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+store> [variable] ok 2251 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+store> [exception] ok 2252 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+store> [return] ok 2253 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+store> [variable] ok 2254 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+store> [exception] ok 2255 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+store> [return] ok 2256 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+store> [variable] ok 2257 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+store> [exception] ok 2258 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+store> [return] ok 2259 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+store> [variable] ok 2260 - my %x; $x{a} = 1; 1 for $x{b}; () <+store> [exception] ok 2261 - my %x; $x{a} = 1; 1 for $x{b}; () <+store> [return] ok 2262 - my %x; $x{a} = 1; 1 for $x{b}; () <+store> [variable] ok 2263 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+store> [exception] ok 2264 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+store> [return] ok 2265 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+store> [variable] ok 2266 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+store> [exception] ok 2267 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+store> [return] ok 2268 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+store> [variable] ok 2269 - my $x; do_nothing($x->{a}); () [exception] ok 2270 - my $x; do_nothing($x->{a}); () [return] ok 2271 - my $x; do_nothing($x->{a}); () [variable] ok 2272 - our $x; local $x; use strict; do_nothing($x->{a}); () [exception] ok 2273 - our $x; local $x; use strict; do_nothing($x->{a}); () [return] ok 2274 - our $x; local $x; use strict; do_nothing($x->{a}); () [variable] ok 2275 - our $x; local $x; no strict; do_nothing($x->{a}); () [exception] ok 2276 - our $x; local $x; no strict; do_nothing($x->{a}); () [return] ok 2277 - our $x; local $x; no strict; do_nothing($x->{a}); () [variable] ok 2278 - my $x; do_nothing($$x{a}); () [exception] ok 2279 - my $x; do_nothing($$x{a}); () [return] ok 2280 - my $x; do_nothing($$x{a}); () [variable] ok 2281 - our $x; local $x; use strict; do_nothing($$x{a}); () [exception] ok 2282 - our $x; local $x; use strict; do_nothing($$x{a}); () [return] ok 2283 - our $x; local $x; use strict; do_nothing($$x{a}); () [variable] ok 2284 - our $x; local $x; no strict; do_nothing($$x{a}); () [exception] ok 2285 - our $x; local $x; no strict; do_nothing($$x{a}); () [return] ok 2286 - our $x; local $x; no strict; do_nothing($$x{a}); () [variable] ok 2287 - my %x; do_nothing($x{a}); () [exception] ok 2288 - my %x; do_nothing($x{a}); () [return] ok 2289 - my %x; do_nothing($x{a}); () [variable] ok 2290 - our %x; local %x; use strict; do_nothing($x{a}); () [exception] ok 2291 - our %x; local %x; use strict; do_nothing($x{a}); () [return] ok 2292 - our %x; local %x; use strict; do_nothing($x{a}); () [variable] ok 2293 - our %x; local %x; no strict; do_nothing($x{a}); () [exception] ok 2294 - our %x; local %x; no strict; do_nothing($x{a}); () [return] ok 2295 - our %x; local %x; no strict; do_nothing($x{a}); () [variable] ok 2296 - my $x; do_nothing($x->{a}); () [exception] ok 2297 - my $x; do_nothing($x->{a}); () [return] ok 2298 - my $x; do_nothing($x->{a}); () [variable] ok 2299 - our $x; local $x; use strict; do_nothing($x->{a}); () [exception] ok 2300 - our $x; local $x; use strict; do_nothing($x->{a}); () [return] ok 2301 - our $x; local $x; use strict; do_nothing($x->{a}); () [variable] ok 2302 - our $x; local $x; no strict; do_nothing($x->{a}); () [exception] ok 2303 - our $x; local $x; no strict; do_nothing($x->{a}); () [return] ok 2304 - our $x; local $x; no strict; do_nothing($x->{a}); () [variable] ok 2305 - my $x; do_nothing($$x{a}); () [exception] ok 2306 - my $x; do_nothing($$x{a}); () [return] ok 2307 - my $x; do_nothing($$x{a}); () [variable] ok 2308 - our $x; local $x; use strict; do_nothing($$x{a}); () [exception] ok 2309 - our $x; local $x; use strict; do_nothing($$x{a}); () [return] ok 2310 - our $x; local $x; use strict; do_nothing($$x{a}); () [variable] ok 2311 - our $x; local $x; no strict; do_nothing($$x{a}); () [exception] ok 2312 - our $x; local $x; no strict; do_nothing($$x{a}); () [return] ok 2313 - our $x; local $x; no strict; do_nothing($$x{a}); () [variable] ok 2314 - my %x; do_nothing($x{a}); () [exception] ok 2315 - my %x; do_nothing($x{a}); () [return] ok 2316 - my %x; do_nothing($x{a}); () [variable] ok 2317 - our %x; local %x; use strict; do_nothing($x{a}); () [exception] ok 2318 - our %x; local %x; use strict; do_nothing($x{a}); () [return] ok 2319 - our %x; local %x; use strict; do_nothing($x{a}); () [variable] ok 2320 - our %x; local %x; no strict; do_nothing($x{a}); () [exception] ok 2321 - our %x; local %x; no strict; do_nothing($x{a}); () [return] ok 2322 - our %x; local %x; no strict; do_nothing($x{a}); () [variable] ok 2323 - my $x; do_nothing($x->{a}); () <+fetch> [exception] ok 2324 - my $x; do_nothing($x->{a}); () <+fetch> [return] ok 2325 - my $x; do_nothing($x->{a}); () <+fetch> [variable] ok 2326 - our $x; local $x; use strict; do_nothing($x->{a}); () <+fetch> [exception] ok 2327 - our $x; local $x; use strict; do_nothing($x->{a}); () <+fetch> [return] ok 2328 - our $x; local $x; use strict; do_nothing($x->{a}); () <+fetch> [variable] ok 2329 - our $x; local $x; no strict; do_nothing($x->{a}); () <+fetch> [exception] ok 2330 - our $x; local $x; no strict; do_nothing($x->{a}); () <+fetch> [return] ok 2331 - our $x; local $x; no strict; do_nothing($x->{a}); () <+fetch> [variable] ok 2332 - my $x; do_nothing($$x{a}); () <+fetch> [exception] ok 2333 - my $x; do_nothing($$x{a}); () <+fetch> [return] ok 2334 - my $x; do_nothing($$x{a}); () <+fetch> [variable] ok 2335 - our $x; local $x; use strict; do_nothing($$x{a}); () <+fetch> [exception] ok 2336 - our $x; local $x; use strict; do_nothing($$x{a}); () <+fetch> [return] ok 2337 - our $x; local $x; use strict; do_nothing($$x{a}); () <+fetch> [variable] ok 2338 - our $x; local $x; no strict; do_nothing($$x{a}); () <+fetch> [exception] ok 2339 - our $x; local $x; no strict; do_nothing($$x{a}); () <+fetch> [return] ok 2340 - our $x; local $x; no strict; do_nothing($$x{a}); () <+fetch> [variable] ok 2341 - my %x; do_nothing($x{a}); () <+fetch> [exception] ok 2342 - my %x; do_nothing($x{a}); () <+fetch> [return] ok 2343 - my %x; do_nothing($x{a}); () <+fetch> [variable] ok 2344 - our %x; local %x; use strict; do_nothing($x{a}); () <+fetch> [exception] ok 2345 - our %x; local %x; use strict; do_nothing($x{a}); () <+fetch> [return] ok 2346 - our %x; local %x; use strict; do_nothing($x{a}); () <+fetch> [variable] ok 2347 - our %x; local %x; no strict; do_nothing($x{a}); () <+fetch> [exception] ok 2348 - our %x; local %x; no strict; do_nothing($x{a}); () <+fetch> [return] ok 2349 - our %x; local %x; no strict; do_nothing($x{a}); () <+fetch> [variable] ok 2350 - my $x; do_nothing($x->{a}); () <+exists> [exception] ok 2351 - my $x; do_nothing($x->{a}); () <+exists> [return] ok 2352 - my $x; do_nothing($x->{a}); () <+exists> [variable] ok 2353 - our $x; local $x; use strict; do_nothing($x->{a}); () <+exists> [exception] ok 2354 - our $x; local $x; use strict; do_nothing($x->{a}); () <+exists> [return] ok 2355 - our $x; local $x; use strict; do_nothing($x->{a}); () <+exists> [variable] ok 2356 - our $x; local $x; no strict; do_nothing($x->{a}); () <+exists> [exception] ok 2357 - our $x; local $x; no strict; do_nothing($x->{a}); () <+exists> [return] ok 2358 - our $x; local $x; no strict; do_nothing($x->{a}); () <+exists> [variable] ok 2359 - my $x; do_nothing($$x{a}); () <+exists> [exception] ok 2360 - my $x; do_nothing($$x{a}); () <+exists> [return] ok 2361 - my $x; do_nothing($$x{a}); () <+exists> [variable] ok 2362 - our $x; local $x; use strict; do_nothing($$x{a}); () <+exists> [exception] ok 2363 - our $x; local $x; use strict; do_nothing($$x{a}); () <+exists> [return] ok 2364 - our $x; local $x; use strict; do_nothing($$x{a}); () <+exists> [variable] ok 2365 - our $x; local $x; no strict; do_nothing($$x{a}); () <+exists> [exception] ok 2366 - our $x; local $x; no strict; do_nothing($$x{a}); () <+exists> [return] ok 2367 - our $x; local $x; no strict; do_nothing($$x{a}); () <+exists> [variable] ok 2368 - my %x; do_nothing($x{a}); () <+exists> [exception] ok 2369 - my %x; do_nothing($x{a}); () <+exists> [return] ok 2370 - my %x; do_nothing($x{a}); () <+exists> [variable] ok 2371 - our %x; local %x; use strict; do_nothing($x{a}); () <+exists> [exception] ok 2372 - our %x; local %x; use strict; do_nothing($x{a}); () <+exists> [return] ok 2373 - our %x; local %x; use strict; do_nothing($x{a}); () <+exists> [variable] ok 2374 - our %x; local %x; no strict; do_nothing($x{a}); () <+exists> [exception] ok 2375 - our %x; local %x; no strict; do_nothing($x{a}); () <+exists> [return] ok 2376 - our %x; local %x; no strict; do_nothing($x{a}); () <+exists> [variable] ok 2377 - my $x; do_nothing($x->{a}); () <+delete> [exception] ok 2378 - my $x; do_nothing($x->{a}); () <+delete> [return] ok 2379 - my $x; do_nothing($x->{a}); () <+delete> [variable] ok 2380 - our $x; local $x; use strict; do_nothing($x->{a}); () <+delete> [exception] ok 2381 - our $x; local $x; use strict; do_nothing($x->{a}); () <+delete> [return] ok 2382 - our $x; local $x; use strict; do_nothing($x->{a}); () <+delete> [variable] ok 2383 - our $x; local $x; no strict; do_nothing($x->{a}); () <+delete> [exception] ok 2384 - our $x; local $x; no strict; do_nothing($x->{a}); () <+delete> [return] ok 2385 - our $x; local $x; no strict; do_nothing($x->{a}); () <+delete> [variable] ok 2386 - my $x; do_nothing($$x{a}); () <+delete> [exception] ok 2387 - my $x; do_nothing($$x{a}); () <+delete> [return] ok 2388 - my $x; do_nothing($$x{a}); () <+delete> [variable] ok 2389 - our $x; local $x; use strict; do_nothing($$x{a}); () <+delete> [exception] ok 2390 - our $x; local $x; use strict; do_nothing($$x{a}); () <+delete> [return] ok 2391 - our $x; local $x; use strict; do_nothing($$x{a}); () <+delete> [variable] ok 2392 - our $x; local $x; no strict; do_nothing($$x{a}); () <+delete> [exception] ok 2393 - our $x; local $x; no strict; do_nothing($$x{a}); () <+delete> [return] ok 2394 - our $x; local $x; no strict; do_nothing($$x{a}); () <+delete> [variable] ok 2395 - my %x; do_nothing($x{a}); () <+delete> [exception] ok 2396 - my %x; do_nothing($x{a}); () <+delete> [return] ok 2397 - my %x; do_nothing($x{a}); () <+delete> [variable] ok 2398 - our %x; local %x; use strict; do_nothing($x{a}); () <+delete> [exception] ok 2399 - our %x; local %x; use strict; do_nothing($x{a}); () <+delete> [return] ok 2400 - our %x; local %x; use strict; do_nothing($x{a}); () <+delete> [variable] ok 2401 - our %x; local %x; no strict; do_nothing($x{a}); () <+delete> [exception] ok 2402 - our %x; local %x; no strict; do_nothing($x{a}); () <+delete> [return] ok 2403 - our %x; local %x; no strict; do_nothing($x{a}); () <+delete> [variable] ok 2404 - my $x; do_nothing($x->{a}); () <+store> [exception] ok 2405 - my $x; do_nothing($x->{a}); () <+store> [return] ok 2406 - my $x; do_nothing($x->{a}); () <+store> [variable] ok 2407 - our $x; local $x; use strict; do_nothing($x->{a}); () <+store> [exception] ok 2408 - our $x; local $x; use strict; do_nothing($x->{a}); () <+store> [return] ok 2409 - our $x; local $x; use strict; do_nothing($x->{a}); () <+store> [variable] ok 2410 - our $x; local $x; no strict; do_nothing($x->{a}); () <+store> [exception] ok 2411 - our $x; local $x; no strict; do_nothing($x->{a}); () <+store> [return] ok 2412 - our $x; local $x; no strict; do_nothing($x->{a}); () <+store> [variable] ok 2413 - my $x; do_nothing($$x{a}); () <+store> [exception] ok 2414 - my $x; do_nothing($$x{a}); () <+store> [return] ok 2415 - my $x; do_nothing($$x{a}); () <+store> [variable] ok 2416 - our $x; local $x; use strict; do_nothing($$x{a}); () <+store> [exception] ok 2417 - our $x; local $x; use strict; do_nothing($$x{a}); () <+store> [return] ok 2418 - our $x; local $x; use strict; do_nothing($$x{a}); () <+store> [variable] ok 2419 - our $x; local $x; no strict; do_nothing($$x{a}); () <+store> [exception] ok 2420 - our $x; local $x; no strict; do_nothing($$x{a}); () <+store> [return] ok 2421 - our $x; local $x; no strict; do_nothing($$x{a}); () <+store> [variable] ok 2422 - my %x; 1 <+store> [exception] ok 2423 - my %x; 1 <+store> [return] ok 2424 - my %x; 1 <+store> [variable] ok 2425 - our %x; local %x; use strict; 1 <+store> [exception] ok 2426 - our %x; local %x; use strict; 1 <+store> [return] ok 2427 - our %x; local %x; use strict; 1 <+store> [variable] ok 2428 - our %x; local %x; no strict; 1 <+store> [exception] ok 2429 - our %x; local %x; no strict; 1 <+store> [return] ok 2430 - our %x; local %x; no strict; 1 <+store> [variable] ok 2431 - my $x; set_arg($x->{a}); () [exception] ok 2432 - my $x; set_arg($x->{a}); () [return] ok 2433 - my $x; set_arg($x->{a}); () [variable] ok 2434 - our $x; local $x; use strict; set_arg($x->{a}); () [exception] ok 2435 - our $x; local $x; use strict; set_arg($x->{a}); () [return] ok 2436 - our $x; local $x; use strict; set_arg($x->{a}); () [variable] ok 2437 - our $x; local $x; no strict; set_arg($x->{a}); () [exception] ok 2438 - our $x; local $x; no strict; set_arg($x->{a}); () [return] ok 2439 - our $x; local $x; no strict; set_arg($x->{a}); () [variable] ok 2440 - my $x; set_arg($$x{a}); () [exception] ok 2441 - my $x; set_arg($$x{a}); () [return] ok 2442 - my $x; set_arg($$x{a}); () [variable] ok 2443 - our $x; local $x; use strict; set_arg($$x{a}); () [exception] ok 2444 - our $x; local $x; use strict; set_arg($$x{a}); () [return] ok 2445 - our $x; local $x; use strict; set_arg($$x{a}); () [variable] ok 2446 - our $x; local $x; no strict; set_arg($$x{a}); () [exception] ok 2447 - our $x; local $x; no strict; set_arg($$x{a}); () [return] ok 2448 - our $x; local $x; no strict; set_arg($$x{a}); () [variable] ok 2449 - my %x; set_arg($x{a}); () [exception] ok 2450 - my %x; set_arg($x{a}); () [return] ok 2451 - my %x; set_arg($x{a}); () [variable] ok 2452 - our %x; local %x; use strict; set_arg($x{a}); () [exception] ok 2453 - our %x; local %x; use strict; set_arg($x{a}); () [return] ok 2454 - our %x; local %x; use strict; set_arg($x{a}); () [variable] ok 2455 - our %x; local %x; no strict; set_arg($x{a}); () [exception] ok 2456 - our %x; local %x; no strict; set_arg($x{a}); () [return] ok 2457 - our %x; local %x; no strict; set_arg($x{a}); () [variable] ok 2458 - my $x; set_arg($x->{a}); () [exception] ok 2459 - my $x; set_arg($x->{a}); () [return] ok 2460 - my $x; set_arg($x->{a}); () [variable] ok 2461 - our $x; local $x; use strict; set_arg($x->{a}); () [exception] ok 2462 - our $x; local $x; use strict; set_arg($x->{a}); () [return] ok 2463 - our $x; local $x; use strict; set_arg($x->{a}); () [variable] ok 2464 - our $x; local $x; no strict; set_arg($x->{a}); () [exception] ok 2465 - our $x; local $x; no strict; set_arg($x->{a}); () [return] ok 2466 - our $x; local $x; no strict; set_arg($x->{a}); () [variable] ok 2467 - my $x; set_arg($$x{a}); () [exception] ok 2468 - my $x; set_arg($$x{a}); () [return] ok 2469 - my $x; set_arg($$x{a}); () [variable] ok 2470 - our $x; local $x; use strict; set_arg($$x{a}); () [exception] ok 2471 - our $x; local $x; use strict; set_arg($$x{a}); () [return] ok 2472 - our $x; local $x; use strict; set_arg($$x{a}); () [variable] ok 2473 - our $x; local $x; no strict; set_arg($$x{a}); () [exception] ok 2474 - our $x; local $x; no strict; set_arg($$x{a}); () [return] ok 2475 - our $x; local $x; no strict; set_arg($$x{a}); () [variable] ok 2476 - my %x; set_arg($x{a}); () [exception] ok 2477 - my %x; set_arg($x{a}); () [return] ok 2478 - my %x; set_arg($x{a}); () [variable] ok 2479 - our %x; local %x; use strict; set_arg($x{a}); () [exception] ok 2480 - our %x; local %x; use strict; set_arg($x{a}); () [return] ok 2481 - our %x; local %x; use strict; set_arg($x{a}); () [variable] ok 2482 - our %x; local %x; no strict; set_arg($x{a}); () [exception] ok 2483 - our %x; local %x; no strict; set_arg($x{a}); () [return] ok 2484 - our %x; local %x; no strict; set_arg($x{a}); () [variable] ok 2485 - my $x; set_arg($x->{a}); () <+fetch> [exception] ok 2486 - my $x; set_arg($x->{a}); () <+fetch> [return] ok 2487 - my $x; set_arg($x->{a}); () <+fetch> [variable] ok 2488 - our $x; local $x; use strict; set_arg($x->{a}); () <+fetch> [exception] ok 2489 - our $x; local $x; use strict; set_arg($x->{a}); () <+fetch> [return] ok 2490 - our $x; local $x; use strict; set_arg($x->{a}); () <+fetch> [variable] ok 2491 - our $x; local $x; no strict; set_arg($x->{a}); () <+fetch> [exception] ok 2492 - our $x; local $x; no strict; set_arg($x->{a}); () <+fetch> [return] ok 2493 - our $x; local $x; no strict; set_arg($x->{a}); () <+fetch> [variable] ok 2494 - my $x; set_arg($$x{a}); () <+fetch> [exception] ok 2495 - my $x; set_arg($$x{a}); () <+fetch> [return] ok 2496 - my $x; set_arg($$x{a}); () <+fetch> [variable] ok 2497 - our $x; local $x; use strict; set_arg($$x{a}); () <+fetch> [exception] ok 2498 - our $x; local $x; use strict; set_arg($$x{a}); () <+fetch> [return] ok 2499 - our $x; local $x; use strict; set_arg($$x{a}); () <+fetch> [variable] ok 2500 - our $x; local $x; no strict; set_arg($$x{a}); () <+fetch> [exception] ok 2501 - our $x; local $x; no strict; set_arg($$x{a}); () <+fetch> [return] ok 2502 - our $x; local $x; no strict; set_arg($$x{a}); () <+fetch> [variable] ok 2503 - my %x; set_arg($x{a}); () <+fetch> [exception] ok 2504 - my %x; set_arg($x{a}); () <+fetch> [return] ok 2505 - my %x; set_arg($x{a}); () <+fetch> [variable] ok 2506 - our %x; local %x; use strict; set_arg($x{a}); () <+fetch> [exception] ok 2507 - our %x; local %x; use strict; set_arg($x{a}); () <+fetch> [return] ok 2508 - our %x; local %x; use strict; set_arg($x{a}); () <+fetch> [variable] ok 2509 - our %x; local %x; no strict; set_arg($x{a}); () <+fetch> [exception] ok 2510 - our %x; local %x; no strict; set_arg($x{a}); () <+fetch> [return] ok 2511 - our %x; local %x; no strict; set_arg($x{a}); () <+fetch> [variable] ok 2512 - my $x; set_arg($x->{a}); () <+exists> [exception] ok 2513 - my $x; set_arg($x->{a}); () <+exists> [return] ok 2514 - my $x; set_arg($x->{a}); () <+exists> [variable] ok 2515 - our $x; local $x; use strict; set_arg($x->{a}); () <+exists> [exception] ok 2516 - our $x; local $x; use strict; set_arg($x->{a}); () <+exists> [return] ok 2517 - our $x; local $x; use strict; set_arg($x->{a}); () <+exists> [variable] ok 2518 - our $x; local $x; no strict; set_arg($x->{a}); () <+exists> [exception] ok 2519 - our $x; local $x; no strict; set_arg($x->{a}); () <+exists> [return] ok 2520 - our $x; local $x; no strict; set_arg($x->{a}); () <+exists> [variable] ok 2521 - my $x; set_arg($$x{a}); () <+exists> [exception] ok 2522 - my $x; set_arg($$x{a}); () <+exists> [return] ok 2523 - my $x; set_arg($$x{a}); () <+exists> [variable] ok 2524 - our $x; local $x; use strict; set_arg($$x{a}); () <+exists> [exception] ok 2525 - our $x; local $x; use strict; set_arg($$x{a}); () <+exists> [return] ok 2526 - our $x; local $x; use strict; set_arg($$x{a}); () <+exists> [variable] ok 2527 - our $x; local $x; no strict; set_arg($$x{a}); () <+exists> [exception] ok 2528 - our $x; local $x; no strict; set_arg($$x{a}); () <+exists> [return] ok 2529 - our $x; local $x; no strict; set_arg($$x{a}); () <+exists> [variable] ok 2530 - my %x; set_arg($x{a}); () <+exists> [exception] ok 2531 - my %x; set_arg($x{a}); () <+exists> [return] ok 2532 - my %x; set_arg($x{a}); () <+exists> [variable] ok 2533 - our %x; local %x; use strict; set_arg($x{a}); () <+exists> [exception] ok 2534 - our %x; local %x; use strict; set_arg($x{a}); () <+exists> [return] ok 2535 - our %x; local %x; use strict; set_arg($x{a}); () <+exists> [variable] ok 2536 - our %x; local %x; no strict; set_arg($x{a}); () <+exists> [exception] ok 2537 - our %x; local %x; no strict; set_arg($x{a}); () <+exists> [return] ok 2538 - our %x; local %x; no strict; set_arg($x{a}); () <+exists> [variable] ok 2539 - my $x; set_arg($x->{a}); () <+delete> [exception] ok 2540 - my $x; set_arg($x->{a}); () <+delete> [return] ok 2541 - my $x; set_arg($x->{a}); () <+delete> [variable] ok 2542 - our $x; local $x; use strict; set_arg($x->{a}); () <+delete> [exception] ok 2543 - our $x; local $x; use strict; set_arg($x->{a}); () <+delete> [return] ok 2544 - our $x; local $x; use strict; set_arg($x->{a}); () <+delete> [variable] ok 2545 - our $x; local $x; no strict; set_arg($x->{a}); () <+delete> [exception] ok 2546 - our $x; local $x; no strict; set_arg($x->{a}); () <+delete> [return] ok 2547 - our $x; local $x; no strict; set_arg($x->{a}); () <+delete> [variable] ok 2548 - my $x; set_arg($$x{a}); () <+delete> [exception] ok 2549 - my $x; set_arg($$x{a}); () <+delete> [return] ok 2550 - my $x; set_arg($$x{a}); () <+delete> [variable] ok 2551 - our $x; local $x; use strict; set_arg($$x{a}); () <+delete> [exception] ok 2552 - our $x; local $x; use strict; set_arg($$x{a}); () <+delete> [return] ok 2553 - our $x; local $x; use strict; set_arg($$x{a}); () <+delete> [variable] ok 2554 - our $x; local $x; no strict; set_arg($$x{a}); () <+delete> [exception] ok 2555 - our $x; local $x; no strict; set_arg($$x{a}); () <+delete> [return] ok 2556 - our $x; local $x; no strict; set_arg($$x{a}); () <+delete> [variable] ok 2557 - my %x; set_arg($x{a}); () <+delete> [exception] ok 2558 - my %x; set_arg($x{a}); () <+delete> [return] ok 2559 - my %x; set_arg($x{a}); () <+delete> [variable] ok 2560 - our %x; local %x; use strict; set_arg($x{a}); () <+delete> [exception] ok 2561 - our %x; local %x; use strict; set_arg($x{a}); () <+delete> [return] ok 2562 - our %x; local %x; use strict; set_arg($x{a}); () <+delete> [variable] ok 2563 - our %x; local %x; no strict; set_arg($x{a}); () <+delete> [exception] ok 2564 - our %x; local %x; no strict; set_arg($x{a}); () <+delete> [return] ok 2565 - our %x; local %x; no strict; set_arg($x{a}); () <+delete> [variable] ok 2566 - my $x; set_arg($x->{a}); () <+store> [exception] ok 2567 - my $x; set_arg($x->{a}); () <+store> [return] ok 2568 - my $x; set_arg($x->{a}); () <+store> [variable] ok 2569 - our $x; local $x; use strict; set_arg($x->{a}); () <+store> [exception] ok 2570 - our $x; local $x; use strict; set_arg($x->{a}); () <+store> [return] ok 2571 - our $x; local $x; use strict; set_arg($x->{a}); () <+store> [variable] ok 2572 - our $x; local $x; no strict; set_arg($x->{a}); () <+store> [exception] ok 2573 - our $x; local $x; no strict; set_arg($x->{a}); () <+store> [return] ok 2574 - our $x; local $x; no strict; set_arg($x->{a}); () <+store> [variable] ok 2575 - my $x; set_arg($$x{a}); () <+store> [exception] ok 2576 - my $x; set_arg($$x{a}); () <+store> [return] ok 2577 - my $x; set_arg($$x{a}); () <+store> [variable] ok 2578 - our $x; local $x; use strict; set_arg($$x{a}); () <+store> [exception] ok 2579 - our $x; local $x; use strict; set_arg($$x{a}); () <+store> [return] ok 2580 - our $x; local $x; use strict; set_arg($$x{a}); () <+store> [variable] ok 2581 - our $x; local $x; no strict; set_arg($$x{a}); () <+store> [exception] ok 2582 - our $x; local $x; no strict; set_arg($$x{a}); () <+store> [return] ok 2583 - our $x; local $x; no strict; set_arg($$x{a}); () <+store> [variable] ok 2584 - my %x; 1 <+store> [exception] ok 2585 - my %x; 1 <+store> [return] ok 2586 - my %x; 1 <+store> [variable] ok 2587 - our %x; local %x; use strict; 1 <+store> [exception] ok 2588 - our %x; local %x; use strict; 1 <+store> [return] ok 2589 - our %x; local %x; use strict; 1 <+store> [variable] ok 2590 - our %x; local %x; no strict; 1 <+store> [exception] ok 2591 - our %x; local %x; no strict; 1 <+store> [return] ok 2592 - our %x; local %x; no strict; 1 <+store> [variable] ok 2593 - my $x; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2594 - my $x; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2595 - my $x; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2596 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2597 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2598 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2599 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2600 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2601 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2602 - my $x; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2603 - my $x; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2604 - my $x; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2605 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2606 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2607 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2608 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2609 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2610 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2611 - my %x; 1 [exception] ok 2612 - my %x; 1 [return] ok 2613 - my %x; 1 [variable] ok 2614 - our %x; local %x; use strict; 1 [exception] ok 2615 - our %x; local %x; use strict; 1 [return] ok 2616 - our %x; local %x; use strict; 1 [variable] ok 2617 - our %x; local %x; no strict; 1 [exception] ok 2618 - our %x; local %x; no strict; 1 [return] ok 2619 - our %x; local %x; no strict; 1 [variable] ok 2620 - my $x; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2621 - my $x; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2622 - my $x; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2623 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2624 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2625 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2626 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2627 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2628 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2629 - my $x; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2630 - my $x; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2631 - my $x; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2632 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2633 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2634 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2635 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2636 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2637 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2638 - my %x; 1 [exception] ok 2639 - my %x; 1 [return] ok 2640 - my %x; 1 [variable] ok 2641 - our %x; local %x; use strict; 1 [exception] ok 2642 - our %x; local %x; use strict; 1 [return] ok 2643 - our %x; local %x; use strict; 1 [variable] ok 2644 - our %x; local %x; no strict; 1 [exception] ok 2645 - our %x; local %x; no strict; 1 [return] ok 2646 - our %x; local %x; no strict; 1 [variable] ok 2647 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [exception] ok 2648 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [return] ok 2649 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [variable] ok 2650 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [exception] ok 2651 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [return] ok 2652 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [variable] ok 2653 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [exception] ok 2654 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [return] ok 2655 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [variable] ok 2656 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [exception] ok 2657 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [return] ok 2658 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [variable] ok 2659 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [exception] ok 2660 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [return] ok 2661 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [variable] ok 2662 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [exception] ok 2663 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [return] ok 2664 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [variable] ok 2665 - my %x; 1 <+fetch> [exception] ok 2666 - my %x; 1 <+fetch> [return] ok 2667 - my %x; 1 <+fetch> [variable] ok 2668 - our %x; local %x; use strict; 1 <+fetch> [exception] ok 2669 - our %x; local %x; use strict; 1 <+fetch> [return] ok 2670 - our %x; local %x; use strict; 1 <+fetch> [variable] ok 2671 - our %x; local %x; no strict; 1 <+fetch> [exception] ok 2672 - our %x; local %x; no strict; 1 <+fetch> [return] ok 2673 - our %x; local %x; no strict; 1 <+fetch> [variable] ok 2674 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+exists> [exception] ok 2675 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+exists> [return] ok 2676 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+exists> [variable] ok 2677 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [exception] ok 2678 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [return] ok 2679 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [variable] ok 2680 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [exception] ok 2681 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [return] ok 2682 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [variable] ok 2683 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+exists> [exception] ok 2684 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+exists> [return] ok 2685 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+exists> [variable] ok 2686 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [exception] ok 2687 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [return] ok 2688 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [variable] ok 2689 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [exception] ok 2690 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [return] ok 2691 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [variable] ok 2692 - my %x; 1 <+exists> [exception] ok 2693 - my %x; 1 <+exists> [return] ok 2694 - my %x; 1 <+exists> [variable] ok 2695 - our %x; local %x; use strict; 1 <+exists> [exception] ok 2696 - our %x; local %x; use strict; 1 <+exists> [return] ok 2697 - our %x; local %x; use strict; 1 <+exists> [variable] ok 2698 - our %x; local %x; no strict; 1 <+exists> [exception] ok 2699 - our %x; local %x; no strict; 1 <+exists> [return] ok 2700 - our %x; local %x; no strict; 1 <+exists> [variable] ok 2701 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+delete> [exception] ok 2702 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+delete> [return] ok 2703 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+delete> [variable] ok 2704 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [exception] ok 2705 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [return] ok 2706 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [variable] ok 2707 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [exception] ok 2708 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [return] ok 2709 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [variable] ok 2710 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+delete> [exception] ok 2711 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+delete> [return] ok 2712 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+delete> [variable] ok 2713 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [exception] ok 2714 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [return] ok 2715 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [variable] ok 2716 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [exception] ok 2717 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [return] ok 2718 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [variable] ok 2719 - my %x; 1 <+delete> [exception] ok 2720 - my %x; 1 <+delete> [return] ok 2721 - my %x; 1 <+delete> [variable] ok 2722 - our %x; local %x; use strict; 1 <+delete> [exception] ok 2723 - our %x; local %x; use strict; 1 <+delete> [return] ok 2724 - our %x; local %x; use strict; 1 <+delete> [variable] ok 2725 - our %x; local %x; no strict; 1 <+delete> [exception] ok 2726 - our %x; local %x; no strict; 1 <+delete> [return] ok 2727 - our %x; local %x; no strict; 1 <+delete> [variable] ok 2728 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+store> [exception] ok 2729 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+store> [return] ok 2730 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+store> [variable] ok 2731 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [exception] ok 2732 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [return] ok 2733 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [variable] ok 2734 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [exception] ok 2735 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [return] ok 2736 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [variable] ok 2737 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+store> [exception] ok 2738 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+store> [return] ok 2739 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+store> [variable] ok 2740 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [exception] ok 2741 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [return] ok 2742 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [variable] ok 2743 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [exception] ok 2744 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [return] ok 2745 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [variable] ok 2746 - my %x; 1 <+store> [exception] ok 2747 - my %x; 1 <+store> [return] ok 2748 - my %x; 1 <+store> [variable] ok 2749 - our %x; local %x; use strict; 1 <+store> [exception] ok 2750 - our %x; local %x; use strict; 1 <+store> [return] ok 2751 - our %x; local %x; use strict; 1 <+store> [variable] ok 2752 - our %x; local %x; no strict; 1 <+store> [exception] ok 2753 - our %x; local %x; no strict; 1 <+store> [return] ok 2754 - our %x; local %x; no strict; 1 <+store> [variable] ok 2755 - my $x; $x->{a} = 1; my @a = %$x; () <+fetch> [exception] ok 2756 - my $x; $x->{a} = 1; my @a = %$x; () <+fetch> [return] ok 2757 - my $x; $x->{a} = 1; my @a = %$x; () <+fetch> [variable] ok 2758 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+fetch> [exception] ok 2759 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+fetch> [return] ok 2760 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+fetch> [variable] ok 2761 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+fetch> [exception] ok 2762 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+fetch> [return] ok 2763 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+fetch> [variable] ok 2764 - my $x; $x->{a} = 1; my @a = %$x; () <+fetch> [exception] ok 2765 - my $x; $x->{a} = 1; my @a = %$x; () <+fetch> [return] ok 2766 - my $x; $x->{a} = 1; my @a = %$x; () <+fetch> [variable] ok 2767 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+fetch> [exception] ok 2768 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+fetch> [return] ok 2769 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+fetch> [variable] ok 2770 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+fetch> [exception] ok 2771 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+fetch> [return] ok 2772 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+fetch> [variable] ok 2773 - my %x; $x{a} = 1; my @a = %x; () <+fetch> [exception] ok 2774 - my %x; $x{a} = 1; my @a = %x; () <+fetch> [return] ok 2775 - my %x; $x{a} = 1; my @a = %x; () <+fetch> [variable] ok 2776 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+fetch> [exception] ok 2777 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+fetch> [return] ok 2778 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+fetch> [variable] ok 2779 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+fetch> [exception] ok 2780 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+fetch> [return] ok 2781 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+fetch> [variable] ok 2782 - my $x; $x->{a} = 1; my @a = %$x; () <+exists> [exception] ok 2783 - my $x; $x->{a} = 1; my @a = %$x; () <+exists> [return] ok 2784 - my $x; $x->{a} = 1; my @a = %$x; () <+exists> [variable] ok 2785 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+exists> [exception] ok 2786 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+exists> [return] ok 2787 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+exists> [variable] ok 2788 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+exists> [exception] ok 2789 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+exists> [return] ok 2790 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+exists> [variable] ok 2791 - my $x; $x->{a} = 1; my @a = %$x; () <+exists> [exception] ok 2792 - my $x; $x->{a} = 1; my @a = %$x; () <+exists> [return] ok 2793 - my $x; $x->{a} = 1; my @a = %$x; () <+exists> [variable] ok 2794 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+exists> [exception] ok 2795 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+exists> [return] ok 2796 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+exists> [variable] ok 2797 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+exists> [exception] ok 2798 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+exists> [return] ok 2799 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+exists> [variable] ok 2800 - my %x; $x{a} = 1; my @a = %x; () <+exists> [exception] ok 2801 - my %x; $x{a} = 1; my @a = %x; () <+exists> [return] ok 2802 - my %x; $x{a} = 1; my @a = %x; () <+exists> [variable] ok 2803 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+exists> [exception] ok 2804 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+exists> [return] ok 2805 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+exists> [variable] ok 2806 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+exists> [exception] ok 2807 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+exists> [return] ok 2808 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+exists> [variable] ok 2809 - my $x; $x->{a} = 1; my @a = %$x; () <+delete> [exception] ok 2810 - my $x; $x->{a} = 1; my @a = %$x; () <+delete> [return] ok 2811 - my $x; $x->{a} = 1; my @a = %$x; () <+delete> [variable] ok 2812 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+delete> [exception] ok 2813 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+delete> [return] ok 2814 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+delete> [variable] ok 2815 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+delete> [exception] ok 2816 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+delete> [return] ok 2817 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+delete> [variable] ok 2818 - my $x; $x->{a} = 1; my @a = %$x; () <+delete> [exception] ok 2819 - my $x; $x->{a} = 1; my @a = %$x; () <+delete> [return] ok 2820 - my $x; $x->{a} = 1; my @a = %$x; () <+delete> [variable] ok 2821 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+delete> [exception] ok 2822 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+delete> [return] ok 2823 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+delete> [variable] ok 2824 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+delete> [exception] ok 2825 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+delete> [return] ok 2826 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+delete> [variable] ok 2827 - my %x; $x{a} = 1; my @a = %x; () <+delete> [exception] ok 2828 - my %x; $x{a} = 1; my @a = %x; () <+delete> [return] ok 2829 - my %x; $x{a} = 1; my @a = %x; () <+delete> [variable] ok 2830 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+delete> [exception] ok 2831 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+delete> [return] ok 2832 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+delete> [variable] ok 2833 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+delete> [exception] ok 2834 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+delete> [return] ok 2835 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+delete> [variable] ok 2836 - my $x; $x->{a} = 1; my @a = %$x; () <+store> [exception] ok 2837 - my $x; $x->{a} = 1; my @a = %$x; () <+store> [return] ok 2838 - my $x; $x->{a} = 1; my @a = %$x; () <+store> [variable] ok 2839 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+store> [exception] ok 2840 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+store> [return] ok 2841 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+store> [variable] ok 2842 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+store> [exception] ok 2843 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+store> [return] ok 2844 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+store> [variable] ok 2845 - my $x; $x->{a} = 1; my @a = %$x; () <+store> [exception] ok 2846 - my $x; $x->{a} = 1; my @a = %$x; () <+store> [return] ok 2847 - my $x; $x->{a} = 1; my @a = %$x; () <+store> [variable] ok 2848 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+store> [exception] ok 2849 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+store> [return] ok 2850 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+store> [variable] ok 2851 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+store> [exception] ok 2852 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+store> [return] ok 2853 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+store> [variable] ok 2854 - my %x; $x{a} = 1; my @a = %x; () <+store> [exception] ok 2855 - my %x; $x{a} = 1; my @a = %x; () <+store> [return] ok 2856 - my %x; $x{a} = 1; my @a = %x; () <+store> [variable] ok 2857 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+store> [exception] ok 2858 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+store> [return] ok 2859 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+store> [variable] ok 2860 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+store> [exception] ok 2861 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+store> [return] ok 2862 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+store> [variable] ok 2863 - my $x; my @a = @$x{'a', 'b'}; \@a [exception] ok 2864 - my $x; my @a = @$x{'a', 'b'}; \@a [return] ok 2865 - my $x; my @a = @$x{'a', 'b'}; \@a [variable] ok 2866 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2867 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2868 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2869 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2870 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2871 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2872 - my $x; my @a = @$x{'a', 'b'}; \@a [exception] ok 2873 - my $x; my @a = @$x{'a', 'b'}; \@a [return] ok 2874 - my $x; my @a = @$x{'a', 'b'}; \@a [variable] ok 2875 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2876 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2877 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2878 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2879 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2880 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2881 - my %x; my @a = @x{'a', 'b'}; \@a [exception] ok 2882 - my %x; my @a = @x{'a', 'b'}; \@a [return] ok 2883 - my %x; my @a = @x{'a', 'b'}; \@a [variable] ok 2884 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a [exception] ok 2885 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a [return] ok 2886 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a [variable] ok 2887 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a [exception] ok 2888 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a [return] ok 2889 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a [variable] ok 2890 - my $x; my @a = @$x{'a', 'b'}; \@a [exception] ok 2891 - my $x; my @a = @$x{'a', 'b'}; \@a [return] ok 2892 - my $x; my @a = @$x{'a', 'b'}; \@a [variable] ok 2893 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2894 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2895 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2896 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2897 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2898 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2899 - my $x; my @a = @$x{'a', 'b'}; \@a [exception] ok 2900 - my $x; my @a = @$x{'a', 'b'}; \@a [return] ok 2901 - my $x; my @a = @$x{'a', 'b'}; \@a [variable] ok 2902 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2903 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2904 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2905 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2906 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2907 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2908 - my %x; my @a = @x{'a', 'b'}; \@a [exception] ok 2909 - my %x; my @a = @x{'a', 'b'}; \@a [return] ok 2910 - my %x; my @a = @x{'a', 'b'}; \@a [variable] ok 2911 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a [exception] ok 2912 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a [return] ok 2913 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a [variable] ok 2914 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a [exception] ok 2915 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a [return] ok 2916 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a [variable] ok 2917 - my $x; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 2918 - my $x; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 2919 - my $x; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 2920 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 2921 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 2922 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 2923 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 2924 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 2925 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 2926 - my $x; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 2927 - my $x; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 2928 - my $x; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 2929 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 2930 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 2931 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 2932 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 2933 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 2934 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 2935 - my %x; my @a = @x{'a', 'b'}; \@a <+fetch> [exception] ok 2936 - my %x; my @a = @x{'a', 'b'}; \@a <+fetch> [return] ok 2937 - my %x; my @a = @x{'a', 'b'}; \@a <+fetch> [variable] ok 2938 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+fetch> [exception] ok 2939 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+fetch> [return] ok 2940 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+fetch> [variable] ok 2941 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+fetch> [exception] ok 2942 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+fetch> [return] ok 2943 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+fetch> [variable] ok 2944 - my $x; my @a = @$x{'a', 'b'}; \@a <+exists> [exception] ok 2945 - my $x; my @a = @$x{'a', 'b'}; \@a <+exists> [return] ok 2946 - my $x; my @a = @$x{'a', 'b'}; \@a <+exists> [variable] ok 2947 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+exists> [exception] ok 2948 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+exists> [return] ok 2949 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+exists> [variable] ok 2950 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+exists> [exception] ok 2951 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+exists> [return] ok 2952 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+exists> [variable] ok 2953 - my $x; my @a = @$x{'a', 'b'}; \@a <+exists> [exception] ok 2954 - my $x; my @a = @$x{'a', 'b'}; \@a <+exists> [return] ok 2955 - my $x; my @a = @$x{'a', 'b'}; \@a <+exists> [variable] ok 2956 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+exists> [exception] ok 2957 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+exists> [return] ok 2958 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+exists> [variable] ok 2959 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+exists> [exception] ok 2960 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+exists> [return] ok 2961 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+exists> [variable] ok 2962 - my %x; my @a = @x{'a', 'b'}; \@a <+exists> [exception] ok 2963 - my %x; my @a = @x{'a', 'b'}; \@a <+exists> [return] ok 2964 - my %x; my @a = @x{'a', 'b'}; \@a <+exists> [variable] ok 2965 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+exists> [exception] ok 2966 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+exists> [return] ok 2967 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+exists> [variable] ok 2968 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+exists> [exception] ok 2969 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+exists> [return] ok 2970 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+exists> [variable] ok 2971 - my $x; my @a = @$x{'a', 'b'}; \@a <+delete> [exception] ok 2972 - my $x; my @a = @$x{'a', 'b'}; \@a <+delete> [return] ok 2973 - my $x; my @a = @$x{'a', 'b'}; \@a <+delete> [variable] ok 2974 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+delete> [exception] ok 2975 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+delete> [return] ok 2976 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+delete> [variable] ok 2977 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+delete> [exception] ok 2978 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+delete> [return] ok 2979 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+delete> [variable] ok 2980 - my $x; my @a = @$x{'a', 'b'}; \@a <+delete> [exception] ok 2981 - my $x; my @a = @$x{'a', 'b'}; \@a <+delete> [return] ok 2982 - my $x; my @a = @$x{'a', 'b'}; \@a <+delete> [variable] ok 2983 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+delete> [exception] ok 2984 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+delete> [return] ok 2985 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+delete> [variable] ok 2986 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+delete> [exception] ok 2987 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+delete> [return] ok 2988 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+delete> [variable] ok 2989 - my %x; my @a = @x{'a', 'b'}; \@a <+delete> [exception] ok 2990 - my %x; my @a = @x{'a', 'b'}; \@a <+delete> [return] ok 2991 - my %x; my @a = @x{'a', 'b'}; \@a <+delete> [variable] ok 2992 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+delete> [exception] ok 2993 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+delete> [return] ok 2994 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+delete> [variable] ok 2995 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+delete> [exception] ok 2996 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+delete> [return] ok 2997 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+delete> [variable] ok 2998 - my $x; my @a = @$x{'a', 'b'}; \@a <+store> [exception] ok 2999 - my $x; my @a = @$x{'a', 'b'}; \@a <+store> [return] ok 3000 - my $x; my @a = @$x{'a', 'b'}; \@a <+store> [variable] ok 3001 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+store> [exception] ok 3002 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+store> [return] ok 3003 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+store> [variable] ok 3004 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+store> [exception] ok 3005 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+store> [return] ok 3006 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+store> [variable] ok 3007 - my $x; my @a = @$x{'a', 'b'}; \@a <+store> [exception] ok 3008 - my $x; my @a = @$x{'a', 'b'}; \@a <+store> [return] ok 3009 - my $x; my @a = @$x{'a', 'b'}; \@a <+store> [variable] ok 3010 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+store> [exception] ok 3011 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+store> [return] ok 3012 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+store> [variable] ok 3013 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+store> [exception] ok 3014 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+store> [return] ok 3015 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+store> [variable] ok 3016 - my %x; my @a = @x{'a', 'b'}; \@a <+store> [exception] ok 3017 - my %x; my @a = @x{'a', 'b'}; \@a <+store> [return] ok 3018 - my %x; my @a = @x{'a', 'b'}; \@a <+store> [variable] ok 3019 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+store> [exception] ok 3020 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+store> [return] ok 3021 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+store> [variable] ok 3022 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+store> [exception] ok 3023 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+store> [return] ok 3024 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+store> [variable] ok 3025 - my $x; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 3026 - my $x; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 3027 - my $x; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 3028 - our $x; local $x; use strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 3029 - our $x; local $x; use strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 3030 - our $x; local $x; use strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 3031 - our $x; local $x; no strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 3032 - our $x; local $x; no strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 3033 - our $x; local $x; no strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 3034 - my $x; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 3035 - my $x; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 3036 - my $x; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 3037 - our $x; local $x; use strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 3038 - our $x; local $x; use strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 3039 - our $x; local $x; use strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 3040 - our $x; local $x; no strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 3041 - our $x; local $x; no strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 3042 - our $x; local $x; no strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 3043 - my %x; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [exception] ok 3044 - my %x; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [return] ok 3045 - my %x; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [variable] ok 3046 - our %x; local %x; use strict; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [exception] ok 3047 - our %x; local %x; use strict; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [return] ok 3048 - our %x; local %x; use strict; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [variable] ok 3049 - our %x; local %x; no strict; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [exception] ok 3050 - our %x; local %x; no strict; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [return] ok 3051 - our %x; local %x; no strict; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [variable] ok 3052 - my $x; @$x{'a', 'b'} = (1, 2); () [exception] ok 3053 - my $x; @$x{'a', 'b'} = (1, 2); () [return] ok 3054 - my $x; @$x{'a', 'b'} = (1, 2); () [variable] ok 3055 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3056 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3057 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3058 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3059 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3060 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3061 - my $x; @$x{'a', 'b'} = (1, 2); () [exception] ok 3062 - my $x; @$x{'a', 'b'} = (1, 2); () [return] ok 3063 - my $x; @$x{'a', 'b'} = (1, 2); () [variable] ok 3064 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3065 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3066 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3067 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3068 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3069 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3070 - my %x; @x{'a', 'b'} = (1, 2); () [exception] ok 3071 - my %x; @x{'a', 'b'} = (1, 2); () [return] ok 3072 - my %x; @x{'a', 'b'} = (1, 2); () [variable] ok 3073 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () [exception] ok 3074 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () [return] ok 3075 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () [variable] ok 3076 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () [exception] ok 3077 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () [return] ok 3078 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () [variable] ok 3079 - my $x; @$x{'a', 'b'} = (1, 2); () [exception] ok 3080 - my $x; @$x{'a', 'b'} = (1, 2); () [return] ok 3081 - my $x; @$x{'a', 'b'} = (1, 2); () [variable] ok 3082 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3083 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3084 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3085 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3086 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3087 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3088 - my $x; @$x{'a', 'b'} = (1, 2); () [exception] ok 3089 - my $x; @$x{'a', 'b'} = (1, 2); () [return] ok 3090 - my $x; @$x{'a', 'b'} = (1, 2); () [variable] ok 3091 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3092 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3093 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3094 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3095 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3096 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3097 - my %x; @x{'a', 'b'} = (1, 2); () [exception] ok 3098 - my %x; @x{'a', 'b'} = (1, 2); () [return] ok 3099 - my %x; @x{'a', 'b'} = (1, 2); () [variable] ok 3100 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () [exception] ok 3101 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () [return] ok 3102 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () [variable] ok 3103 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () [exception] ok 3104 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () [return] ok 3105 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () [variable] ok 3106 - my $x; @$x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3107 - my $x; @$x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3108 - my $x; @$x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3109 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3110 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3111 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3112 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3113 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3114 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3115 - my $x; @$x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3116 - my $x; @$x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3117 - my $x; @$x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3118 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3119 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3120 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3121 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3122 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3123 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3124 - my %x; @x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3125 - my %x; @x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3126 - my %x; @x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3127 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3128 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3129 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3130 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3131 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3132 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3133 - my $x; @$x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3134 - my $x; @$x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3135 - my $x; @$x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3136 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3137 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3138 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3139 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3140 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3141 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3142 - my $x; @$x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3143 - my $x; @$x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3144 - my $x; @$x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3145 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3146 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3147 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3148 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3149 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3150 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3151 - my %x; @x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3152 - my %x; @x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3153 - my %x; @x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3154 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3155 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3156 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3157 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3158 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3159 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3160 - my $x; @$x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3161 - my $x; @$x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3162 - my $x; @$x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3163 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3164 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3165 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3166 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3167 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3168 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3169 - my $x; @$x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3170 - my $x; @$x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3171 - my $x; @$x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3172 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3173 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3174 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3175 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3176 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3177 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3178 - my %x; @x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3179 - my %x; @x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3180 - my %x; @x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3181 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3182 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3183 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3184 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3185 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3186 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3187 - my $x; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3188 - my $x; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3189 - my $x; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3190 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3191 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3192 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3193 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3194 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3195 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3196 - my $x; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3197 - my $x; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3198 - my $x; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3199 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3200 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3201 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3202 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3203 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3204 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3205 - my %x; 1 <+store> [exception] ok 3206 - my %x; 1 <+store> [return] ok 3207 - my %x; 1 <+store> [variable] ok 3208 - our %x; local %x; use strict; 1 <+store> [exception] ok 3209 - our %x; local %x; use strict; 1 <+store> [return] ok 3210 - our %x; local %x; use strict; 1 <+store> [variable] ok 3211 - our %x; local %x; no strict; 1 <+store> [exception] ok 3212 - our %x; local %x; no strict; 1 <+store> [return] ok 3213 - our %x; local %x; no strict; 1 <+store> [variable] ok 3214 - my $x; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3215 - my $x; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3216 - my $x; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3217 - our $x; local $x; use strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3218 - our $x; local $x; use strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3219 - our $x; local $x; use strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3220 - our $x; local $x; no strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3221 - our $x; local $x; no strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3222 - our $x; local $x; no strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3223 - my $x; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3224 - my $x; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3225 - my $x; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3226 - our $x; local $x; use strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3227 - our $x; local $x; use strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3228 - our $x; local $x; use strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3229 - our $x; local $x; no strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3230 - our $x; local $x; no strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3231 - our $x; local $x; no strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3232 - my %x; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3233 - my %x; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3234 - my %x; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3235 - our %x; local %x; use strict; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3236 - our %x; local %x; use strict; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3237 - our %x; local %x; use strict; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3238 - our %x; local %x; no strict; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3239 - our %x; local %x; no strict; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3240 - our %x; local %x; no strict; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3241 - my $x; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3242 - my $x; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3243 - my $x; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3244 - our $x; local $x; use strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3245 - our $x; local $x; use strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3246 - our $x; local $x; use strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3247 - our $x; local $x; no strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3248 - our $x; local $x; no strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3249 - our $x; local $x; no strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3250 - my $x; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3251 - my $x; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3252 - my $x; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3253 - our $x; local $x; use strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3254 - our $x; local $x; use strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3255 - our $x; local $x; use strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3256 - our $x; local $x; no strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3257 - our $x; local $x; no strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3258 - our $x; local $x; no strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3259 - my %x; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3260 - my %x; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3261 - my %x; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3262 - our %x; local %x; use strict; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3263 - our %x; local %x; use strict; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3264 - our %x; local %x; use strict; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3265 - our %x; local %x; no strict; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3266 - our %x; local %x; no strict; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3267 - our %x; local %x; no strict; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3268 - my $x; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3269 - my $x; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3270 - my $x; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3271 - our $x; local $x; use strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3272 - our $x; local $x; use strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3273 - our $x; local $x; use strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3274 - our $x; local $x; no strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3275 - our $x; local $x; no strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3276 - our $x; local $x; no strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3277 - my $x; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3278 - my $x; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3279 - my $x; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3280 - our $x; local $x; use strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3281 - our $x; local $x; use strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3282 - our $x; local $x; use strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3283 - our $x; local $x; no strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3284 - our $x; local $x; no strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3285 - our $x; local $x; no strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3286 - my %x; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3287 - my %x; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3288 - my %x; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3289 - our %x; local %x; use strict; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3290 - our %x; local %x; use strict; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3291 - our %x; local %x; use strict; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3292 - our %x; local %x; no strict; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3293 - our %x; local %x; no strict; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3294 - our %x; local %x; no strict; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3295 - my $x; exists $x->{a} [exception] ok 3296 - my $x; exists $x->{a} [return] ok 3297 - my $x; exists $x->{a} [variable] ok 3298 - our $x; local $x; use strict; exists $x->{a} [exception] ok 3299 - our $x; local $x; use strict; exists $x->{a} [return] ok 3300 - our $x; local $x; use strict; exists $x->{a} [variable] ok 3301 - our $x; local $x; no strict; exists $x->{a} [exception] ok 3302 - our $x; local $x; no strict; exists $x->{a} [return] ok 3303 - our $x; local $x; no strict; exists $x->{a} [variable] ok 3304 - my $x; exists $$x{a} [exception] ok 3305 - my $x; exists $$x{a} [return] ok 3306 - my $x; exists $$x{a} [variable] ok 3307 - our $x; local $x; use strict; exists $$x{a} [exception] ok 3308 - our $x; local $x; use strict; exists $$x{a} [return] ok 3309 - our $x; local $x; use strict; exists $$x{a} [variable] ok 3310 - our $x; local $x; no strict; exists $$x{a} [exception] ok 3311 - our $x; local $x; no strict; exists $$x{a} [return] ok 3312 - our $x; local $x; no strict; exists $$x{a} [variable] ok 3313 - my %x; exists $x{a} [exception] ok 3314 - my %x; exists $x{a} [return] ok 3315 - my %x; exists $x{a} [variable] ok 3316 - our %x; local %x; use strict; exists $x{a} [exception] ok 3317 - our %x; local %x; use strict; exists $x{a} [return] ok 3318 - our %x; local %x; use strict; exists $x{a} [variable] ok 3319 - our %x; local %x; no strict; exists $x{a} [exception] ok 3320 - our %x; local %x; no strict; exists $x{a} [return] ok 3321 - our %x; local %x; no strict; exists $x{a} [variable] ok 3322 - my $x; exists $x->{a} [exception] ok 3323 - my $x; exists $x->{a} [return] ok 3324 - my $x; exists $x->{a} [variable] ok 3325 - our $x; local $x; use strict; exists $x->{a} [exception] ok 3326 - our $x; local $x; use strict; exists $x->{a} [return] ok 3327 - our $x; local $x; use strict; exists $x->{a} [variable] ok 3328 - our $x; local $x; no strict; exists $x->{a} [exception] ok 3329 - our $x; local $x; no strict; exists $x->{a} [return] ok 3330 - our $x; local $x; no strict; exists $x->{a} [variable] ok 3331 - my $x; exists $$x{a} [exception] ok 3332 - my $x; exists $$x{a} [return] ok 3333 - my $x; exists $$x{a} [variable] ok 3334 - our $x; local $x; use strict; exists $$x{a} [exception] ok 3335 - our $x; local $x; use strict; exists $$x{a} [return] ok 3336 - our $x; local $x; use strict; exists $$x{a} [variable] ok 3337 - our $x; local $x; no strict; exists $$x{a} [exception] ok 3338 - our $x; local $x; no strict; exists $$x{a} [return] ok 3339 - our $x; local $x; no strict; exists $$x{a} [variable] ok 3340 - my %x; exists $x{a} [exception] ok 3341 - my %x; exists $x{a} [return] ok 3342 - my %x; exists $x{a} [variable] ok 3343 - our %x; local %x; use strict; exists $x{a} [exception] ok 3344 - our %x; local %x; use strict; exists $x{a} [return] ok 3345 - our %x; local %x; use strict; exists $x{a} [variable] ok 3346 - our %x; local %x; no strict; exists $x{a} [exception] ok 3347 - our %x; local %x; no strict; exists $x{a} [return] ok 3348 - our %x; local %x; no strict; exists $x{a} [variable] ok 3349 - my $x; exists $x->{a} <+fetch> [exception] ok 3350 - my $x; exists $x->{a} <+fetch> [return] ok 3351 - my $x; exists $x->{a} <+fetch> [variable] ok 3352 - our $x; local $x; use strict; exists $x->{a} <+fetch> [exception] ok 3353 - our $x; local $x; use strict; exists $x->{a} <+fetch> [return] ok 3354 - our $x; local $x; use strict; exists $x->{a} <+fetch> [variable] ok 3355 - our $x; local $x; no strict; exists $x->{a} <+fetch> [exception] ok 3356 - our $x; local $x; no strict; exists $x->{a} <+fetch> [return] ok 3357 - our $x; local $x; no strict; exists $x->{a} <+fetch> [variable] ok 3358 - my $x; exists $$x{a} <+fetch> [exception] ok 3359 - my $x; exists $$x{a} <+fetch> [return] ok 3360 - my $x; exists $$x{a} <+fetch> [variable] ok 3361 - our $x; local $x; use strict; exists $$x{a} <+fetch> [exception] ok 3362 - our $x; local $x; use strict; exists $$x{a} <+fetch> [return] ok 3363 - our $x; local $x; use strict; exists $$x{a} <+fetch> [variable] ok 3364 - our $x; local $x; no strict; exists $$x{a} <+fetch> [exception] ok 3365 - our $x; local $x; no strict; exists $$x{a} <+fetch> [return] ok 3366 - our $x; local $x; no strict; exists $$x{a} <+fetch> [variable] ok 3367 - my %x; exists $x{a} <+fetch> [exception] ok 3368 - my %x; exists $x{a} <+fetch> [return] ok 3369 - my %x; exists $x{a} <+fetch> [variable] ok 3370 - our %x; local %x; use strict; exists $x{a} <+fetch> [exception] ok 3371 - our %x; local %x; use strict; exists $x{a} <+fetch> [return] ok 3372 - our %x; local %x; use strict; exists $x{a} <+fetch> [variable] ok 3373 - our %x; local %x; no strict; exists $x{a} <+fetch> [exception] ok 3374 - our %x; local %x; no strict; exists $x{a} <+fetch> [return] ok 3375 - our %x; local %x; no strict; exists $x{a} <+fetch> [variable] ok 3376 - my $x; exists $x->{a} <+exists> [exception] ok 3377 - my $x; exists $x->{a} <+exists> [return] ok 3378 - my $x; exists $x->{a} <+exists> [variable] ok 3379 - our $x; local $x; use strict; exists $x->{a} <+exists> [exception] ok 3380 - our $x; local $x; use strict; exists $x->{a} <+exists> [return] ok 3381 - our $x; local $x; use strict; exists $x->{a} <+exists> [variable] ok 3382 - our $x; local $x; no strict; exists $x->{a} <+exists> [exception] ok 3383 - our $x; local $x; no strict; exists $x->{a} <+exists> [return] ok 3384 - our $x; local $x; no strict; exists $x->{a} <+exists> [variable] ok 3385 - my $x; exists $$x{a} <+exists> [exception] ok 3386 - my $x; exists $$x{a} <+exists> [return] ok 3387 - my $x; exists $$x{a} <+exists> [variable] ok 3388 - our $x; local $x; use strict; exists $$x{a} <+exists> [exception] ok 3389 - our $x; local $x; use strict; exists $$x{a} <+exists> [return] ok 3390 - our $x; local $x; use strict; exists $$x{a} <+exists> [variable] ok 3391 - our $x; local $x; no strict; exists $$x{a} <+exists> [exception] ok 3392 - our $x; local $x; no strict; exists $$x{a} <+exists> [return] ok 3393 - our $x; local $x; no strict; exists $$x{a} <+exists> [variable] ok 3394 - my %x; exists $x{a} <+exists> [exception] ok 3395 - my %x; exists $x{a} <+exists> [return] ok 3396 - my %x; exists $x{a} <+exists> [variable] ok 3397 - our %x; local %x; use strict; exists $x{a} <+exists> [exception] ok 3398 - our %x; local %x; use strict; exists $x{a} <+exists> [return] ok 3399 - our %x; local %x; use strict; exists $x{a} <+exists> [variable] ok 3400 - our %x; local %x; no strict; exists $x{a} <+exists> [exception] ok 3401 - our %x; local %x; no strict; exists $x{a} <+exists> [return] ok 3402 - our %x; local %x; no strict; exists $x{a} <+exists> [variable] ok 3403 - my $x; exists $x->{a} <+delete> [exception] ok 3404 - my $x; exists $x->{a} <+delete> [return] ok 3405 - my $x; exists $x->{a} <+delete> [variable] ok 3406 - our $x; local $x; use strict; exists $x->{a} <+delete> [exception] ok 3407 - our $x; local $x; use strict; exists $x->{a} <+delete> [return] ok 3408 - our $x; local $x; use strict; exists $x->{a} <+delete> [variable] ok 3409 - our $x; local $x; no strict; exists $x->{a} <+delete> [exception] ok 3410 - our $x; local $x; no strict; exists $x->{a} <+delete> [return] ok 3411 - our $x; local $x; no strict; exists $x->{a} <+delete> [variable] ok 3412 - my $x; exists $$x{a} <+delete> [exception] ok 3413 - my $x; exists $$x{a} <+delete> [return] ok 3414 - my $x; exists $$x{a} <+delete> [variable] ok 3415 - our $x; local $x; use strict; exists $$x{a} <+delete> [exception] ok 3416 - our $x; local $x; use strict; exists $$x{a} <+delete> [return] ok 3417 - our $x; local $x; use strict; exists $$x{a} <+delete> [variable] ok 3418 - our $x; local $x; no strict; exists $$x{a} <+delete> [exception] ok 3419 - our $x; local $x; no strict; exists $$x{a} <+delete> [return] ok 3420 - our $x; local $x; no strict; exists $$x{a} <+delete> [variable] ok 3421 - my %x; exists $x{a} <+delete> [exception] ok 3422 - my %x; exists $x{a} <+delete> [return] ok 3423 - my %x; exists $x{a} <+delete> [variable] ok 3424 - our %x; local %x; use strict; exists $x{a} <+delete> [exception] ok 3425 - our %x; local %x; use strict; exists $x{a} <+delete> [return] ok 3426 - our %x; local %x; use strict; exists $x{a} <+delete> [variable] ok 3427 - our %x; local %x; no strict; exists $x{a} <+delete> [exception] ok 3428 - our %x; local %x; no strict; exists $x{a} <+delete> [return] ok 3429 - our %x; local %x; no strict; exists $x{a} <+delete> [variable] ok 3430 - my $x; exists $x->{a} <+store> [exception] ok 3431 - my $x; exists $x->{a} <+store> [return] ok 3432 - my $x; exists $x->{a} <+store> [variable] ok 3433 - our $x; local $x; use strict; exists $x->{a} <+store> [exception] ok 3434 - our $x; local $x; use strict; exists $x->{a} <+store> [return] ok 3435 - our $x; local $x; use strict; exists $x->{a} <+store> [variable] ok 3436 - our $x; local $x; no strict; exists $x->{a} <+store> [exception] ok 3437 - our $x; local $x; no strict; exists $x->{a} <+store> [return] ok 3438 - our $x; local $x; no strict; exists $x->{a} <+store> [variable] ok 3439 - my $x; exists $$x{a} <+store> [exception] ok 3440 - my $x; exists $$x{a} <+store> [return] ok 3441 - my $x; exists $$x{a} <+store> [variable] ok 3442 - our $x; local $x; use strict; exists $$x{a} <+store> [exception] ok 3443 - our $x; local $x; use strict; exists $$x{a} <+store> [return] ok 3444 - our $x; local $x; use strict; exists $$x{a} <+store> [variable] ok 3445 - our $x; local $x; no strict; exists $$x{a} <+store> [exception] ok 3446 - our $x; local $x; no strict; exists $$x{a} <+store> [return] ok 3447 - our $x; local $x; no strict; exists $$x{a} <+store> [variable] ok 3448 - my %x; exists $x{a} <+store> [exception] ok 3449 - my %x; exists $x{a} <+store> [return] ok 3450 - my %x; exists $x{a} <+store> [variable] ok 3451 - our %x; local %x; use strict; exists $x{a} <+store> [exception] ok 3452 - our %x; local %x; use strict; exists $x{a} <+store> [return] ok 3453 - our %x; local %x; use strict; exists $x{a} <+store> [variable] ok 3454 - our %x; local %x; no strict; exists $x{a} <+store> [exception] ok 3455 - our %x; local %x; no strict; exists $x{a} <+store> [return] ok 3456 - our %x; local %x; no strict; exists $x{a} <+store> [variable] ok 3457 - my $x; exists $x->{a} <+strict +fetch> [exception] ok 3458 - my $x; exists $x->{a} <+strict +fetch> [return] ok 3459 - my $x; exists $x->{a} <+strict +fetch> [variable] ok 3460 - our $x; local $x; use strict; exists $x->{a} <+strict +fetch> [exception] ok 3461 - our $x; local $x; use strict; exists $x->{a} <+strict +fetch> [return] ok 3462 - our $x; local $x; use strict; exists $x->{a} <+strict +fetch> [variable] ok 3463 - our $x; local $x; no strict; exists $x->{a} <+strict +fetch> [exception] ok 3464 - our $x; local $x; no strict; exists $x->{a} <+strict +fetch> [return] ok 3465 - our $x; local $x; no strict; exists $x->{a} <+strict +fetch> [variable] ok 3466 - my $x; exists $$x{a} <+strict +fetch> [exception] ok 3467 - my $x; exists $$x{a} <+strict +fetch> [return] ok 3468 - my $x; exists $$x{a} <+strict +fetch> [variable] ok 3469 - our $x; local $x; use strict; exists $$x{a} <+strict +fetch> [exception] ok 3470 - our $x; local $x; use strict; exists $$x{a} <+strict +fetch> [return] ok 3471 - our $x; local $x; use strict; exists $$x{a} <+strict +fetch> [variable] ok 3472 - our $x; local $x; no strict; exists $$x{a} <+strict +fetch> [exception] ok 3473 - our $x; local $x; no strict; exists $$x{a} <+strict +fetch> [return] ok 3474 - our $x; local $x; no strict; exists $$x{a} <+strict +fetch> [variable] ok 3475 - my %x; exists $x{a} <+strict +fetch> [exception] ok 3476 - my %x; exists $x{a} <+strict +fetch> [return] ok 3477 - my %x; exists $x{a} <+strict +fetch> [variable] ok 3478 - our %x; local %x; use strict; exists $x{a} <+strict +fetch> [exception] ok 3479 - our %x; local %x; use strict; exists $x{a} <+strict +fetch> [return] ok 3480 - our %x; local %x; use strict; exists $x{a} <+strict +fetch> [variable] ok 3481 - our %x; local %x; no strict; exists $x{a} <+strict +fetch> [exception] ok 3482 - our %x; local %x; no strict; exists $x{a} <+strict +fetch> [return] ok 3483 - our %x; local %x; no strict; exists $x{a} <+strict +fetch> [variable] ok 3484 - my $x; exists $x->{a} <+strict +exists> [exception] ok 3485 - my $x; exists $x->{a} <+strict +exists> [return] ok 3486 - my $x; exists $x->{a} <+strict +exists> [variable] ok 3487 - our $x; local $x; use strict; exists $x->{a} <+strict +exists> [exception] ok 3488 - our $x; local $x; use strict; exists $x->{a} <+strict +exists> [return] ok 3489 - our $x; local $x; use strict; exists $x->{a} <+strict +exists> [variable] ok 3490 - our $x; local $x; no strict; exists $x->{a} <+strict +exists> [exception] ok 3491 - our $x; local $x; no strict; exists $x->{a} <+strict +exists> [return] ok 3492 - our $x; local $x; no strict; exists $x->{a} <+strict +exists> [variable] ok 3493 - my $x; exists $$x{a} <+strict +exists> [exception] ok 3494 - my $x; exists $$x{a} <+strict +exists> [return] ok 3495 - my $x; exists $$x{a} <+strict +exists> [variable] ok 3496 - our $x; local $x; use strict; exists $$x{a} <+strict +exists> [exception] ok 3497 - our $x; local $x; use strict; exists $$x{a} <+strict +exists> [return] ok 3498 - our $x; local $x; use strict; exists $$x{a} <+strict +exists> [variable] ok 3499 - our $x; local $x; no strict; exists $$x{a} <+strict +exists> [exception] ok 3500 - our $x; local $x; no strict; exists $$x{a} <+strict +exists> [return] ok 3501 - our $x; local $x; no strict; exists $$x{a} <+strict +exists> [variable] ok 3502 - my %x; 1 <+strict +exists> [exception] ok 3503 - my %x; 1 <+strict +exists> [return] ok 3504 - my %x; 1 <+strict +exists> [variable] ok 3505 - our %x; local %x; use strict; 1 <+strict +exists> [exception] ok 3506 - our %x; local %x; use strict; 1 <+strict +exists> [return] ok 3507 - our %x; local %x; use strict; 1 <+strict +exists> [variable] ok 3508 - our %x; local %x; no strict; 1 <+strict +exists> [exception] ok 3509 - our %x; local %x; no strict; 1 <+strict +exists> [return] ok 3510 - our %x; local %x; no strict; 1 <+strict +exists> [variable] ok 3511 - my $x; exists $x->{a} <+strict +delete> [exception] ok 3512 - my $x; exists $x->{a} <+strict +delete> [return] ok 3513 - my $x; exists $x->{a} <+strict +delete> [variable] ok 3514 - our $x; local $x; use strict; exists $x->{a} <+strict +delete> [exception] ok 3515 - our $x; local $x; use strict; exists $x->{a} <+strict +delete> [return] ok 3516 - our $x; local $x; use strict; exists $x->{a} <+strict +delete> [variable] ok 3517 - our $x; local $x; no strict; exists $x->{a} <+strict +delete> [exception] ok 3518 - our $x; local $x; no strict; exists $x->{a} <+strict +delete> [return] ok 3519 - our $x; local $x; no strict; exists $x->{a} <+strict +delete> [variable] ok 3520 - my $x; exists $$x{a} <+strict +delete> [exception] ok 3521 - my $x; exists $$x{a} <+strict +delete> [return] ok 3522 - my $x; exists $$x{a} <+strict +delete> [variable] ok 3523 - our $x; local $x; use strict; exists $$x{a} <+strict +delete> [exception] ok 3524 - our $x; local $x; use strict; exists $$x{a} <+strict +delete> [return] ok 3525 - our $x; local $x; use strict; exists $$x{a} <+strict +delete> [variable] ok 3526 - our $x; local $x; no strict; exists $$x{a} <+strict +delete> [exception] ok 3527 - our $x; local $x; no strict; exists $$x{a} <+strict +delete> [return] ok 3528 - our $x; local $x; no strict; exists $$x{a} <+strict +delete> [variable] ok 3529 - my %x; exists $x{a} <+strict +delete> [exception] ok 3530 - my %x; exists $x{a} <+strict +delete> [return] ok 3531 - my %x; exists $x{a} <+strict +delete> [variable] ok 3532 - our %x; local %x; use strict; exists $x{a} <+strict +delete> [exception] ok 3533 - our %x; local %x; use strict; exists $x{a} <+strict +delete> [return] ok 3534 - our %x; local %x; use strict; exists $x{a} <+strict +delete> [variable] ok 3535 - our %x; local %x; no strict; exists $x{a} <+strict +delete> [exception] ok 3536 - our %x; local %x; no strict; exists $x{a} <+strict +delete> [return] ok 3537 - our %x; local %x; no strict; exists $x{a} <+strict +delete> [variable] ok 3538 - my $x; exists $x->{a} <+strict +store> [exception] ok 3539 - my $x; exists $x->{a} <+strict +store> [return] ok 3540 - my $x; exists $x->{a} <+strict +store> [variable] ok 3541 - our $x; local $x; use strict; exists $x->{a} <+strict +store> [exception] ok 3542 - our $x; local $x; use strict; exists $x->{a} <+strict +store> [return] ok 3543 - our $x; local $x; use strict; exists $x->{a} <+strict +store> [variable] ok 3544 - our $x; local $x; no strict; exists $x->{a} <+strict +store> [exception] ok 3545 - our $x; local $x; no strict; exists $x->{a} <+strict +store> [return] ok 3546 - our $x; local $x; no strict; exists $x->{a} <+strict +store> [variable] ok 3547 - my $x; exists $$x{a} <+strict +store> [exception] ok 3548 - my $x; exists $$x{a} <+strict +store> [return] ok 3549 - my $x; exists $$x{a} <+strict +store> [variable] ok 3550 - our $x; local $x; use strict; exists $$x{a} <+strict +store> [exception] ok 3551 - our $x; local $x; use strict; exists $$x{a} <+strict +store> [return] ok 3552 - our $x; local $x; use strict; exists $$x{a} <+strict +store> [variable] ok 3553 - our $x; local $x; no strict; exists $$x{a} <+strict +store> [exception] ok 3554 - our $x; local $x; no strict; exists $$x{a} <+strict +store> [return] ok 3555 - our $x; local $x; no strict; exists $$x{a} <+strict +store> [variable] ok 3556 - my %x; exists $x{a} <+strict +store> [exception] ok 3557 - my %x; exists $x{a} <+strict +store> [return] ok 3558 - my %x; exists $x{a} <+strict +store> [variable] ok 3559 - our %x; local %x; use strict; exists $x{a} <+strict +store> [exception] ok 3560 - our %x; local %x; use strict; exists $x{a} <+strict +store> [return] ok 3561 - our %x; local %x; use strict; exists $x{a} <+strict +store> [variable] ok 3562 - our %x; local %x; no strict; exists $x{a} <+strict +store> [exception] ok 3563 - our %x; local %x; no strict; exists $x{a} <+strict +store> [return] ok 3564 - our %x; local %x; no strict; exists $x{a} <+strict +store> [variable] ok 3565 - my $x; exists $x->{a}->{b} [exception] ok 3566 - my $x; exists $x->{a}->{b} [return] ok 3567 - my $x; exists $x->{a}->{b} [variable] ok 3568 - our $x; local $x; use strict; exists $x->{a}->{b} [exception] ok 3569 - our $x; local $x; use strict; exists $x->{a}->{b} [return] ok 3570 - our $x; local $x; use strict; exists $x->{a}->{b} [variable] ok 3571 - our $x; local $x; no strict; exists $x->{a}->{b} [exception] ok 3572 - our $x; local $x; no strict; exists $x->{a}->{b} [return] ok 3573 - our $x; local $x; no strict; exists $x->{a}->{b} [variable] ok 3574 - my $x; exists $$x{a}->{b} [exception] ok 3575 - my $x; exists $$x{a}->{b} [return] ok 3576 - my $x; exists $$x{a}->{b} [variable] ok 3577 - our $x; local $x; use strict; exists $$x{a}->{b} [exception] ok 3578 - our $x; local $x; use strict; exists $$x{a}->{b} [return] ok 3579 - our $x; local $x; use strict; exists $$x{a}->{b} [variable] ok 3580 - our $x; local $x; no strict; exists $$x{a}->{b} [exception] ok 3581 - our $x; local $x; no strict; exists $$x{a}->{b} [return] ok 3582 - our $x; local $x; no strict; exists $$x{a}->{b} [variable] ok 3583 - my %x; exists $x{a}->{b} [exception] ok 3584 - my %x; exists $x{a}->{b} [return] ok 3585 - my %x; exists $x{a}->{b} [variable] ok 3586 - our %x; local %x; use strict; exists $x{a}->{b} [exception] ok 3587 - our %x; local %x; use strict; exists $x{a}->{b} [return] ok 3588 - our %x; local %x; use strict; exists $x{a}->{b} [variable] ok 3589 - our %x; local %x; no strict; exists $x{a}->{b} [exception] ok 3590 - our %x; local %x; no strict; exists $x{a}->{b} [return] ok 3591 - our %x; local %x; no strict; exists $x{a}->{b} [variable] ok 3592 - my $x; exists $x->{a}->{b} [exception] ok 3593 - my $x; exists $x->{a}->{b} [return] ok 3594 - my $x; exists $x->{a}->{b} [variable] ok 3595 - our $x; local $x; use strict; exists $x->{a}->{b} [exception] ok 3596 - our $x; local $x; use strict; exists $x->{a}->{b} [return] ok 3597 - our $x; local $x; use strict; exists $x->{a}->{b} [variable] ok 3598 - our $x; local $x; no strict; exists $x->{a}->{b} [exception] ok 3599 - our $x; local $x; no strict; exists $x->{a}->{b} [return] ok 3600 - our $x; local $x; no strict; exists $x->{a}->{b} [variable] ok 3601 - my $x; exists $$x{a}->{b} [exception] ok 3602 - my $x; exists $$x{a}->{b} [return] ok 3603 - my $x; exists $$x{a}->{b} [variable] ok 3604 - our $x; local $x; use strict; exists $$x{a}->{b} [exception] ok 3605 - our $x; local $x; use strict; exists $$x{a}->{b} [return] ok 3606 - our $x; local $x; use strict; exists $$x{a}->{b} [variable] ok 3607 - our $x; local $x; no strict; exists $$x{a}->{b} [exception] ok 3608 - our $x; local $x; no strict; exists $$x{a}->{b} [return] ok 3609 - our $x; local $x; no strict; exists $$x{a}->{b} [variable] ok 3610 - my %x; exists $x{a}->{b} [exception] ok 3611 - my %x; exists $x{a}->{b} [return] ok 3612 - my %x; exists $x{a}->{b} [variable] ok 3613 - our %x; local %x; use strict; exists $x{a}->{b} [exception] ok 3614 - our %x; local %x; use strict; exists $x{a}->{b} [return] ok 3615 - our %x; local %x; use strict; exists $x{a}->{b} [variable] ok 3616 - our %x; local %x; no strict; exists $x{a}->{b} [exception] ok 3617 - our %x; local %x; no strict; exists $x{a}->{b} [return] ok 3618 - our %x; local %x; no strict; exists $x{a}->{b} [variable] ok 3619 - my $x; exists $x->{a}->{b} <+fetch> [exception] ok 3620 - my $x; exists $x->{a}->{b} <+fetch> [return] ok 3621 - my $x; exists $x->{a}->{b} <+fetch> [variable] ok 3622 - our $x; local $x; use strict; exists $x->{a}->{b} <+fetch> [exception] ok 3623 - our $x; local $x; use strict; exists $x->{a}->{b} <+fetch> [return] ok 3624 - our $x; local $x; use strict; exists $x->{a}->{b} <+fetch> [variable] ok 3625 - our $x; local $x; no strict; exists $x->{a}->{b} <+fetch> [exception] ok 3626 - our $x; local $x; no strict; exists $x->{a}->{b} <+fetch> [return] ok 3627 - our $x; local $x; no strict; exists $x->{a}->{b} <+fetch> [variable] ok 3628 - my $x; exists $$x{a}->{b} <+fetch> [exception] ok 3629 - my $x; exists $$x{a}->{b} <+fetch> [return] ok 3630 - my $x; exists $$x{a}->{b} <+fetch> [variable] ok 3631 - our $x; local $x; use strict; exists $$x{a}->{b} <+fetch> [exception] ok 3632 - our $x; local $x; use strict; exists $$x{a}->{b} <+fetch> [return] ok 3633 - our $x; local $x; use strict; exists $$x{a}->{b} <+fetch> [variable] ok 3634 - our $x; local $x; no strict; exists $$x{a}->{b} <+fetch> [exception] ok 3635 - our $x; local $x; no strict; exists $$x{a}->{b} <+fetch> [return] ok 3636 - our $x; local $x; no strict; exists $$x{a}->{b} <+fetch> [variable] ok 3637 - my %x; exists $x{a}->{b} <+fetch> [exception] ok 3638 - my %x; exists $x{a}->{b} <+fetch> [return] ok 3639 - my %x; exists $x{a}->{b} <+fetch> [variable] ok 3640 - our %x; local %x; use strict; exists $x{a}->{b} <+fetch> [exception] ok 3641 - our %x; local %x; use strict; exists $x{a}->{b} <+fetch> [return] ok 3642 - our %x; local %x; use strict; exists $x{a}->{b} <+fetch> [variable] ok 3643 - our %x; local %x; no strict; exists $x{a}->{b} <+fetch> [exception] ok 3644 - our %x; local %x; no strict; exists $x{a}->{b} <+fetch> [return] ok 3645 - our %x; local %x; no strict; exists $x{a}->{b} <+fetch> [variable] ok 3646 - my $x; exists $x->{a}->{b} <+exists> [exception] ok 3647 - my $x; exists $x->{a}->{b} <+exists> [return] ok 3648 - my $x; exists $x->{a}->{b} <+exists> [variable] ok 3649 - our $x; local $x; use strict; exists $x->{a}->{b} <+exists> [exception] ok 3650 - our $x; local $x; use strict; exists $x->{a}->{b} <+exists> [return] ok 3651 - our $x; local $x; use strict; exists $x->{a}->{b} <+exists> [variable] ok 3652 - our $x; local $x; no strict; exists $x->{a}->{b} <+exists> [exception] ok 3653 - our $x; local $x; no strict; exists $x->{a}->{b} <+exists> [return] ok 3654 - our $x; local $x; no strict; exists $x->{a}->{b} <+exists> [variable] ok 3655 - my $x; exists $$x{a}->{b} <+exists> [exception] ok 3656 - my $x; exists $$x{a}->{b} <+exists> [return] ok 3657 - my $x; exists $$x{a}->{b} <+exists> [variable] ok 3658 - our $x; local $x; use strict; exists $$x{a}->{b} <+exists> [exception] ok 3659 - our $x; local $x; use strict; exists $$x{a}->{b} <+exists> [return] ok 3660 - our $x; local $x; use strict; exists $$x{a}->{b} <+exists> [variable] ok 3661 - our $x; local $x; no strict; exists $$x{a}->{b} <+exists> [exception] ok 3662 - our $x; local $x; no strict; exists $$x{a}->{b} <+exists> [return] ok 3663 - our $x; local $x; no strict; exists $$x{a}->{b} <+exists> [variable] ok 3664 - my %x; exists $x{a}->{b} <+exists> [exception] ok 3665 - my %x; exists $x{a}->{b} <+exists> [return] ok 3666 - my %x; exists $x{a}->{b} <+exists> [variable] ok 3667 - our %x; local %x; use strict; exists $x{a}->{b} <+exists> [exception] ok 3668 - our %x; local %x; use strict; exists $x{a}->{b} <+exists> [return] ok 3669 - our %x; local %x; use strict; exists $x{a}->{b} <+exists> [variable] ok 3670 - our %x; local %x; no strict; exists $x{a}->{b} <+exists> [exception] ok 3671 - our %x; local %x; no strict; exists $x{a}->{b} <+exists> [return] ok 3672 - our %x; local %x; no strict; exists $x{a}->{b} <+exists> [variable] ok 3673 - my $x; exists $x->{a}->{b} <+delete> [exception] ok 3674 - my $x; exists $x->{a}->{b} <+delete> [return] ok 3675 - my $x; exists $x->{a}->{b} <+delete> [variable] ok 3676 - our $x; local $x; use strict; exists $x->{a}->{b} <+delete> [exception] ok 3677 - our $x; local $x; use strict; exists $x->{a}->{b} <+delete> [return] ok 3678 - our $x; local $x; use strict; exists $x->{a}->{b} <+delete> [variable] ok 3679 - our $x; local $x; no strict; exists $x->{a}->{b} <+delete> [exception] ok 3680 - our $x; local $x; no strict; exists $x->{a}->{b} <+delete> [return] ok 3681 - our $x; local $x; no strict; exists $x->{a}->{b} <+delete> [variable] ok 3682 - my $x; exists $$x{a}->{b} <+delete> [exception] ok 3683 - my $x; exists $$x{a}->{b} <+delete> [return] ok 3684 - my $x; exists $$x{a}->{b} <+delete> [variable] ok 3685 - our $x; local $x; use strict; exists $$x{a}->{b} <+delete> [exception] ok 3686 - our $x; local $x; use strict; exists $$x{a}->{b} <+delete> [return] ok 3687 - our $x; local $x; use strict; exists $$x{a}->{b} <+delete> [variable] ok 3688 - our $x; local $x; no strict; exists $$x{a}->{b} <+delete> [exception] ok 3689 - our $x; local $x; no strict; exists $$x{a}->{b} <+delete> [return] ok 3690 - our $x; local $x; no strict; exists $$x{a}->{b} <+delete> [variable] ok 3691 - my %x; exists $x{a}->{b} <+delete> [exception] ok 3692 - my %x; exists $x{a}->{b} <+delete> [return] ok 3693 - my %x; exists $x{a}->{b} <+delete> [variable] ok 3694 - our %x; local %x; use strict; exists $x{a}->{b} <+delete> [exception] ok 3695 - our %x; local %x; use strict; exists $x{a}->{b} <+delete> [return] ok 3696 - our %x; local %x; use strict; exists $x{a}->{b} <+delete> [variable] ok 3697 - our %x; local %x; no strict; exists $x{a}->{b} <+delete> [exception] ok 3698 - our %x; local %x; no strict; exists $x{a}->{b} <+delete> [return] ok 3699 - our %x; local %x; no strict; exists $x{a}->{b} <+delete> [variable] ok 3700 - my $x; exists $x->{a}->{b} <+store> [exception] ok 3701 - my $x; exists $x->{a}->{b} <+store> [return] ok 3702 - my $x; exists $x->{a}->{b} <+store> [variable] ok 3703 - our $x; local $x; use strict; exists $x->{a}->{b} <+store> [exception] ok 3704 - our $x; local $x; use strict; exists $x->{a}->{b} <+store> [return] ok 3705 - our $x; local $x; use strict; exists $x->{a}->{b} <+store> [variable] ok 3706 - our $x; local $x; no strict; exists $x->{a}->{b} <+store> [exception] ok 3707 - our $x; local $x; no strict; exists $x->{a}->{b} <+store> [return] ok 3708 - our $x; local $x; no strict; exists $x->{a}->{b} <+store> [variable] ok 3709 - my $x; exists $$x{a}->{b} <+store> [exception] ok 3710 - my $x; exists $$x{a}->{b} <+store> [return] ok 3711 - my $x; exists $$x{a}->{b} <+store> [variable] ok 3712 - our $x; local $x; use strict; exists $$x{a}->{b} <+store> [exception] ok 3713 - our $x; local $x; use strict; exists $$x{a}->{b} <+store> [return] ok 3714 - our $x; local $x; use strict; exists $$x{a}->{b} <+store> [variable] ok 3715 - our $x; local $x; no strict; exists $$x{a}->{b} <+store> [exception] ok 3716 - our $x; local $x; no strict; exists $$x{a}->{b} <+store> [return] ok 3717 - our $x; local $x; no strict; exists $$x{a}->{b} <+store> [variable] ok 3718 - my %x; exists $x{a}->{b} <+store> [exception] ok 3719 - my %x; exists $x{a}->{b} <+store> [return] ok 3720 - my %x; exists $x{a}->{b} <+store> [variable] ok 3721 - our %x; local %x; use strict; exists $x{a}->{b} <+store> [exception] ok 3722 - our %x; local %x; use strict; exists $x{a}->{b} <+store> [return] ok 3723 - our %x; local %x; use strict; exists $x{a}->{b} <+store> [variable] ok 3724 - our %x; local %x; no strict; exists $x{a}->{b} <+store> [exception] ok 3725 - our %x; local %x; no strict; exists $x{a}->{b} <+store> [return] ok 3726 - our %x; local %x; no strict; exists $x{a}->{b} <+store> [variable] ok 3727 - my $x; exists $x->{a}->{b} <+strict +fetch> [exception] ok 3728 - my $x; exists $x->{a}->{b} <+strict +fetch> [return] ok 3729 - my $x; exists $x->{a}->{b} <+strict +fetch> [variable] ok 3730 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +fetch> [exception] ok 3731 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +fetch> [return] ok 3732 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +fetch> [variable] ok 3733 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +fetch> [exception] ok 3734 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +fetch> [return] ok 3735 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +fetch> [variable] ok 3736 - my $x; exists $$x{a}->{b} <+strict +fetch> [exception] ok 3737 - my $x; exists $$x{a}->{b} <+strict +fetch> [return] ok 3738 - my $x; exists $$x{a}->{b} <+strict +fetch> [variable] ok 3739 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +fetch> [exception] ok 3740 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +fetch> [return] ok 3741 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +fetch> [variable] ok 3742 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +fetch> [exception] ok 3743 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +fetch> [return] ok 3744 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +fetch> [variable] ok 3745 - my %x; exists $x{a}->{b} <+strict +fetch> [exception] ok 3746 - my %x; exists $x{a}->{b} <+strict +fetch> [return] ok 3747 - my %x; exists $x{a}->{b} <+strict +fetch> [variable] ok 3748 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +fetch> [exception] ok 3749 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +fetch> [return] ok 3750 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +fetch> [variable] ok 3751 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +fetch> [exception] ok 3752 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +fetch> [return] ok 3753 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +fetch> [variable] ok 3754 - my $x; exists $x->{a}->{b} <+strict +exists> [exception] ok 3755 - my $x; exists $x->{a}->{b} <+strict +exists> [return] ok 3756 - my $x; exists $x->{a}->{b} <+strict +exists> [variable] ok 3757 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +exists> [exception] ok 3758 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +exists> [return] ok 3759 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +exists> [variable] ok 3760 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +exists> [exception] ok 3761 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +exists> [return] ok 3762 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +exists> [variable] ok 3763 - my $x; exists $$x{a}->{b} <+strict +exists> [exception] ok 3764 - my $x; exists $$x{a}->{b} <+strict +exists> [return] ok 3765 - my $x; exists $$x{a}->{b} <+strict +exists> [variable] ok 3766 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +exists> [exception] ok 3767 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +exists> [return] ok 3768 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +exists> [variable] ok 3769 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +exists> [exception] ok 3770 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +exists> [return] ok 3771 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +exists> [variable] ok 3772 - my %x; exists $x{a}->{b} <+strict +exists> [exception] ok 3773 - my %x; exists $x{a}->{b} <+strict +exists> [return] ok 3774 - my %x; exists $x{a}->{b} <+strict +exists> [variable] ok 3775 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +exists> [exception] ok 3776 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +exists> [return] ok 3777 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +exists> [variable] ok 3778 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +exists> [exception] ok 3779 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +exists> [return] ok 3780 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +exists> [variable] ok 3781 - my $x; exists $x->{a}->{b} <+strict +delete> [exception] ok 3782 - my $x; exists $x->{a}->{b} <+strict +delete> [return] ok 3783 - my $x; exists $x->{a}->{b} <+strict +delete> [variable] ok 3784 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +delete> [exception] ok 3785 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +delete> [return] ok 3786 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +delete> [variable] ok 3787 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +delete> [exception] ok 3788 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +delete> [return] ok 3789 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +delete> [variable] ok 3790 - my $x; exists $$x{a}->{b} <+strict +delete> [exception] ok 3791 - my $x; exists $$x{a}->{b} <+strict +delete> [return] ok 3792 - my $x; exists $$x{a}->{b} <+strict +delete> [variable] ok 3793 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +delete> [exception] ok 3794 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +delete> [return] ok 3795 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +delete> [variable] ok 3796 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +delete> [exception] ok 3797 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +delete> [return] ok 3798 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +delete> [variable] ok 3799 - my %x; exists $x{a}->{b} <+strict +delete> [exception] ok 3800 - my %x; exists $x{a}->{b} <+strict +delete> [return] ok 3801 - my %x; exists $x{a}->{b} <+strict +delete> [variable] ok 3802 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +delete> [exception] ok 3803 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +delete> [return] ok 3804 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +delete> [variable] ok 3805 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +delete> [exception] ok 3806 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +delete> [return] ok 3807 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +delete> [variable] ok 3808 - my $x; exists $x->{a}->{b} <+strict +store> [exception] ok 3809 - my $x; exists $x->{a}->{b} <+strict +store> [return] ok 3810 - my $x; exists $x->{a}->{b} <+strict +store> [variable] ok 3811 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +store> [exception] ok 3812 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +store> [return] ok 3813 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +store> [variable] ok 3814 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +store> [exception] ok 3815 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +store> [return] ok 3816 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +store> [variable] ok 3817 - my $x; exists $$x{a}->{b} <+strict +store> [exception] ok 3818 - my $x; exists $$x{a}->{b} <+strict +store> [return] ok 3819 - my $x; exists $$x{a}->{b} <+strict +store> [variable] ok 3820 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +store> [exception] ok 3821 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +store> [return] ok 3822 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +store> [variable] ok 3823 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +store> [exception] ok 3824 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +store> [return] ok 3825 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +store> [variable] ok 3826 - my %x; exists $x{a}->{b} <+strict +store> [exception] ok 3827 - my %x; exists $x{a}->{b} <+strict +store> [return] ok 3828 - my %x; exists $x{a}->{b} <+strict +store> [variable] ok 3829 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +store> [exception] ok 3830 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +store> [return] ok 3831 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +store> [variable] ok 3832 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +store> [exception] ok 3833 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +store> [return] ok 3834 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +store> [variable] ok 3835 - my $x; $x->{a} = 1; exists $x->{a} <+fetch> [exception] ok 3836 - my $x; $x->{a} = 1; exists $x->{a} <+fetch> [return] ok 3837 - my $x; $x->{a} = 1; exists $x->{a} <+fetch> [variable] ok 3838 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+fetch> [exception] ok 3839 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+fetch> [return] ok 3840 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+fetch> [variable] ok 3841 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+fetch> [exception] ok 3842 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+fetch> [return] ok 3843 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+fetch> [variable] ok 3844 - my $x; $x->{a} = 1; exists $$x{a} <+fetch> [exception] ok 3845 - my $x; $x->{a} = 1; exists $$x{a} <+fetch> [return] ok 3846 - my $x; $x->{a} = 1; exists $$x{a} <+fetch> [variable] ok 3847 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+fetch> [exception] ok 3848 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+fetch> [return] ok 3849 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+fetch> [variable] ok 3850 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+fetch> [exception] ok 3851 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+fetch> [return] ok 3852 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+fetch> [variable] ok 3853 - my %x; $x{a} = 1; exists $x{a} <+fetch> [exception] ok 3854 - my %x; $x{a} = 1; exists $x{a} <+fetch> [return] ok 3855 - my %x; $x{a} = 1; exists $x{a} <+fetch> [variable] ok 3856 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+fetch> [exception] ok 3857 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+fetch> [return] ok 3858 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+fetch> [variable] ok 3859 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+fetch> [exception] ok 3860 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+fetch> [return] ok 3861 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+fetch> [variable] ok 3862 - my $x; $x->{a} = 1; exists $x->{b} <+fetch> [exception] ok 3863 - my $x; $x->{a} = 1; exists $x->{b} <+fetch> [return] ok 3864 - my $x; $x->{a} = 1; exists $x->{b} <+fetch> [variable] ok 3865 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+fetch> [exception] ok 3866 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+fetch> [return] ok 3867 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+fetch> [variable] ok 3868 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+fetch> [exception] ok 3869 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+fetch> [return] ok 3870 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+fetch> [variable] ok 3871 - my $x; $x->{a} = 1; exists $$x{b} <+fetch> [exception] ok 3872 - my $x; $x->{a} = 1; exists $$x{b} <+fetch> [return] ok 3873 - my $x; $x->{a} = 1; exists $$x{b} <+fetch> [variable] ok 3874 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+fetch> [exception] ok 3875 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+fetch> [return] ok 3876 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+fetch> [variable] ok 3877 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+fetch> [exception] ok 3878 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+fetch> [return] ok 3879 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+fetch> [variable] ok 3880 - my %x; $x{a} = 1; exists $x{b} <+fetch> [exception] ok 3881 - my %x; $x{a} = 1; exists $x{b} <+fetch> [return] ok 3882 - my %x; $x{a} = 1; exists $x{b} <+fetch> [variable] ok 3883 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+fetch> [exception] ok 3884 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+fetch> [return] ok 3885 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+fetch> [variable] ok 3886 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+fetch> [exception] ok 3887 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+fetch> [return] ok 3888 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+fetch> [variable] ok 3889 - my $x; $x->{a} = 1; exists $x->{a} <+exists> [exception] ok 3890 - my $x; $x->{a} = 1; exists $x->{a} <+exists> [return] ok 3891 - my $x; $x->{a} = 1; exists $x->{a} <+exists> [variable] ok 3892 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+exists> [exception] ok 3893 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+exists> [return] ok 3894 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+exists> [variable] ok 3895 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+exists> [exception] ok 3896 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+exists> [return] ok 3897 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+exists> [variable] ok 3898 - my $x; $x->{a} = 1; exists $$x{a} <+exists> [exception] ok 3899 - my $x; $x->{a} = 1; exists $$x{a} <+exists> [return] ok 3900 - my $x; $x->{a} = 1; exists $$x{a} <+exists> [variable] ok 3901 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+exists> [exception] ok 3902 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+exists> [return] ok 3903 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+exists> [variable] ok 3904 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+exists> [exception] ok 3905 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+exists> [return] ok 3906 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+exists> [variable] ok 3907 - my %x; $x{a} = 1; exists $x{a} <+exists> [exception] ok 3908 - my %x; $x{a} = 1; exists $x{a} <+exists> [return] ok 3909 - my %x; $x{a} = 1; exists $x{a} <+exists> [variable] ok 3910 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+exists> [exception] ok 3911 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+exists> [return] ok 3912 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+exists> [variable] ok 3913 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+exists> [exception] ok 3914 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+exists> [return] ok 3915 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+exists> [variable] ok 3916 - my $x; $x->{a} = 1; exists $x->{b} <+exists> [exception] ok 3917 - my $x; $x->{a} = 1; exists $x->{b} <+exists> [return] ok 3918 - my $x; $x->{a} = 1; exists $x->{b} <+exists> [variable] ok 3919 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+exists> [exception] ok 3920 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+exists> [return] ok 3921 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+exists> [variable] ok 3922 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+exists> [exception] ok 3923 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+exists> [return] ok 3924 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+exists> [variable] ok 3925 - my $x; $x->{a} = 1; exists $$x{b} <+exists> [exception] ok 3926 - my $x; $x->{a} = 1; exists $$x{b} <+exists> [return] ok 3927 - my $x; $x->{a} = 1; exists $$x{b} <+exists> [variable] ok 3928 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+exists> [exception] ok 3929 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+exists> [return] ok 3930 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+exists> [variable] ok 3931 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+exists> [exception] ok 3932 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+exists> [return] ok 3933 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+exists> [variable] ok 3934 - my %x; $x{a} = 1; exists $x{b} <+exists> [exception] ok 3935 - my %x; $x{a} = 1; exists $x{b} <+exists> [return] ok 3936 - my %x; $x{a} = 1; exists $x{b} <+exists> [variable] ok 3937 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+exists> [exception] ok 3938 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+exists> [return] ok 3939 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+exists> [variable] ok 3940 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+exists> [exception] ok 3941 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+exists> [return] ok 3942 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+exists> [variable] ok 3943 - my $x; $x->{a} = 1; exists $x->{a} <+delete> [exception] ok 3944 - my $x; $x->{a} = 1; exists $x->{a} <+delete> [return] ok 3945 - my $x; $x->{a} = 1; exists $x->{a} <+delete> [variable] ok 3946 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+delete> [exception] ok 3947 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+delete> [return] ok 3948 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+delete> [variable] ok 3949 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+delete> [exception] ok 3950 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+delete> [return] ok 3951 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+delete> [variable] ok 3952 - my $x; $x->{a} = 1; exists $$x{a} <+delete> [exception] ok 3953 - my $x; $x->{a} = 1; exists $$x{a} <+delete> [return] ok 3954 - my $x; $x->{a} = 1; exists $$x{a} <+delete> [variable] ok 3955 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+delete> [exception] ok 3956 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+delete> [return] ok 3957 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+delete> [variable] ok 3958 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+delete> [exception] ok 3959 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+delete> [return] ok 3960 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+delete> [variable] ok 3961 - my %x; $x{a} = 1; exists $x{a} <+delete> [exception] ok 3962 - my %x; $x{a} = 1; exists $x{a} <+delete> [return] ok 3963 - my %x; $x{a} = 1; exists $x{a} <+delete> [variable] ok 3964 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+delete> [exception] ok 3965 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+delete> [return] ok 3966 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+delete> [variable] ok 3967 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+delete> [exception] ok 3968 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+delete> [return] ok 3969 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+delete> [variable] ok 3970 - my $x; $x->{a} = 1; exists $x->{b} <+delete> [exception] ok 3971 - my $x; $x->{a} = 1; exists $x->{b} <+delete> [return] ok 3972 - my $x; $x->{a} = 1; exists $x->{b} <+delete> [variable] ok 3973 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+delete> [exception] ok 3974 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+delete> [return] ok 3975 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+delete> [variable] ok 3976 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+delete> [exception] ok 3977 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+delete> [return] ok 3978 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+delete> [variable] ok 3979 - my $x; $x->{a} = 1; exists $$x{b} <+delete> [exception] ok 3980 - my $x; $x->{a} = 1; exists $$x{b} <+delete> [return] ok 3981 - my $x; $x->{a} = 1; exists $$x{b} <+delete> [variable] ok 3982 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+delete> [exception] ok 3983 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+delete> [return] ok 3984 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+delete> [variable] ok 3985 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+delete> [exception] ok 3986 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+delete> [return] ok 3987 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+delete> [variable] ok 3988 - my %x; $x{a} = 1; exists $x{b} <+delete> [exception] ok 3989 - my %x; $x{a} = 1; exists $x{b} <+delete> [return] ok 3990 - my %x; $x{a} = 1; exists $x{b} <+delete> [variable] ok 3991 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+delete> [exception] ok 3992 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+delete> [return] ok 3993 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+delete> [variable] ok 3994 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+delete> [exception] ok 3995 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+delete> [return] ok 3996 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+delete> [variable] ok 3997 - my $x; $x->{a} = 1; exists $x->{a} <+store> [exception] ok 3998 - my $x; $x->{a} = 1; exists $x->{a} <+store> [return] ok 3999 - my $x; $x->{a} = 1; exists $x->{a} <+store> [variable] ok 4000 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+store> [exception] ok 4001 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+store> [return] ok 4002 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+store> [variable] ok 4003 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+store> [exception] ok 4004 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+store> [return] ok 4005 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+store> [variable] ok 4006 - my $x; $x->{a} = 1; exists $$x{a} <+store> [exception] ok 4007 - my $x; $x->{a} = 1; exists $$x{a} <+store> [return] ok 4008 - my $x; $x->{a} = 1; exists $$x{a} <+store> [variable] ok 4009 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+store> [exception] ok 4010 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+store> [return] ok 4011 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+store> [variable] ok 4012 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+store> [exception] ok 4013 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+store> [return] ok 4014 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+store> [variable] ok 4015 - my %x; $x{a} = 1; exists $x{a} <+store> [exception] ok 4016 - my %x; $x{a} = 1; exists $x{a} <+store> [return] ok 4017 - my %x; $x{a} = 1; exists $x{a} <+store> [variable] ok 4018 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+store> [exception] ok 4019 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+store> [return] ok 4020 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+store> [variable] ok 4021 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+store> [exception] ok 4022 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+store> [return] ok 4023 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+store> [variable] ok 4024 - my $x; $x->{a} = 1; exists $x->{b} <+store> [exception] ok 4025 - my $x; $x->{a} = 1; exists $x->{b} <+store> [return] ok 4026 - my $x; $x->{a} = 1; exists $x->{b} <+store> [variable] ok 4027 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+store> [exception] ok 4028 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+store> [return] ok 4029 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+store> [variable] ok 4030 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+store> [exception] ok 4031 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+store> [return] ok 4032 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+store> [variable] ok 4033 - my $x; $x->{a} = 1; exists $$x{b} <+store> [exception] ok 4034 - my $x; $x->{a} = 1; exists $$x{b} <+store> [return] ok 4035 - my $x; $x->{a} = 1; exists $$x{b} <+store> [variable] ok 4036 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+store> [exception] ok 4037 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+store> [return] ok 4038 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+store> [variable] ok 4039 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+store> [exception] ok 4040 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+store> [return] ok 4041 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+store> [variable] ok 4042 - my %x; $x{a} = 1; exists $x{b} <+store> [exception] ok 4043 - my %x; $x{a} = 1; exists $x{b} <+store> [return] ok 4044 - my %x; $x{a} = 1; exists $x{b} <+store> [variable] ok 4045 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+store> [exception] ok 4046 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+store> [return] ok 4047 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+store> [variable] ok 4048 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+store> [exception] ok 4049 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+store> [return] ok 4050 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+store> [variable] ok 4051 - my $x; $x->{a} = 1; exists $x->{a} <+strict +fetch> [exception] ok 4052 - my $x; $x->{a} = 1; exists $x->{a} <+strict +fetch> [return] ok 4053 - my $x; $x->{a} = 1; exists $x->{a} <+strict +fetch> [variable] ok 4054 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +fetch> [exception] ok 4055 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +fetch> [return] ok 4056 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +fetch> [variable] ok 4057 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +fetch> [exception] ok 4058 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +fetch> [return] ok 4059 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +fetch> [variable] ok 4060 - my $x; $x->{a} = 1; exists $$x{a} <+strict +fetch> [exception] ok 4061 - my $x; $x->{a} = 1; exists $$x{a} <+strict +fetch> [return] ok 4062 - my $x; $x->{a} = 1; exists $$x{a} <+strict +fetch> [variable] ok 4063 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +fetch> [exception] ok 4064 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +fetch> [return] ok 4065 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +fetch> [variable] ok 4066 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +fetch> [exception] ok 4067 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +fetch> [return] ok 4068 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +fetch> [variable] ok 4069 - my %x; $x{a} = 1; exists $x{a} <+strict +fetch> [exception] ok 4070 - my %x; $x{a} = 1; exists $x{a} <+strict +fetch> [return] ok 4071 - my %x; $x{a} = 1; exists $x{a} <+strict +fetch> [variable] ok 4072 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +fetch> [exception] ok 4073 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +fetch> [return] ok 4074 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +fetch> [variable] ok 4075 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +fetch> [exception] ok 4076 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +fetch> [return] ok 4077 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +fetch> [variable] ok 4078 - my $x; $x->{a} = 1; exists $x->{b} <+strict +fetch> [exception] ok 4079 - my $x; $x->{a} = 1; exists $x->{b} <+strict +fetch> [return] ok 4080 - my $x; $x->{a} = 1; exists $x->{b} <+strict +fetch> [variable] ok 4081 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +fetch> [exception] ok 4082 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +fetch> [return] ok 4083 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +fetch> [variable] ok 4084 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +fetch> [exception] ok 4085 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +fetch> [return] ok 4086 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +fetch> [variable] ok 4087 - my $x; $x->{a} = 1; exists $$x{b} <+strict +fetch> [exception] ok 4088 - my $x; $x->{a} = 1; exists $$x{b} <+strict +fetch> [return] ok 4089 - my $x; $x->{a} = 1; exists $$x{b} <+strict +fetch> [variable] ok 4090 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +fetch> [exception] ok 4091 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +fetch> [return] ok 4092 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +fetch> [variable] ok 4093 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +fetch> [exception] ok 4094 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +fetch> [return] ok 4095 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +fetch> [variable] ok 4096 - my %x; $x{a} = 1; exists $x{b} <+strict +fetch> [exception] ok 4097 - my %x; $x{a} = 1; exists $x{b} <+strict +fetch> [return] ok 4098 - my %x; $x{a} = 1; exists $x{b} <+strict +fetch> [variable] ok 4099 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +fetch> [exception] ok 4100 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +fetch> [return] ok 4101 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +fetch> [variable] ok 4102 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +fetch> [exception] ok 4103 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +fetch> [return] ok 4104 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +fetch> [variable] ok 4105 - my $x; $x->{a} = 1; exists $x->{a} <+strict +exists> [exception] ok 4106 - my $x; $x->{a} = 1; exists $x->{a} <+strict +exists> [return] ok 4107 - my $x; $x->{a} = 1; exists $x->{a} <+strict +exists> [variable] ok 4108 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +exists> [exception] ok 4109 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +exists> [return] ok 4110 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +exists> [variable] ok 4111 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +exists> [exception] ok 4112 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +exists> [return] ok 4113 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +exists> [variable] ok 4114 - my $x; $x->{a} = 1; exists $$x{a} <+strict +exists> [exception] ok 4115 - my $x; $x->{a} = 1; exists $$x{a} <+strict +exists> [return] ok 4116 - my $x; $x->{a} = 1; exists $$x{a} <+strict +exists> [variable] ok 4117 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +exists> [exception] ok 4118 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +exists> [return] ok 4119 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +exists> [variable] ok 4120 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +exists> [exception] ok 4121 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +exists> [return] ok 4122 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +exists> [variable] ok 4123 - my %x; $x{a} = 1; exists $x{a} <+strict +exists> [exception] ok 4124 - my %x; $x{a} = 1; exists $x{a} <+strict +exists> [return] ok 4125 - my %x; $x{a} = 1; exists $x{a} <+strict +exists> [variable] ok 4126 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +exists> [exception] ok 4127 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +exists> [return] ok 4128 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +exists> [variable] ok 4129 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +exists> [exception] ok 4130 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +exists> [return] ok 4131 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +exists> [variable] ok 4132 - my $x; $x->{a} = 1; exists $x->{b} <+strict +exists> [exception] ok 4133 - my $x; $x->{a} = 1; exists $x->{b} <+strict +exists> [return] ok 4134 - my $x; $x->{a} = 1; exists $x->{b} <+strict +exists> [variable] ok 4135 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +exists> [exception] ok 4136 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +exists> [return] ok 4137 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +exists> [variable] ok 4138 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +exists> [exception] ok 4139 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +exists> [return] ok 4140 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +exists> [variable] ok 4141 - my $x; $x->{a} = 1; exists $$x{b} <+strict +exists> [exception] ok 4142 - my $x; $x->{a} = 1; exists $$x{b} <+strict +exists> [return] ok 4143 - my $x; $x->{a} = 1; exists $$x{b} <+strict +exists> [variable] ok 4144 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +exists> [exception] ok 4145 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +exists> [return] ok 4146 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +exists> [variable] ok 4147 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +exists> [exception] ok 4148 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +exists> [return] ok 4149 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +exists> [variable] ok 4150 - my %x; $x{a} = 1; exists $x{b} <+strict +exists> [exception] ok 4151 - my %x; $x{a} = 1; exists $x{b} <+strict +exists> [return] ok 4152 - my %x; $x{a} = 1; exists $x{b} <+strict +exists> [variable] ok 4153 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +exists> [exception] ok 4154 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +exists> [return] ok 4155 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +exists> [variable] ok 4156 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +exists> [exception] ok 4157 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +exists> [return] ok 4158 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +exists> [variable] ok 4159 - my $x; $x->{a} = 1; exists $x->{a} <+strict +delete> [exception] ok 4160 - my $x; $x->{a} = 1; exists $x->{a} <+strict +delete> [return] ok 4161 - my $x; $x->{a} = 1; exists $x->{a} <+strict +delete> [variable] ok 4162 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +delete> [exception] ok 4163 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +delete> [return] ok 4164 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +delete> [variable] ok 4165 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +delete> [exception] ok 4166 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +delete> [return] ok 4167 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +delete> [variable] ok 4168 - my $x; $x->{a} = 1; exists $$x{a} <+strict +delete> [exception] ok 4169 - my $x; $x->{a} = 1; exists $$x{a} <+strict +delete> [return] ok 4170 - my $x; $x->{a} = 1; exists $$x{a} <+strict +delete> [variable] ok 4171 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +delete> [exception] ok 4172 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +delete> [return] ok 4173 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +delete> [variable] ok 4174 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +delete> [exception] ok 4175 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +delete> [return] ok 4176 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +delete> [variable] ok 4177 - my %x; $x{a} = 1; exists $x{a} <+strict +delete> [exception] ok 4178 - my %x; $x{a} = 1; exists $x{a} <+strict +delete> [return] ok 4179 - my %x; $x{a} = 1; exists $x{a} <+strict +delete> [variable] ok 4180 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +delete> [exception] ok 4181 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +delete> [return] ok 4182 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +delete> [variable] ok 4183 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +delete> [exception] ok 4184 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +delete> [return] ok 4185 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +delete> [variable] ok 4186 - my $x; $x->{a} = 1; exists $x->{b} <+strict +delete> [exception] ok 4187 - my $x; $x->{a} = 1; exists $x->{b} <+strict +delete> [return] ok 4188 - my $x; $x->{a} = 1; exists $x->{b} <+strict +delete> [variable] ok 4189 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +delete> [exception] ok 4190 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +delete> [return] ok 4191 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +delete> [variable] ok 4192 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +delete> [exception] ok 4193 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +delete> [return] ok 4194 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +delete> [variable] ok 4195 - my $x; $x->{a} = 1; exists $$x{b} <+strict +delete> [exception] ok 4196 - my $x; $x->{a} = 1; exists $$x{b} <+strict +delete> [return] ok 4197 - my $x; $x->{a} = 1; exists $$x{b} <+strict +delete> [variable] ok 4198 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +delete> [exception] ok 4199 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +delete> [return] ok 4200 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +delete> [variable] ok 4201 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +delete> [exception] ok 4202 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +delete> [return] ok 4203 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +delete> [variable] ok 4204 - my %x; $x{a} = 1; exists $x{b} <+strict +delete> [exception] ok 4205 - my %x; $x{a} = 1; exists $x{b} <+strict +delete> [return] ok 4206 - my %x; $x{a} = 1; exists $x{b} <+strict +delete> [variable] ok 4207 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +delete> [exception] ok 4208 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +delete> [return] ok 4209 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +delete> [variable] ok 4210 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +delete> [exception] ok 4211 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +delete> [return] ok 4212 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +delete> [variable] ok 4213 - my $x; $x->{a} = 1; exists $x->{a} <+strict +store> [exception] ok 4214 - my $x; $x->{a} = 1; exists $x->{a} <+strict +store> [return] ok 4215 - my $x; $x->{a} = 1; exists $x->{a} <+strict +store> [variable] ok 4216 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +store> [exception] ok 4217 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +store> [return] ok 4218 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +store> [variable] ok 4219 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +store> [exception] ok 4220 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +store> [return] ok 4221 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +store> [variable] ok 4222 - my $x; $x->{a} = 1; exists $$x{a} <+strict +store> [exception] ok 4223 - my $x; $x->{a} = 1; exists $$x{a} <+strict +store> [return] ok 4224 - my $x; $x->{a} = 1; exists $$x{a} <+strict +store> [variable] ok 4225 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +store> [exception] ok 4226 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +store> [return] ok 4227 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +store> [variable] ok 4228 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +store> [exception] ok 4229 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +store> [return] ok 4230 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +store> [variable] ok 4231 - my %x; $x{a} = 1; exists $x{a} <+strict +store> [exception] ok 4232 - my %x; $x{a} = 1; exists $x{a} <+strict +store> [return] ok 4233 - my %x; $x{a} = 1; exists $x{a} <+strict +store> [variable] ok 4234 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +store> [exception] ok 4235 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +store> [return] ok 4236 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +store> [variable] ok 4237 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +store> [exception] ok 4238 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +store> [return] ok 4239 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +store> [variable] ok 4240 - my $x; $x->{a} = 1; exists $x->{b} <+strict +store> [exception] ok 4241 - my $x; $x->{a} = 1; exists $x->{b} <+strict +store> [return] ok 4242 - my $x; $x->{a} = 1; exists $x->{b} <+strict +store> [variable] ok 4243 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +store> [exception] ok 4244 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +store> [return] ok 4245 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +store> [variable] ok 4246 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +store> [exception] ok 4247 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +store> [return] ok 4248 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +store> [variable] ok 4249 - my $x; $x->{a} = 1; exists $$x{b} <+strict +store> [exception] ok 4250 - my $x; $x->{a} = 1; exists $$x{b} <+strict +store> [return] ok 4251 - my $x; $x->{a} = 1; exists $$x{b} <+strict +store> [variable] ok 4252 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +store> [exception] ok 4253 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +store> [return] ok 4254 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +store> [variable] ok 4255 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +store> [exception] ok 4256 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +store> [return] ok 4257 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +store> [variable] ok 4258 - my %x; $x{a} = 1; exists $x{b} <+strict +store> [exception] ok 4259 - my %x; $x{a} = 1; exists $x{b} <+strict +store> [return] ok 4260 - my %x; $x{a} = 1; exists $x{b} <+strict +store> [variable] ok 4261 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +store> [exception] ok 4262 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +store> [return] ok 4263 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +store> [variable] ok 4264 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +store> [exception] ok 4265 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +store> [return] ok 4266 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +store> [variable] ok 4267 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [exception] ok 4268 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [return] ok 4269 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [variable] ok 4270 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [exception] ok 4271 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [return] ok 4272 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [variable] ok 4273 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [exception] ok 4274 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [return] ok 4275 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [variable] ok 4276 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [exception] ok 4277 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [return] ok 4278 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [variable] ok 4279 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [exception] ok 4280 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [return] ok 4281 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [variable] ok 4282 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [exception] ok 4283 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [return] ok 4284 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [variable] ok 4285 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [exception] ok 4286 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [return] ok 4287 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [variable] ok 4288 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [exception] ok 4289 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [return] ok 4290 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [variable] ok 4291 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [exception] ok 4292 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [return] ok 4293 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [variable] ok 4294 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [exception] ok 4295 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [return] ok 4296 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [variable] ok 4297 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [exception] ok 4298 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [return] ok 4299 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [variable] ok 4300 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [exception] ok 4301 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [return] ok 4302 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [variable] ok 4303 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [exception] ok 4304 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [return] ok 4305 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [variable] ok 4306 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [exception] ok 4307 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [return] ok 4308 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [variable] ok 4309 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [exception] ok 4310 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [return] ok 4311 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [variable] ok 4312 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [exception] ok 4313 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [return] ok 4314 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [variable] ok 4315 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [exception] ok 4316 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [return] ok 4317 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [variable] ok 4318 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [exception] ok 4319 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [return] ok 4320 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [variable] ok 4321 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [exception] ok 4322 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [return] ok 4323 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [variable] ok 4324 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [exception] ok 4325 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [return] ok 4326 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [variable] ok 4327 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [exception] ok 4328 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [return] ok 4329 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [variable] ok 4330 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [exception] ok 4331 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [return] ok 4332 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [variable] ok 4333 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [exception] ok 4334 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [return] ok 4335 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [variable] ok 4336 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [exception] ok 4337 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [return] ok 4338 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [variable] ok 4339 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [exception] ok 4340 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [return] ok 4341 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [variable] ok 4342 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [exception] ok 4343 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [return] ok 4344 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [variable] ok 4345 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [exception] ok 4346 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [return] ok 4347 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [variable] ok 4348 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [exception] ok 4349 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [return] ok 4350 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [variable] ok 4351 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [exception] ok 4352 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [return] ok 4353 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [variable] ok 4354 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [exception] ok 4355 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [return] ok 4356 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [variable] ok 4357 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [exception] ok 4358 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [return] ok 4359 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [variable] ok 4360 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [exception] ok 4361 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [return] ok 4362 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [variable] ok 4363 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [exception] ok 4364 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [return] ok 4365 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [variable] ok 4366 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [exception] ok 4367 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [return] ok 4368 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [variable] ok 4369 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [exception] ok 4370 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [return] ok 4371 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [variable] ok 4372 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [exception] ok 4373 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [return] ok 4374 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [variable] ok 4375 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [exception] ok 4376 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [return] ok 4377 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [variable] ok 4378 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [exception] ok 4379 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [return] ok 4380 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [variable] ok 4381 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [exception] ok 4382 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [return] ok 4383 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [variable] ok 4384 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [exception] ok 4385 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [return] ok 4386 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [variable] ok 4387 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [exception] ok 4388 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [return] ok 4389 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [variable] ok 4390 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [exception] ok 4391 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [return] ok 4392 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [variable] ok 4393 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [exception] ok 4394 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [return] ok 4395 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [variable] ok 4396 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [exception] ok 4397 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [return] ok 4398 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [variable] ok 4399 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [exception] ok 4400 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [return] ok 4401 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [variable] ok 4402 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [exception] ok 4403 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [return] ok 4404 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [variable] ok 4405 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [exception] ok 4406 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [return] ok 4407 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [variable] ok 4408 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [exception] ok 4409 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [return] ok 4410 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [variable] ok 4411 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [exception] ok 4412 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [return] ok 4413 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [variable] ok 4414 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [exception] ok 4415 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [return] ok 4416 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [variable] ok 4417 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [exception] ok 4418 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [return] ok 4419 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [variable] ok 4420 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [exception] ok 4421 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [return] ok 4422 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [variable] ok 4423 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [exception] ok 4424 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [return] ok 4425 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [variable] ok 4426 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [exception] ok 4427 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [return] ok 4428 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [variable] ok 4429 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [exception] ok 4430 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [return] ok 4431 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [variable] ok 4432 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [exception] ok 4433 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [return] ok 4434 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [variable] ok 4435 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [exception] ok 4436 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [return] ok 4437 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [variable] ok 4438 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [exception] ok 4439 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [return] ok 4440 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [variable] ok 4441 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [exception] ok 4442 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [return] ok 4443 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [variable] ok 4444 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [exception] ok 4445 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [return] ok 4446 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [variable] ok 4447 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [exception] ok 4448 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [return] ok 4449 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [variable] ok 4450 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [exception] ok 4451 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [return] ok 4452 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [variable] ok 4453 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [exception] ok 4454 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [return] ok 4455 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [variable] ok 4456 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [exception] ok 4457 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [return] ok 4458 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [variable] ok 4459 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [exception] ok 4460 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [return] ok 4461 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [variable] ok 4462 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [exception] ok 4463 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [return] ok 4464 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [variable] ok 4465 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [exception] ok 4466 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [return] ok 4467 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [variable] ok 4468 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [exception] ok 4469 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [return] ok 4470 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [variable] ok 4471 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [exception] ok 4472 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [return] ok 4473 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [variable] ok 4474 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [exception] ok 4475 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [return] ok 4476 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [variable] ok 4477 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [exception] ok 4478 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [return] ok 4479 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [variable] ok 4480 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [exception] ok 4481 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [return] ok 4482 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [variable] ok 4483 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [exception] ok 4484 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [return] ok 4485 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [variable] ok 4486 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [exception] ok 4487 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [return] ok 4488 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [variable] ok 4489 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [exception] ok 4490 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [return] ok 4491 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [variable] ok 4492 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [exception] ok 4493 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [return] ok 4494 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [variable] ok 4495 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [exception] ok 4496 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [return] ok 4497 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [variable] ok 4498 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [exception] ok 4499 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [return] ok 4500 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [variable] ok 4501 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [exception] ok 4502 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [return] ok 4503 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [variable] ok 4504 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [exception] ok 4505 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [return] ok 4506 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [variable] ok 4507 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [exception] ok 4508 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [return] ok 4509 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [variable] ok 4510 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [exception] ok 4511 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [return] ok 4512 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [variable] ok 4513 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [exception] ok 4514 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [return] ok 4515 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [variable] ok 4516 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [exception] ok 4517 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [return] ok 4518 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [variable] ok 4519 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [exception] ok 4520 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [return] ok 4521 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [variable] ok 4522 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [exception] ok 4523 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [return] ok 4524 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [variable] ok 4525 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [exception] ok 4526 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [return] ok 4527 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [variable] ok 4528 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [exception] ok 4529 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [return] ok 4530 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [variable] ok 4531 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [exception] ok 4532 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [return] ok 4533 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [variable] ok 4534 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [exception] ok 4535 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [return] ok 4536 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [variable] ok 4537 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [exception] ok 4538 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [return] ok 4539 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [variable] ok 4540 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [exception] ok 4541 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [return] ok 4542 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [variable] ok 4543 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [exception] ok 4544 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [return] ok 4545 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [variable] ok 4546 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [exception] ok 4547 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [return] ok 4548 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [variable] ok 4549 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [exception] ok 4550 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [return] ok 4551 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [variable] ok 4552 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [exception] ok 4553 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [return] ok 4554 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [variable] ok 4555 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [exception] ok 4556 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [return] ok 4557 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [variable] ok 4558 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [exception] ok 4559 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [return] ok 4560 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [variable] ok 4561 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [exception] ok 4562 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [return] ok 4563 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [variable] ok 4564 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [exception] ok 4565 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [return] ok 4566 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [variable] ok 4567 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [exception] ok 4568 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [return] ok 4569 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [variable] ok 4570 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [exception] ok 4571 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [return] ok 4572 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [variable] ok 4573 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [exception] ok 4574 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [return] ok 4575 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [variable] ok 4576 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [exception] ok 4577 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [return] ok 4578 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [variable] ok 4579 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [exception] ok 4580 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [return] ok 4581 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [variable] ok 4582 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [exception] ok 4583 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [return] ok 4584 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [variable] ok 4585 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [exception] ok 4586 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [return] ok 4587 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [variable] ok 4588 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [exception] ok 4589 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [return] ok 4590 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [variable] ok 4591 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [exception] ok 4592 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [return] ok 4593 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [variable] ok 4594 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [exception] ok 4595 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [return] ok 4596 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [variable] ok 4597 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [exception] ok 4598 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [return] ok 4599 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [variable] ok 4600 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [exception] ok 4601 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [return] ok 4602 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [variable] ok 4603 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [exception] ok 4604 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [return] ok 4605 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [variable] ok 4606 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [exception] ok 4607 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [return] ok 4608 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [variable] ok 4609 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [exception] ok 4610 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [return] ok 4611 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [variable] ok 4612 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [exception] ok 4613 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [return] ok 4614 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [variable] ok 4615 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [exception] ok 4616 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [return] ok 4617 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [variable] ok 4618 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [exception] ok 4619 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [return] ok 4620 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [variable] ok 4621 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [exception] ok 4622 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [return] ok 4623 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [variable] ok 4624 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [exception] ok 4625 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [return] ok 4626 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [variable] ok 4627 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [exception] ok 4628 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [return] ok 4629 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [variable] ok 4630 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [exception] ok 4631 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [return] ok 4632 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [variable] ok 4633 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [exception] ok 4634 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [return] ok 4635 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [variable] ok 4636 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [exception] ok 4637 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [return] ok 4638 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [variable] ok 4639 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [exception] ok 4640 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [return] ok 4641 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [variable] ok 4642 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [exception] ok 4643 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [return] ok 4644 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [variable] ok 4645 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [exception] ok 4646 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [return] ok 4647 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [variable] ok 4648 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [exception] ok 4649 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [return] ok 4650 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [variable] ok 4651 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [exception] ok 4652 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [return] ok 4653 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [variable] ok 4654 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [exception] ok 4655 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [return] ok 4656 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [variable] ok 4657 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [exception] ok 4658 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [return] ok 4659 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [variable] ok 4660 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [exception] ok 4661 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [return] ok 4662 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [variable] ok 4663 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [exception] ok 4664 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [return] ok 4665 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [variable] ok 4666 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [exception] ok 4667 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [return] ok 4668 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [variable] ok 4669 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [exception] ok 4670 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [return] ok 4671 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [variable] ok 4672 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [exception] ok 4673 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [return] ok 4674 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [variable] ok 4675 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [exception] ok 4676 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [return] ok 4677 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [variable] ok 4678 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [exception] ok 4679 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [return] ok 4680 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [variable] ok 4681 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [exception] ok 4682 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [return] ok 4683 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [variable] ok 4684 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [exception] ok 4685 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [return] ok 4686 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [variable] ok 4687 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [exception] ok 4688 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [return] ok 4689 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [variable] ok 4690 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [exception] ok 4691 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [return] ok 4692 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [variable] ok 4693 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [exception] ok 4694 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [return] ok 4695 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [variable] ok 4696 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [exception] ok 4697 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [return] ok 4698 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [variable] ok 4699 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [exception] ok 4700 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [return] ok 4701 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [variable] ok 4702 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [exception] ok 4703 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [return] ok 4704 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [variable] ok 4705 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [exception] ok 4706 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [return] ok 4707 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [variable] ok 4708 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [exception] ok 4709 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [return] ok 4710 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [variable] ok 4711 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [exception] ok 4712 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [return] ok 4713 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [variable] ok 4714 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [exception] ok 4715 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [return] ok 4716 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [variable] ok 4717 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [exception] ok 4718 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [return] ok 4719 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [variable] ok 4720 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [exception] ok 4721 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [return] ok 4722 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [variable] ok 4723 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [exception] ok 4724 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [return] ok 4725 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [variable] ok 4726 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [exception] ok 4727 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [return] ok 4728 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [variable] ok 4729 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [exception] ok 4730 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [return] ok 4731 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [variable] ok 4732 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [exception] ok 4733 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [return] ok 4734 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [variable] ok 4735 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [exception] ok 4736 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [return] ok 4737 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [variable] ok 4738 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [exception] ok 4739 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [return] ok 4740 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [variable] ok 4741 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [exception] ok 4742 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [return] ok 4743 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [variable] ok 4744 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [exception] ok 4745 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [return] ok 4746 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [variable] ok 4747 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [exception] ok 4748 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [return] ok 4749 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [variable] ok 4750 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [exception] ok 4751 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [return] ok 4752 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [variable] ok 4753 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [exception] ok 4754 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [return] ok 4755 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [variable] ok 4756 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [exception] ok 4757 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [return] ok 4758 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [variable] ok 4759 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [exception] ok 4760 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [return] ok 4761 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [variable] ok 4762 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [exception] ok 4763 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [return] ok 4764 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [variable] ok 4765 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [exception] ok 4766 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [return] ok 4767 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [variable] ok 4768 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [exception] ok 4769 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [return] ok 4770 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [variable] ok 4771 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [exception] ok 4772 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [return] ok 4773 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [variable] ok 4774 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [exception] ok 4775 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [return] ok 4776 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [variable] ok 4777 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [exception] ok 4778 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [return] ok 4779 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [variable] ok 4780 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [exception] ok 4781 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [return] ok 4782 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [variable] ok 4783 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [exception] ok 4784 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [return] ok 4785 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [variable] ok 4786 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [exception] ok 4787 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [return] ok 4788 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [variable] ok 4789 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [exception] ok 4790 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [return] ok 4791 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [variable] ok 4792 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [exception] ok 4793 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [return] ok 4794 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [variable] ok 4795 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [exception] ok 4796 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [return] ok 4797 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [variable] ok 4798 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [exception] ok 4799 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [return] ok 4800 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [variable] ok 4801 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [exception] ok 4802 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [return] ok 4803 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [variable] ok 4804 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [exception] ok 4805 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [return] ok 4806 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [variable] ok 4807 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [exception] ok 4808 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [return] ok 4809 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [variable] ok 4810 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [exception] ok 4811 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [return] ok 4812 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [variable] ok 4813 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [exception] ok 4814 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [return] ok 4815 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [variable] ok 4816 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [exception] ok 4817 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [return] ok 4818 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [variable] ok 4819 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [exception] ok 4820 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [return] ok 4821 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [variable] ok 4822 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [exception] ok 4823 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [return] ok 4824 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [variable] ok 4825 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [exception] ok 4826 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [return] ok 4827 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [variable] ok 4828 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [exception] ok 4829 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [return] ok 4830 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [variable] ok 4831 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [exception] ok 4832 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [return] ok 4833 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [variable] ok 4834 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [exception] ok 4835 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [return] ok 4836 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [variable] ok 4837 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [exception] ok 4838 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [return] ok 4839 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [variable] ok 4840 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [exception] ok 4841 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [return] ok 4842 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [variable] ok 4843 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [exception] ok 4844 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [return] ok 4845 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [variable] ok 4846 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [exception] ok 4847 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [return] ok 4848 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [variable] ok 4849 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [exception] ok 4850 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [return] ok 4851 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [variable] ok 4852 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [exception] ok 4853 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [return] ok 4854 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [variable] ok 4855 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [exception] ok 4856 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [return] ok 4857 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [variable] ok 4858 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [exception] ok 4859 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [return] ok 4860 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [variable] ok 4861 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [exception] ok 4862 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [return] ok 4863 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [variable] ok 4864 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [exception] ok 4865 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [return] ok 4866 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [variable] ok 4867 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [exception] ok 4868 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [return] ok 4869 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [variable] ok 4870 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [exception] ok 4871 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [return] ok 4872 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [variable] ok 4873 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [exception] ok 4874 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [return] ok 4875 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [variable] ok 4876 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [exception] ok 4877 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [return] ok 4878 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [variable] ok 4879 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [exception] ok 4880 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [return] ok 4881 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [variable] ok 4882 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [exception] ok 4883 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [return] ok 4884 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [variable] ok 4885 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [exception] ok 4886 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [return] ok 4887 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [variable] ok 4888 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [exception] ok 4889 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [return] ok 4890 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [variable] ok 4891 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [exception] ok 4892 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [return] ok 4893 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [variable] ok 4894 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [exception] ok 4895 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [return] ok 4896 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [variable] ok 4897 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [exception] ok 4898 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [return] ok 4899 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [variable] ok 4900 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [exception] ok 4901 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [return] ok 4902 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [variable] ok 4903 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [exception] ok 4904 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [return] ok 4905 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [variable] ok 4906 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [exception] ok 4907 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [return] ok 4908 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [variable] ok 4909 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [exception] ok 4910 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [return] ok 4911 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [variable] ok 4912 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [exception] ok 4913 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [return] ok 4914 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [variable] ok 4915 - my $x; delete $x->{a} [exception] ok 4916 - my $x; delete $x->{a} [return] ok 4917 - my $x; delete $x->{a} [variable] ok 4918 - our $x; local $x; use strict; delete $x->{a} [exception] ok 4919 - our $x; local $x; use strict; delete $x->{a} [return] ok 4920 - our $x; local $x; use strict; delete $x->{a} [variable] ok 4921 - our $x; local $x; no strict; delete $x->{a} [exception] ok 4922 - our $x; local $x; no strict; delete $x->{a} [return] ok 4923 - our $x; local $x; no strict; delete $x->{a} [variable] ok 4924 - my $x; delete $$x{a} [exception] ok 4925 - my $x; delete $$x{a} [return] ok 4926 - my $x; delete $$x{a} [variable] ok 4927 - our $x; local $x; use strict; delete $$x{a} [exception] ok 4928 - our $x; local $x; use strict; delete $$x{a} [return] ok 4929 - our $x; local $x; use strict; delete $$x{a} [variable] ok 4930 - our $x; local $x; no strict; delete $$x{a} [exception] ok 4931 - our $x; local $x; no strict; delete $$x{a} [return] ok 4932 - our $x; local $x; no strict; delete $$x{a} [variable] ok 4933 - my %x; delete $x{a} [exception] ok 4934 - my %x; delete $x{a} [return] ok 4935 - my %x; delete $x{a} [variable] ok 4936 - our %x; local %x; use strict; delete $x{a} [exception] ok 4937 - our %x; local %x; use strict; delete $x{a} [return] ok 4938 - our %x; local %x; use strict; delete $x{a} [variable] ok 4939 - our %x; local %x; no strict; delete $x{a} [exception] ok 4940 - our %x; local %x; no strict; delete $x{a} [return] ok 4941 - our %x; local %x; no strict; delete $x{a} [variable] ok 4942 - my $x; delete $x->{a} [exception] ok 4943 - my $x; delete $x->{a} [return] ok 4944 - my $x; delete $x->{a} [variable] ok 4945 - our $x; local $x; use strict; delete $x->{a} [exception] ok 4946 - our $x; local $x; use strict; delete $x->{a} [return] ok 4947 - our $x; local $x; use strict; delete $x->{a} [variable] ok 4948 - our $x; local $x; no strict; delete $x->{a} [exception] ok 4949 - our $x; local $x; no strict; delete $x->{a} [return] ok 4950 - our $x; local $x; no strict; delete $x->{a} [variable] ok 4951 - my $x; delete $$x{a} [exception] ok 4952 - my $x; delete $$x{a} [return] ok 4953 - my $x; delete $$x{a} [variable] ok 4954 - our $x; local $x; use strict; delete $$x{a} [exception] ok 4955 - our $x; local $x; use strict; delete $$x{a} [return] ok 4956 - our $x; local $x; use strict; delete $$x{a} [variable] ok 4957 - our $x; local $x; no strict; delete $$x{a} [exception] ok 4958 - our $x; local $x; no strict; delete $$x{a} [return] ok 4959 - our $x; local $x; no strict; delete $$x{a} [variable] ok 4960 - my %x; delete $x{a} [exception] ok 4961 - my %x; delete $x{a} [return] ok 4962 - my %x; delete $x{a} [variable] ok 4963 - our %x; local %x; use strict; delete $x{a} [exception] ok 4964 - our %x; local %x; use strict; delete $x{a} [return] ok 4965 - our %x; local %x; use strict; delete $x{a} [variable] ok 4966 - our %x; local %x; no strict; delete $x{a} [exception] ok 4967 - our %x; local %x; no strict; delete $x{a} [return] ok 4968 - our %x; local %x; no strict; delete $x{a} [variable] ok 4969 - my $x; delete $x->{a} <+fetch> [exception] ok 4970 - my $x; delete $x->{a} <+fetch> [return] ok 4971 - my $x; delete $x->{a} <+fetch> [variable] ok 4972 - our $x; local $x; use strict; delete $x->{a} <+fetch> [exception] ok 4973 - our $x; local $x; use strict; delete $x->{a} <+fetch> [return] ok 4974 - our $x; local $x; use strict; delete $x->{a} <+fetch> [variable] ok 4975 - our $x; local $x; no strict; delete $x->{a} <+fetch> [exception] ok 4976 - our $x; local $x; no strict; delete $x->{a} <+fetch> [return] ok 4977 - our $x; local $x; no strict; delete $x->{a} <+fetch> [variable] ok 4978 - my $x; delete $$x{a} <+fetch> [exception] ok 4979 - my $x; delete $$x{a} <+fetch> [return] ok 4980 - my $x; delete $$x{a} <+fetch> [variable] ok 4981 - our $x; local $x; use strict; delete $$x{a} <+fetch> [exception] ok 4982 - our $x; local $x; use strict; delete $$x{a} <+fetch> [return] ok 4983 - our $x; local $x; use strict; delete $$x{a} <+fetch> [variable] ok 4984 - our $x; local $x; no strict; delete $$x{a} <+fetch> [exception] ok 4985 - our $x; local $x; no strict; delete $$x{a} <+fetch> [return] ok 4986 - our $x; local $x; no strict; delete $$x{a} <+fetch> [variable] ok 4987 - my %x; delete $x{a} <+fetch> [exception] ok 4988 - my %x; delete $x{a} <+fetch> [return] ok 4989 - my %x; delete $x{a} <+fetch> [variable] ok 4990 - our %x; local %x; use strict; delete $x{a} <+fetch> [exception] ok 4991 - our %x; local %x; use strict; delete $x{a} <+fetch> [return] ok 4992 - our %x; local %x; use strict; delete $x{a} <+fetch> [variable] ok 4993 - our %x; local %x; no strict; delete $x{a} <+fetch> [exception] ok 4994 - our %x; local %x; no strict; delete $x{a} <+fetch> [return] ok 4995 - our %x; local %x; no strict; delete $x{a} <+fetch> [variable] ok 4996 - my $x; delete $x->{a} <+exists> [exception] ok 4997 - my $x; delete $x->{a} <+exists> [return] ok 4998 - my $x; delete $x->{a} <+exists> [variable] ok 4999 - our $x; local $x; use strict; delete $x->{a} <+exists> [exception] ok 5000 - our $x; local $x; use strict; delete $x->{a} <+exists> [return] ok 5001 - our $x; local $x; use strict; delete $x->{a} <+exists> [variable] ok 5002 - our $x; local $x; no strict; delete $x->{a} <+exists> [exception] ok 5003 - our $x; local $x; no strict; delete $x->{a} <+exists> [return] ok 5004 - our $x; local $x; no strict; delete $x->{a} <+exists> [variable] ok 5005 - my $x; delete $$x{a} <+exists> [exception] ok 5006 - my $x; delete $$x{a} <+exists> [return] ok 5007 - my $x; delete $$x{a} <+exists> [variable] ok 5008 - our $x; local $x; use strict; delete $$x{a} <+exists> [exception] ok 5009 - our $x; local $x; use strict; delete $$x{a} <+exists> [return] ok 5010 - our $x; local $x; use strict; delete $$x{a} <+exists> [variable] ok 5011 - our $x; local $x; no strict; delete $$x{a} <+exists> [exception] ok 5012 - our $x; local $x; no strict; delete $$x{a} <+exists> [return] ok 5013 - our $x; local $x; no strict; delete $$x{a} <+exists> [variable] ok 5014 - my %x; delete $x{a} <+exists> [exception] ok 5015 - my %x; delete $x{a} <+exists> [return] ok 5016 - my %x; delete $x{a} <+exists> [variable] ok 5017 - our %x; local %x; use strict; delete $x{a} <+exists> [exception] ok 5018 - our %x; local %x; use strict; delete $x{a} <+exists> [return] ok 5019 - our %x; local %x; use strict; delete $x{a} <+exists> [variable] ok 5020 - our %x; local %x; no strict; delete $x{a} <+exists> [exception] ok 5021 - our %x; local %x; no strict; delete $x{a} <+exists> [return] ok 5022 - our %x; local %x; no strict; delete $x{a} <+exists> [variable] ok 5023 - my $x; delete $x->{a} <+delete> [exception] ok 5024 - my $x; delete $x->{a} <+delete> [return] ok 5025 - my $x; delete $x->{a} <+delete> [variable] ok 5026 - our $x; local $x; use strict; delete $x->{a} <+delete> [exception] ok 5027 - our $x; local $x; use strict; delete $x->{a} <+delete> [return] ok 5028 - our $x; local $x; use strict; delete $x->{a} <+delete> [variable] ok 5029 - our $x; local $x; no strict; delete $x->{a} <+delete> [exception] ok 5030 - our $x; local $x; no strict; delete $x->{a} <+delete> [return] ok 5031 - our $x; local $x; no strict; delete $x->{a} <+delete> [variable] ok 5032 - my $x; delete $$x{a} <+delete> [exception] ok 5033 - my $x; delete $$x{a} <+delete> [return] ok 5034 - my $x; delete $$x{a} <+delete> [variable] ok 5035 - our $x; local $x; use strict; delete $$x{a} <+delete> [exception] ok 5036 - our $x; local $x; use strict; delete $$x{a} <+delete> [return] ok 5037 - our $x; local $x; use strict; delete $$x{a} <+delete> [variable] ok 5038 - our $x; local $x; no strict; delete $$x{a} <+delete> [exception] ok 5039 - our $x; local $x; no strict; delete $$x{a} <+delete> [return] ok 5040 - our $x; local $x; no strict; delete $$x{a} <+delete> [variable] ok 5041 - my %x; delete $x{a} <+delete> [exception] ok 5042 - my %x; delete $x{a} <+delete> [return] ok 5043 - my %x; delete $x{a} <+delete> [variable] ok 5044 - our %x; local %x; use strict; delete $x{a} <+delete> [exception] ok 5045 - our %x; local %x; use strict; delete $x{a} <+delete> [return] ok 5046 - our %x; local %x; use strict; delete $x{a} <+delete> [variable] ok 5047 - our %x; local %x; no strict; delete $x{a} <+delete> [exception] ok 5048 - our %x; local %x; no strict; delete $x{a} <+delete> [return] ok 5049 - our %x; local %x; no strict; delete $x{a} <+delete> [variable] ok 5050 - my $x; delete $x->{a} <+store> [exception] ok 5051 - my $x; delete $x->{a} <+store> [return] ok 5052 - my $x; delete $x->{a} <+store> [variable] ok 5053 - our $x; local $x; use strict; delete $x->{a} <+store> [exception] ok 5054 - our $x; local $x; use strict; delete $x->{a} <+store> [return] ok 5055 - our $x; local $x; use strict; delete $x->{a} <+store> [variable] ok 5056 - our $x; local $x; no strict; delete $x->{a} <+store> [exception] ok 5057 - our $x; local $x; no strict; delete $x->{a} <+store> [return] ok 5058 - our $x; local $x; no strict; delete $x->{a} <+store> [variable] ok 5059 - my $x; delete $$x{a} <+store> [exception] ok 5060 - my $x; delete $$x{a} <+store> [return] ok 5061 - my $x; delete $$x{a} <+store> [variable] ok 5062 - our $x; local $x; use strict; delete $$x{a} <+store> [exception] ok 5063 - our $x; local $x; use strict; delete $$x{a} <+store> [return] ok 5064 - our $x; local $x; use strict; delete $$x{a} <+store> [variable] ok 5065 - our $x; local $x; no strict; delete $$x{a} <+store> [exception] ok 5066 - our $x; local $x; no strict; delete $$x{a} <+store> [return] ok 5067 - our $x; local $x; no strict; delete $$x{a} <+store> [variable] ok 5068 - my %x; delete $x{a} <+store> [exception] ok 5069 - my %x; delete $x{a} <+store> [return] ok 5070 - my %x; delete $x{a} <+store> [variable] ok 5071 - our %x; local %x; use strict; delete $x{a} <+store> [exception] ok 5072 - our %x; local %x; use strict; delete $x{a} <+store> [return] ok 5073 - our %x; local %x; use strict; delete $x{a} <+store> [variable] ok 5074 - our %x; local %x; no strict; delete $x{a} <+store> [exception] ok 5075 - our %x; local %x; no strict; delete $x{a} <+store> [return] ok 5076 - our %x; local %x; no strict; delete $x{a} <+store> [variable] ok 5077 - my $x; delete $x->{a} <+strict +fetch> [exception] ok 5078 - my $x; delete $x->{a} <+strict +fetch> [return] ok 5079 - my $x; delete $x->{a} <+strict +fetch> [variable] ok 5080 - our $x; local $x; use strict; delete $x->{a} <+strict +fetch> [exception] ok 5081 - our $x; local $x; use strict; delete $x->{a} <+strict +fetch> [return] ok 5082 - our $x; local $x; use strict; delete $x->{a} <+strict +fetch> [variable] ok 5083 - our $x; local $x; no strict; delete $x->{a} <+strict +fetch> [exception] ok 5084 - our $x; local $x; no strict; delete $x->{a} <+strict +fetch> [return] ok 5085 - our $x; local $x; no strict; delete $x->{a} <+strict +fetch> [variable] ok 5086 - my $x; delete $$x{a} <+strict +fetch> [exception] ok 5087 - my $x; delete $$x{a} <+strict +fetch> [return] ok 5088 - my $x; delete $$x{a} <+strict +fetch> [variable] ok 5089 - our $x; local $x; use strict; delete $$x{a} <+strict +fetch> [exception] ok 5090 - our $x; local $x; use strict; delete $$x{a} <+strict +fetch> [return] ok 5091 - our $x; local $x; use strict; delete $$x{a} <+strict +fetch> [variable] ok 5092 - our $x; local $x; no strict; delete $$x{a} <+strict +fetch> [exception] ok 5093 - our $x; local $x; no strict; delete $$x{a} <+strict +fetch> [return] ok 5094 - our $x; local $x; no strict; delete $$x{a} <+strict +fetch> [variable] ok 5095 - my %x; delete $x{a} <+strict +fetch> [exception] ok 5096 - my %x; delete $x{a} <+strict +fetch> [return] ok 5097 - my %x; delete $x{a} <+strict +fetch> [variable] ok 5098 - our %x; local %x; use strict; delete $x{a} <+strict +fetch> [exception] ok 5099 - our %x; local %x; use strict; delete $x{a} <+strict +fetch> [return] ok 5100 - our %x; local %x; use strict; delete $x{a} <+strict +fetch> [variable] ok 5101 - our %x; local %x; no strict; delete $x{a} <+strict +fetch> [exception] ok 5102 - our %x; local %x; no strict; delete $x{a} <+strict +fetch> [return] ok 5103 - our %x; local %x; no strict; delete $x{a} <+strict +fetch> [variable] ok 5104 - my $x; delete $x->{a} <+strict +exists> [exception] ok 5105 - my $x; delete $x->{a} <+strict +exists> [return] ok 5106 - my $x; delete $x->{a} <+strict +exists> [variable] ok 5107 - our $x; local $x; use strict; delete $x->{a} <+strict +exists> [exception] ok 5108 - our $x; local $x; use strict; delete $x->{a} <+strict +exists> [return] ok 5109 - our $x; local $x; use strict; delete $x->{a} <+strict +exists> [variable] ok 5110 - our $x; local $x; no strict; delete $x->{a} <+strict +exists> [exception] ok 5111 - our $x; local $x; no strict; delete $x->{a} <+strict +exists> [return] ok 5112 - our $x; local $x; no strict; delete $x->{a} <+strict +exists> [variable] ok 5113 - my $x; delete $$x{a} <+strict +exists> [exception] ok 5114 - my $x; delete $$x{a} <+strict +exists> [return] ok 5115 - my $x; delete $$x{a} <+strict +exists> [variable] ok 5116 - our $x; local $x; use strict; delete $$x{a} <+strict +exists> [exception] ok 5117 - our $x; local $x; use strict; delete $$x{a} <+strict +exists> [return] ok 5118 - our $x; local $x; use strict; delete $$x{a} <+strict +exists> [variable] ok 5119 - our $x; local $x; no strict; delete $$x{a} <+strict +exists> [exception] ok 5120 - our $x; local $x; no strict; delete $$x{a} <+strict +exists> [return] ok 5121 - our $x; local $x; no strict; delete $$x{a} <+strict +exists> [variable] ok 5122 - my %x; delete $x{a} <+strict +exists> [exception] ok 5123 - my %x; delete $x{a} <+strict +exists> [return] ok 5124 - my %x; delete $x{a} <+strict +exists> [variable] ok 5125 - our %x; local %x; use strict; delete $x{a} <+strict +exists> [exception] ok 5126 - our %x; local %x; use strict; delete $x{a} <+strict +exists> [return] ok 5127 - our %x; local %x; use strict; delete $x{a} <+strict +exists> [variable] ok 5128 - our %x; local %x; no strict; delete $x{a} <+strict +exists> [exception] ok 5129 - our %x; local %x; no strict; delete $x{a} <+strict +exists> [return] ok 5130 - our %x; local %x; no strict; delete $x{a} <+strict +exists> [variable] ok 5131 - my $x; delete $x->{a} <+strict +delete> [exception] ok 5132 - my $x; delete $x->{a} <+strict +delete> [return] ok 5133 - my $x; delete $x->{a} <+strict +delete> [variable] ok 5134 - our $x; local $x; use strict; delete $x->{a} <+strict +delete> [exception] ok 5135 - our $x; local $x; use strict; delete $x->{a} <+strict +delete> [return] ok 5136 - our $x; local $x; use strict; delete $x->{a} <+strict +delete> [variable] ok 5137 - our $x; local $x; no strict; delete $x->{a} <+strict +delete> [exception] ok 5138 - our $x; local $x; no strict; delete $x->{a} <+strict +delete> [return] ok 5139 - our $x; local $x; no strict; delete $x->{a} <+strict +delete> [variable] ok 5140 - my $x; delete $$x{a} <+strict +delete> [exception] ok 5141 - my $x; delete $$x{a} <+strict +delete> [return] ok 5142 - my $x; delete $$x{a} <+strict +delete> [variable] ok 5143 - our $x; local $x; use strict; delete $$x{a} <+strict +delete> [exception] ok 5144 - our $x; local $x; use strict; delete $$x{a} <+strict +delete> [return] ok 5145 - our $x; local $x; use strict; delete $$x{a} <+strict +delete> [variable] ok 5146 - our $x; local $x; no strict; delete $$x{a} <+strict +delete> [exception] ok 5147 - our $x; local $x; no strict; delete $$x{a} <+strict +delete> [return] ok 5148 - our $x; local $x; no strict; delete $$x{a} <+strict +delete> [variable] ok 5149 - my %x; 1 <+strict +delete> [exception] ok 5150 - my %x; 1 <+strict +delete> [return] ok 5151 - my %x; 1 <+strict +delete> [variable] ok 5152 - our %x; local %x; use strict; 1 <+strict +delete> [exception] ok 5153 - our %x; local %x; use strict; 1 <+strict +delete> [return] ok 5154 - our %x; local %x; use strict; 1 <+strict +delete> [variable] ok 5155 - our %x; local %x; no strict; 1 <+strict +delete> [exception] ok 5156 - our %x; local %x; no strict; 1 <+strict +delete> [return] ok 5157 - our %x; local %x; no strict; 1 <+strict +delete> [variable] ok 5158 - my $x; delete $x->{a} <+strict +store> [exception] ok 5159 - my $x; delete $x->{a} <+strict +store> [return] ok 5160 - my $x; delete $x->{a} <+strict +store> [variable] ok 5161 - our $x; local $x; use strict; delete $x->{a} <+strict +store> [exception] ok 5162 - our $x; local $x; use strict; delete $x->{a} <+strict +store> [return] ok 5163 - our $x; local $x; use strict; delete $x->{a} <+strict +store> [variable] ok 5164 - our $x; local $x; no strict; delete $x->{a} <+strict +store> [exception] ok 5165 - our $x; local $x; no strict; delete $x->{a} <+strict +store> [return] ok 5166 - our $x; local $x; no strict; delete $x->{a} <+strict +store> [variable] ok 5167 - my $x; delete $$x{a} <+strict +store> [exception] ok 5168 - my $x; delete $$x{a} <+strict +store> [return] ok 5169 - my $x; delete $$x{a} <+strict +store> [variable] ok 5170 - our $x; local $x; use strict; delete $$x{a} <+strict +store> [exception] ok 5171 - our $x; local $x; use strict; delete $$x{a} <+strict +store> [return] ok 5172 - our $x; local $x; use strict; delete $$x{a} <+strict +store> [variable] ok 5173 - our $x; local $x; no strict; delete $$x{a} <+strict +store> [exception] ok 5174 - our $x; local $x; no strict; delete $$x{a} <+strict +store> [return] ok 5175 - our $x; local $x; no strict; delete $$x{a} <+strict +store> [variable] ok 5176 - my %x; delete $x{a} <+strict +store> [exception] ok 5177 - my %x; delete $x{a} <+strict +store> [return] ok 5178 - my %x; delete $x{a} <+strict +store> [variable] ok 5179 - our %x; local %x; use strict; delete $x{a} <+strict +store> [exception] ok 5180 - our %x; local %x; use strict; delete $x{a} <+strict +store> [return] ok 5181 - our %x; local %x; use strict; delete $x{a} <+strict +store> [variable] ok 5182 - our %x; local %x; no strict; delete $x{a} <+strict +store> [exception] ok 5183 - our %x; local %x; no strict; delete $x{a} <+strict +store> [return] ok 5184 - our %x; local %x; no strict; delete $x{a} <+strict +store> [variable] ok 5185 - my $x; delete $x->{a}->{b} [exception] ok 5186 - my $x; delete $x->{a}->{b} [return] ok 5187 - my $x; delete $x->{a}->{b} [variable] ok 5188 - our $x; local $x; use strict; delete $x->{a}->{b} [exception] ok 5189 - our $x; local $x; use strict; delete $x->{a}->{b} [return] ok 5190 - our $x; local $x; use strict; delete $x->{a}->{b} [variable] ok 5191 - our $x; local $x; no strict; delete $x->{a}->{b} [exception] ok 5192 - our $x; local $x; no strict; delete $x->{a}->{b} [return] ok 5193 - our $x; local $x; no strict; delete $x->{a}->{b} [variable] ok 5194 - my $x; delete $$x{a}->{b} [exception] ok 5195 - my $x; delete $$x{a}->{b} [return] ok 5196 - my $x; delete $$x{a}->{b} [variable] ok 5197 - our $x; local $x; use strict; delete $$x{a}->{b} [exception] ok 5198 - our $x; local $x; use strict; delete $$x{a}->{b} [return] ok 5199 - our $x; local $x; use strict; delete $$x{a}->{b} [variable] ok 5200 - our $x; local $x; no strict; delete $$x{a}->{b} [exception] ok 5201 - our $x; local $x; no strict; delete $$x{a}->{b} [return] ok 5202 - our $x; local $x; no strict; delete $$x{a}->{b} [variable] ok 5203 - my %x; delete $x{a}->{b} [exception] ok 5204 - my %x; delete $x{a}->{b} [return] ok 5205 - my %x; delete $x{a}->{b} [variable] ok 5206 - our %x; local %x; use strict; delete $x{a}->{b} [exception] ok 5207 - our %x; local %x; use strict; delete $x{a}->{b} [return] ok 5208 - our %x; local %x; use strict; delete $x{a}->{b} [variable] ok 5209 - our %x; local %x; no strict; delete $x{a}->{b} [exception] ok 5210 - our %x; local %x; no strict; delete $x{a}->{b} [return] ok 5211 - our %x; local %x; no strict; delete $x{a}->{b} [variable] ok 5212 - my $x; delete $x->{a}->{b} [exception] ok 5213 - my $x; delete $x->{a}->{b} [return] ok 5214 - my $x; delete $x->{a}->{b} [variable] ok 5215 - our $x; local $x; use strict; delete $x->{a}->{b} [exception] ok 5216 - our $x; local $x; use strict; delete $x->{a}->{b} [return] ok 5217 - our $x; local $x; use strict; delete $x->{a}->{b} [variable] ok 5218 - our $x; local $x; no strict; delete $x->{a}->{b} [exception] ok 5219 - our $x; local $x; no strict; delete $x->{a}->{b} [return] ok 5220 - our $x; local $x; no strict; delete $x->{a}->{b} [variable] ok 5221 - my $x; delete $$x{a}->{b} [exception] ok 5222 - my $x; delete $$x{a}->{b} [return] ok 5223 - my $x; delete $$x{a}->{b} [variable] ok 5224 - our $x; local $x; use strict; delete $$x{a}->{b} [exception] ok 5225 - our $x; local $x; use strict; delete $$x{a}->{b} [return] ok 5226 - our $x; local $x; use strict; delete $$x{a}->{b} [variable] ok 5227 - our $x; local $x; no strict; delete $$x{a}->{b} [exception] ok 5228 - our $x; local $x; no strict; delete $$x{a}->{b} [return] ok 5229 - our $x; local $x; no strict; delete $$x{a}->{b} [variable] ok 5230 - my %x; delete $x{a}->{b} [exception] ok 5231 - my %x; delete $x{a}->{b} [return] ok 5232 - my %x; delete $x{a}->{b} [variable] ok 5233 - our %x; local %x; use strict; delete $x{a}->{b} [exception] ok 5234 - our %x; local %x; use strict; delete $x{a}->{b} [return] ok 5235 - our %x; local %x; use strict; delete $x{a}->{b} [variable] ok 5236 - our %x; local %x; no strict; delete $x{a}->{b} [exception] ok 5237 - our %x; local %x; no strict; delete $x{a}->{b} [return] ok 5238 - our %x; local %x; no strict; delete $x{a}->{b} [variable] ok 5239 - my $x; delete $x->{a}->{b} <+fetch> [exception] ok 5240 - my $x; delete $x->{a}->{b} <+fetch> [return] ok 5241 - my $x; delete $x->{a}->{b} <+fetch> [variable] ok 5242 - our $x; local $x; use strict; delete $x->{a}->{b} <+fetch> [exception] ok 5243 - our $x; local $x; use strict; delete $x->{a}->{b} <+fetch> [return] ok 5244 - our $x; local $x; use strict; delete $x->{a}->{b} <+fetch> [variable] ok 5245 - our $x; local $x; no strict; delete $x->{a}->{b} <+fetch> [exception] ok 5246 - our $x; local $x; no strict; delete $x->{a}->{b} <+fetch> [return] ok 5247 - our $x; local $x; no strict; delete $x->{a}->{b} <+fetch> [variable] ok 5248 - my $x; delete $$x{a}->{b} <+fetch> [exception] ok 5249 - my $x; delete $$x{a}->{b} <+fetch> [return] ok 5250 - my $x; delete $$x{a}->{b} <+fetch> [variable] ok 5251 - our $x; local $x; use strict; delete $$x{a}->{b} <+fetch> [exception] ok 5252 - our $x; local $x; use strict; delete $$x{a}->{b} <+fetch> [return] ok 5253 - our $x; local $x; use strict; delete $$x{a}->{b} <+fetch> [variable] ok 5254 - our $x; local $x; no strict; delete $$x{a}->{b} <+fetch> [exception] ok 5255 - our $x; local $x; no strict; delete $$x{a}->{b} <+fetch> [return] ok 5256 - our $x; local $x; no strict; delete $$x{a}->{b} <+fetch> [variable] ok 5257 - my %x; delete $x{a}->{b} <+fetch> [exception] ok 5258 - my %x; delete $x{a}->{b} <+fetch> [return] ok 5259 - my %x; delete $x{a}->{b} <+fetch> [variable] ok 5260 - our %x; local %x; use strict; delete $x{a}->{b} <+fetch> [exception] ok 5261 - our %x; local %x; use strict; delete $x{a}->{b} <+fetch> [return] ok 5262 - our %x; local %x; use strict; delete $x{a}->{b} <+fetch> [variable] ok 5263 - our %x; local %x; no strict; delete $x{a}->{b} <+fetch> [exception] ok 5264 - our %x; local %x; no strict; delete $x{a}->{b} <+fetch> [return] ok 5265 - our %x; local %x; no strict; delete $x{a}->{b} <+fetch> [variable] ok 5266 - my $x; delete $x->{a}->{b} <+exists> [exception] ok 5267 - my $x; delete $x->{a}->{b} <+exists> [return] ok 5268 - my $x; delete $x->{a}->{b} <+exists> [variable] ok 5269 - our $x; local $x; use strict; delete $x->{a}->{b} <+exists> [exception] ok 5270 - our $x; local $x; use strict; delete $x->{a}->{b} <+exists> [return] ok 5271 - our $x; local $x; use strict; delete $x->{a}->{b} <+exists> [variable] ok 5272 - our $x; local $x; no strict; delete $x->{a}->{b} <+exists> [exception] ok 5273 - our $x; local $x; no strict; delete $x->{a}->{b} <+exists> [return] ok 5274 - our $x; local $x; no strict; delete $x->{a}->{b} <+exists> [variable] ok 5275 - my $x; delete $$x{a}->{b} <+exists> [exception] ok 5276 - my $x; delete $$x{a}->{b} <+exists> [return] ok 5277 - my $x; delete $$x{a}->{b} <+exists> [variable] ok 5278 - our $x; local $x; use strict; delete $$x{a}->{b} <+exists> [exception] ok 5279 - our $x; local $x; use strict; delete $$x{a}->{b} <+exists> [return] ok 5280 - our $x; local $x; use strict; delete $$x{a}->{b} <+exists> [variable] ok 5281 - our $x; local $x; no strict; delete $$x{a}->{b} <+exists> [exception] ok 5282 - our $x; local $x; no strict; delete $$x{a}->{b} <+exists> [return] ok 5283 - our $x; local $x; no strict; delete $$x{a}->{b} <+exists> [variable] ok 5284 - my %x; delete $x{a}->{b} <+exists> [exception] ok 5285 - my %x; delete $x{a}->{b} <+exists> [return] ok 5286 - my %x; delete $x{a}->{b} <+exists> [variable] ok 5287 - our %x; local %x; use strict; delete $x{a}->{b} <+exists> [exception] ok 5288 - our %x; local %x; use strict; delete $x{a}->{b} <+exists> [return] ok 5289 - our %x; local %x; use strict; delete $x{a}->{b} <+exists> [variable] ok 5290 - our %x; local %x; no strict; delete $x{a}->{b} <+exists> [exception] ok 5291 - our %x; local %x; no strict; delete $x{a}->{b} <+exists> [return] ok 5292 - our %x; local %x; no strict; delete $x{a}->{b} <+exists> [variable] ok 5293 - my $x; delete $x->{a}->{b} <+delete> [exception] ok 5294 - my $x; delete $x->{a}->{b} <+delete> [return] ok 5295 - my $x; delete $x->{a}->{b} <+delete> [variable] ok 5296 - our $x; local $x; use strict; delete $x->{a}->{b} <+delete> [exception] ok 5297 - our $x; local $x; use strict; delete $x->{a}->{b} <+delete> [return] ok 5298 - our $x; local $x; use strict; delete $x->{a}->{b} <+delete> [variable] ok 5299 - our $x; local $x; no strict; delete $x->{a}->{b} <+delete> [exception] ok 5300 - our $x; local $x; no strict; delete $x->{a}->{b} <+delete> [return] ok 5301 - our $x; local $x; no strict; delete $x->{a}->{b} <+delete> [variable] ok 5302 - my $x; delete $$x{a}->{b} <+delete> [exception] ok 5303 - my $x; delete $$x{a}->{b} <+delete> [return] ok 5304 - my $x; delete $$x{a}->{b} <+delete> [variable] ok 5305 - our $x; local $x; use strict; delete $$x{a}->{b} <+delete> [exception] ok 5306 - our $x; local $x; use strict; delete $$x{a}->{b} <+delete> [return] ok 5307 - our $x; local $x; use strict; delete $$x{a}->{b} <+delete> [variable] ok 5308 - our $x; local $x; no strict; delete $$x{a}->{b} <+delete> [exception] ok 5309 - our $x; local $x; no strict; delete $$x{a}->{b} <+delete> [return] ok 5310 - our $x; local $x; no strict; delete $$x{a}->{b} <+delete> [variable] ok 5311 - my %x; delete $x{a}->{b} <+delete> [exception] ok 5312 - my %x; delete $x{a}->{b} <+delete> [return] ok 5313 - my %x; delete $x{a}->{b} <+delete> [variable] ok 5314 - our %x; local %x; use strict; delete $x{a}->{b} <+delete> [exception] ok 5315 - our %x; local %x; use strict; delete $x{a}->{b} <+delete> [return] ok 5316 - our %x; local %x; use strict; delete $x{a}->{b} <+delete> [variable] ok 5317 - our %x; local %x; no strict; delete $x{a}->{b} <+delete> [exception] ok 5318 - our %x; local %x; no strict; delete $x{a}->{b} <+delete> [return] ok 5319 - our %x; local %x; no strict; delete $x{a}->{b} <+delete> [variable] ok 5320 - my $x; delete $x->{a}->{b} <+store> [exception] ok 5321 - my $x; delete $x->{a}->{b} <+store> [return] ok 5322 - my $x; delete $x->{a}->{b} <+store> [variable] ok 5323 - our $x; local $x; use strict; delete $x->{a}->{b} <+store> [exception] ok 5324 - our $x; local $x; use strict; delete $x->{a}->{b} <+store> [return] ok 5325 - our $x; local $x; use strict; delete $x->{a}->{b} <+store> [variable] ok 5326 - our $x; local $x; no strict; delete $x->{a}->{b} <+store> [exception] ok 5327 - our $x; local $x; no strict; delete $x->{a}->{b} <+store> [return] ok 5328 - our $x; local $x; no strict; delete $x->{a}->{b} <+store> [variable] ok 5329 - my $x; delete $$x{a}->{b} <+store> [exception] ok 5330 - my $x; delete $$x{a}->{b} <+store> [return] ok 5331 - my $x; delete $$x{a}->{b} <+store> [variable] ok 5332 - our $x; local $x; use strict; delete $$x{a}->{b} <+store> [exception] ok 5333 - our $x; local $x; use strict; delete $$x{a}->{b} <+store> [return] ok 5334 - our $x; local $x; use strict; delete $$x{a}->{b} <+store> [variable] ok 5335 - our $x; local $x; no strict; delete $$x{a}->{b} <+store> [exception] ok 5336 - our $x; local $x; no strict; delete $$x{a}->{b} <+store> [return] ok 5337 - our $x; local $x; no strict; delete $$x{a}->{b} <+store> [variable] ok 5338 - my %x; delete $x{a}->{b} <+store> [exception] ok 5339 - my %x; delete $x{a}->{b} <+store> [return] ok 5340 - my %x; delete $x{a}->{b} <+store> [variable] ok 5341 - our %x; local %x; use strict; delete $x{a}->{b} <+store> [exception] ok 5342 - our %x; local %x; use strict; delete $x{a}->{b} <+store> [return] ok 5343 - our %x; local %x; use strict; delete $x{a}->{b} <+store> [variable] ok 5344 - our %x; local %x; no strict; delete $x{a}->{b} <+store> [exception] ok 5345 - our %x; local %x; no strict; delete $x{a}->{b} <+store> [return] ok 5346 - our %x; local %x; no strict; delete $x{a}->{b} <+store> [variable] ok 5347 - my $x; delete $x->{a}->{b} <+strict +fetch> [exception] ok 5348 - my $x; delete $x->{a}->{b} <+strict +fetch> [return] ok 5349 - my $x; delete $x->{a}->{b} <+strict +fetch> [variable] ok 5350 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +fetch> [exception] ok 5351 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +fetch> [return] ok 5352 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +fetch> [variable] ok 5353 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +fetch> [exception] ok 5354 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +fetch> [return] ok 5355 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +fetch> [variable] ok 5356 - my $x; delete $$x{a}->{b} <+strict +fetch> [exception] ok 5357 - my $x; delete $$x{a}->{b} <+strict +fetch> [return] ok 5358 - my $x; delete $$x{a}->{b} <+strict +fetch> [variable] ok 5359 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +fetch> [exception] ok 5360 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +fetch> [return] ok 5361 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +fetch> [variable] ok 5362 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +fetch> [exception] ok 5363 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +fetch> [return] ok 5364 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +fetch> [variable] ok 5365 - my %x; delete $x{a}->{b} <+strict +fetch> [exception] ok 5366 - my %x; delete $x{a}->{b} <+strict +fetch> [return] ok 5367 - my %x; delete $x{a}->{b} <+strict +fetch> [variable] ok 5368 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +fetch> [exception] ok 5369 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +fetch> [return] ok 5370 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +fetch> [variable] ok 5371 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +fetch> [exception] ok 5372 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +fetch> [return] ok 5373 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +fetch> [variable] ok 5374 - my $x; delete $x->{a}->{b} <+strict +exists> [exception] ok 5375 - my $x; delete $x->{a}->{b} <+strict +exists> [return] ok 5376 - my $x; delete $x->{a}->{b} <+strict +exists> [variable] ok 5377 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +exists> [exception] ok 5378 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +exists> [return] ok 5379 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +exists> [variable] ok 5380 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +exists> [exception] ok 5381 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +exists> [return] ok 5382 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +exists> [variable] ok 5383 - my $x; delete $$x{a}->{b} <+strict +exists> [exception] ok 5384 - my $x; delete $$x{a}->{b} <+strict +exists> [return] ok 5385 - my $x; delete $$x{a}->{b} <+strict +exists> [variable] ok 5386 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +exists> [exception] ok 5387 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +exists> [return] ok 5388 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +exists> [variable] ok 5389 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +exists> [exception] ok 5390 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +exists> [return] ok 5391 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +exists> [variable] ok 5392 - my %x; delete $x{a}->{b} <+strict +exists> [exception] ok 5393 - my %x; delete $x{a}->{b} <+strict +exists> [return] ok 5394 - my %x; delete $x{a}->{b} <+strict +exists> [variable] ok 5395 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +exists> [exception] ok 5396 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +exists> [return] ok 5397 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +exists> [variable] ok 5398 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +exists> [exception] ok 5399 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +exists> [return] ok 5400 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +exists> [variable] ok 5401 - my $x; delete $x->{a}->{b} <+strict +delete> [exception] ok 5402 - my $x; delete $x->{a}->{b} <+strict +delete> [return] ok 5403 - my $x; delete $x->{a}->{b} <+strict +delete> [variable] ok 5404 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +delete> [exception] ok 5405 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +delete> [return] ok 5406 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +delete> [variable] ok 5407 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +delete> [exception] ok 5408 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +delete> [return] ok 5409 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +delete> [variable] ok 5410 - my $x; delete $$x{a}->{b} <+strict +delete> [exception] ok 5411 - my $x; delete $$x{a}->{b} <+strict +delete> [return] ok 5412 - my $x; delete $$x{a}->{b} <+strict +delete> [variable] ok 5413 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +delete> [exception] ok 5414 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +delete> [return] ok 5415 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +delete> [variable] ok 5416 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +delete> [exception] ok 5417 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +delete> [return] ok 5418 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +delete> [variable] ok 5419 - my %x; delete $x{a}->{b} <+strict +delete> [exception] ok 5420 - my %x; delete $x{a}->{b} <+strict +delete> [return] ok 5421 - my %x; delete $x{a}->{b} <+strict +delete> [variable] ok 5422 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +delete> [exception] ok 5423 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +delete> [return] ok 5424 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +delete> [variable] ok 5425 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +delete> [exception] ok 5426 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +delete> [return] ok 5427 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +delete> [variable] ok 5428 - my $x; delete $x->{a}->{b} <+strict +store> [exception] ok 5429 - my $x; delete $x->{a}->{b} <+strict +store> [return] ok 5430 - my $x; delete $x->{a}->{b} <+strict +store> [variable] ok 5431 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +store> [exception] ok 5432 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +store> [return] ok 5433 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +store> [variable] ok 5434 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +store> [exception] ok 5435 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +store> [return] ok 5436 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +store> [variable] ok 5437 - my $x; delete $$x{a}->{b} <+strict +store> [exception] ok 5438 - my $x; delete $$x{a}->{b} <+strict +store> [return] ok 5439 - my $x; delete $$x{a}->{b} <+strict +store> [variable] ok 5440 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +store> [exception] ok 5441 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +store> [return] ok 5442 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +store> [variable] ok 5443 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +store> [exception] ok 5444 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +store> [return] ok 5445 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +store> [variable] ok 5446 - my %x; delete $x{a}->{b} <+strict +store> [exception] ok 5447 - my %x; delete $x{a}->{b} <+strict +store> [return] ok 5448 - my %x; delete $x{a}->{b} <+strict +store> [variable] ok 5449 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +store> [exception] ok 5450 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +store> [return] ok 5451 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +store> [variable] ok 5452 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +store> [exception] ok 5453 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +store> [return] ok 5454 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +store> [variable] ok 5455 - my $x; $x->{a} = 1; delete $x->{a} <+fetch> [exception] ok 5456 - my $x; $x->{a} = 1; delete $x->{a} <+fetch> [return] ok 5457 - my $x; $x->{a} = 1; delete $x->{a} <+fetch> [variable] ok 5458 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+fetch> [exception] ok 5459 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+fetch> [return] ok 5460 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+fetch> [variable] ok 5461 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+fetch> [exception] ok 5462 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+fetch> [return] ok 5463 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+fetch> [variable] ok 5464 - my $x; $x->{a} = 1; delete $$x{a} <+fetch> [exception] ok 5465 - my $x; $x->{a} = 1; delete $$x{a} <+fetch> [return] ok 5466 - my $x; $x->{a} = 1; delete $$x{a} <+fetch> [variable] ok 5467 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+fetch> [exception] ok 5468 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+fetch> [return] ok 5469 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+fetch> [variable] ok 5470 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+fetch> [exception] ok 5471 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+fetch> [return] ok 5472 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+fetch> [variable] ok 5473 - my %x; $x{a} = 1; delete $x{a} <+fetch> [exception] ok 5474 - my %x; $x{a} = 1; delete $x{a} <+fetch> [return] ok 5475 - my %x; $x{a} = 1; delete $x{a} <+fetch> [variable] ok 5476 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+fetch> [exception] ok 5477 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+fetch> [return] ok 5478 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+fetch> [variable] ok 5479 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+fetch> [exception] ok 5480 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+fetch> [return] ok 5481 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+fetch> [variable] ok 5482 - my $x; $x->{a} = 1; delete $x->{b} <+fetch> [exception] ok 5483 - my $x; $x->{a} = 1; delete $x->{b} <+fetch> [return] ok 5484 - my $x; $x->{a} = 1; delete $x->{b} <+fetch> [variable] ok 5485 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+fetch> [exception] ok 5486 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+fetch> [return] ok 5487 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+fetch> [variable] ok 5488 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+fetch> [exception] ok 5489 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+fetch> [return] ok 5490 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+fetch> [variable] ok 5491 - my $x; $x->{a} = 1; delete $$x{b} <+fetch> [exception] ok 5492 - my $x; $x->{a} = 1; delete $$x{b} <+fetch> [return] ok 5493 - my $x; $x->{a} = 1; delete $$x{b} <+fetch> [variable] ok 5494 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+fetch> [exception] ok 5495 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+fetch> [return] ok 5496 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+fetch> [variable] ok 5497 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+fetch> [exception] ok 5498 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+fetch> [return] ok 5499 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+fetch> [variable] ok 5500 - my %x; $x{a} = 1; delete $x{b} <+fetch> [exception] ok 5501 - my %x; $x{a} = 1; delete $x{b} <+fetch> [return] ok 5502 - my %x; $x{a} = 1; delete $x{b} <+fetch> [variable] ok 5503 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+fetch> [exception] ok 5504 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+fetch> [return] ok 5505 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+fetch> [variable] ok 5506 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+fetch> [exception] ok 5507 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+fetch> [return] ok 5508 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+fetch> [variable] ok 5509 - my $x; $x->{a} = 1; delete $x->{a} <+exists> [exception] ok 5510 - my $x; $x->{a} = 1; delete $x->{a} <+exists> [return] ok 5511 - my $x; $x->{a} = 1; delete $x->{a} <+exists> [variable] ok 5512 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+exists> [exception] ok 5513 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+exists> [return] ok 5514 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+exists> [variable] ok 5515 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+exists> [exception] ok 5516 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+exists> [return] ok 5517 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+exists> [variable] ok 5518 - my $x; $x->{a} = 1; delete $$x{a} <+exists> [exception] ok 5519 - my $x; $x->{a} = 1; delete $$x{a} <+exists> [return] ok 5520 - my $x; $x->{a} = 1; delete $$x{a} <+exists> [variable] ok 5521 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+exists> [exception] ok 5522 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+exists> [return] ok 5523 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+exists> [variable] ok 5524 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+exists> [exception] ok 5525 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+exists> [return] ok 5526 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+exists> [variable] ok 5527 - my %x; $x{a} = 1; delete $x{a} <+exists> [exception] ok 5528 - my %x; $x{a} = 1; delete $x{a} <+exists> [return] ok 5529 - my %x; $x{a} = 1; delete $x{a} <+exists> [variable] ok 5530 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+exists> [exception] ok 5531 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+exists> [return] ok 5532 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+exists> [variable] ok 5533 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+exists> [exception] ok 5534 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+exists> [return] ok 5535 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+exists> [variable] ok 5536 - my $x; $x->{a} = 1; delete $x->{b} <+exists> [exception] ok 5537 - my $x; $x->{a} = 1; delete $x->{b} <+exists> [return] ok 5538 - my $x; $x->{a} = 1; delete $x->{b} <+exists> [variable] ok 5539 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+exists> [exception] ok 5540 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+exists> [return] ok 5541 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+exists> [variable] ok 5542 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+exists> [exception] ok 5543 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+exists> [return] ok 5544 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+exists> [variable] ok 5545 - my $x; $x->{a} = 1; delete $$x{b} <+exists> [exception] ok 5546 - my $x; $x->{a} = 1; delete $$x{b} <+exists> [return] ok 5547 - my $x; $x->{a} = 1; delete $$x{b} <+exists> [variable] ok 5548 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+exists> [exception] ok 5549 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+exists> [return] ok 5550 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+exists> [variable] ok 5551 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+exists> [exception] ok 5552 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+exists> [return] ok 5553 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+exists> [variable] ok 5554 - my %x; $x{a} = 1; delete $x{b} <+exists> [exception] ok 5555 - my %x; $x{a} = 1; delete $x{b} <+exists> [return] ok 5556 - my %x; $x{a} = 1; delete $x{b} <+exists> [variable] ok 5557 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+exists> [exception] ok 5558 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+exists> [return] ok 5559 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+exists> [variable] ok 5560 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+exists> [exception] ok 5561 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+exists> [return] ok 5562 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+exists> [variable] ok 5563 - my $x; $x->{a} = 1; delete $x->{a} <+delete> [exception] ok 5564 - my $x; $x->{a} = 1; delete $x->{a} <+delete> [return] ok 5565 - my $x; $x->{a} = 1; delete $x->{a} <+delete> [variable] ok 5566 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+delete> [exception] ok 5567 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+delete> [return] ok 5568 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+delete> [variable] ok 5569 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+delete> [exception] ok 5570 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+delete> [return] ok 5571 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+delete> [variable] ok 5572 - my $x; $x->{a} = 1; delete $$x{a} <+delete> [exception] ok 5573 - my $x; $x->{a} = 1; delete $$x{a} <+delete> [return] ok 5574 - my $x; $x->{a} = 1; delete $$x{a} <+delete> [variable] ok 5575 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+delete> [exception] ok 5576 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+delete> [return] ok 5577 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+delete> [variable] ok 5578 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+delete> [exception] ok 5579 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+delete> [return] ok 5580 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+delete> [variable] ok 5581 - my %x; $x{a} = 1; delete $x{a} <+delete> [exception] ok 5582 - my %x; $x{a} = 1; delete $x{a} <+delete> [return] ok 5583 - my %x; $x{a} = 1; delete $x{a} <+delete> [variable] ok 5584 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+delete> [exception] ok 5585 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+delete> [return] ok 5586 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+delete> [variable] ok 5587 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+delete> [exception] ok 5588 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+delete> [return] ok 5589 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+delete> [variable] ok 5590 - my $x; $x->{a} = 1; delete $x->{b} <+delete> [exception] ok 5591 - my $x; $x->{a} = 1; delete $x->{b} <+delete> [return] ok 5592 - my $x; $x->{a} = 1; delete $x->{b} <+delete> [variable] ok 5593 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+delete> [exception] ok 5594 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+delete> [return] ok 5595 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+delete> [variable] ok 5596 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+delete> [exception] ok 5597 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+delete> [return] ok 5598 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+delete> [variable] ok 5599 - my $x; $x->{a} = 1; delete $$x{b} <+delete> [exception] ok 5600 - my $x; $x->{a} = 1; delete $$x{b} <+delete> [return] ok 5601 - my $x; $x->{a} = 1; delete $$x{b} <+delete> [variable] ok 5602 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+delete> [exception] ok 5603 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+delete> [return] ok 5604 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+delete> [variable] ok 5605 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+delete> [exception] ok 5606 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+delete> [return] ok 5607 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+delete> [variable] ok 5608 - my %x; $x{a} = 1; delete $x{b} <+delete> [exception] ok 5609 - my %x; $x{a} = 1; delete $x{b} <+delete> [return] ok 5610 - my %x; $x{a} = 1; delete $x{b} <+delete> [variable] ok 5611 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+delete> [exception] ok 5612 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+delete> [return] ok 5613 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+delete> [variable] ok 5614 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+delete> [exception] ok 5615 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+delete> [return] ok 5616 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+delete> [variable] ok 5617 - my $x; $x->{a} = 1; delete $x->{a} <+store> [exception] ok 5618 - my $x; $x->{a} = 1; delete $x->{a} <+store> [return] ok 5619 - my $x; $x->{a} = 1; delete $x->{a} <+store> [variable] ok 5620 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+store> [exception] ok 5621 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+store> [return] ok 5622 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+store> [variable] ok 5623 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+store> [exception] ok 5624 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+store> [return] ok 5625 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+store> [variable] ok 5626 - my $x; $x->{a} = 1; delete $$x{a} <+store> [exception] ok 5627 - my $x; $x->{a} = 1; delete $$x{a} <+store> [return] ok 5628 - my $x; $x->{a} = 1; delete $$x{a} <+store> [variable] ok 5629 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+store> [exception] ok 5630 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+store> [return] ok 5631 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+store> [variable] ok 5632 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+store> [exception] ok 5633 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+store> [return] ok 5634 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+store> [variable] ok 5635 - my %x; $x{a} = 1; delete $x{a} <+store> [exception] ok 5636 - my %x; $x{a} = 1; delete $x{a} <+store> [return] ok 5637 - my %x; $x{a} = 1; delete $x{a} <+store> [variable] ok 5638 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+store> [exception] ok 5639 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+store> [return] ok 5640 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+store> [variable] ok 5641 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+store> [exception] ok 5642 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+store> [return] ok 5643 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+store> [variable] ok 5644 - my $x; $x->{a} = 1; delete $x->{b} <+store> [exception] ok 5645 - my $x; $x->{a} = 1; delete $x->{b} <+store> [return] ok 5646 - my $x; $x->{a} = 1; delete $x->{b} <+store> [variable] ok 5647 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+store> [exception] ok 5648 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+store> [return] ok 5649 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+store> [variable] ok 5650 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+store> [exception] ok 5651 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+store> [return] ok 5652 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+store> [variable] ok 5653 - my $x; $x->{a} = 1; delete $$x{b} <+store> [exception] ok 5654 - my $x; $x->{a} = 1; delete $$x{b} <+store> [return] ok 5655 - my $x; $x->{a} = 1; delete $$x{b} <+store> [variable] ok 5656 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+store> [exception] ok 5657 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+store> [return] ok 5658 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+store> [variable] ok 5659 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+store> [exception] ok 5660 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+store> [return] ok 5661 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+store> [variable] ok 5662 - my %x; $x{a} = 1; delete $x{b} <+store> [exception] ok 5663 - my %x; $x{a} = 1; delete $x{b} <+store> [return] ok 5664 - my %x; $x{a} = 1; delete $x{b} <+store> [variable] ok 5665 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+store> [exception] ok 5666 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+store> [return] ok 5667 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+store> [variable] ok 5668 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+store> [exception] ok 5669 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+store> [return] ok 5670 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+store> [variable] ok 5671 - my $x; $x->{a} = 1; delete $x->{a} <+strict +fetch> [exception] ok 5672 - my $x; $x->{a} = 1; delete $x->{a} <+strict +fetch> [return] ok 5673 - my $x; $x->{a} = 1; delete $x->{a} <+strict +fetch> [variable] ok 5674 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +fetch> [exception] ok 5675 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +fetch> [return] ok 5676 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +fetch> [variable] ok 5677 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +fetch> [exception] ok 5678 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +fetch> [return] ok 5679 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +fetch> [variable] ok 5680 - my $x; $x->{a} = 1; delete $$x{a} <+strict +fetch> [exception] ok 5681 - my $x; $x->{a} = 1; delete $$x{a} <+strict +fetch> [return] ok 5682 - my $x; $x->{a} = 1; delete $$x{a} <+strict +fetch> [variable] ok 5683 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +fetch> [exception] ok 5684 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +fetch> [return] ok 5685 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +fetch> [variable] ok 5686 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +fetch> [exception] ok 5687 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +fetch> [return] ok 5688 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +fetch> [variable] ok 5689 - my %x; $x{a} = 1; delete $x{a} <+strict +fetch> [exception] ok 5690 - my %x; $x{a} = 1; delete $x{a} <+strict +fetch> [return] ok 5691 - my %x; $x{a} = 1; delete $x{a} <+strict +fetch> [variable] ok 5692 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +fetch> [exception] ok 5693 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +fetch> [return] ok 5694 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +fetch> [variable] ok 5695 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +fetch> [exception] ok 5696 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +fetch> [return] ok 5697 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +fetch> [variable] ok 5698 - my $x; $x->{a} = 1; delete $x->{b} <+strict +fetch> [exception] ok 5699 - my $x; $x->{a} = 1; delete $x->{b} <+strict +fetch> [return] ok 5700 - my $x; $x->{a} = 1; delete $x->{b} <+strict +fetch> [variable] ok 5701 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +fetch> [exception] ok 5702 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +fetch> [return] ok 5703 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +fetch> [variable] ok 5704 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +fetch> [exception] ok 5705 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +fetch> [return] ok 5706 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +fetch> [variable] ok 5707 - my $x; $x->{a} = 1; delete $$x{b} <+strict +fetch> [exception] ok 5708 - my $x; $x->{a} = 1; delete $$x{b} <+strict +fetch> [return] ok 5709 - my $x; $x->{a} = 1; delete $$x{b} <+strict +fetch> [variable] ok 5710 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +fetch> [exception] ok 5711 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +fetch> [return] ok 5712 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +fetch> [variable] ok 5713 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +fetch> [exception] ok 5714 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +fetch> [return] ok 5715 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +fetch> [variable] ok 5716 - my %x; $x{a} = 1; delete $x{b} <+strict +fetch> [exception] ok 5717 - my %x; $x{a} = 1; delete $x{b} <+strict +fetch> [return] ok 5718 - my %x; $x{a} = 1; delete $x{b} <+strict +fetch> [variable] ok 5719 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +fetch> [exception] ok 5720 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +fetch> [return] ok 5721 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +fetch> [variable] ok 5722 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +fetch> [exception] ok 5723 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +fetch> [return] ok 5724 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +fetch> [variable] ok 5725 - my $x; $x->{a} = 1; delete $x->{a} <+strict +exists> [exception] ok 5726 - my $x; $x->{a} = 1; delete $x->{a} <+strict +exists> [return] ok 5727 - my $x; $x->{a} = 1; delete $x->{a} <+strict +exists> [variable] ok 5728 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +exists> [exception] ok 5729 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +exists> [return] ok 5730 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +exists> [variable] ok 5731 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +exists> [exception] ok 5732 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +exists> [return] ok 5733 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +exists> [variable] ok 5734 - my $x; $x->{a} = 1; delete $$x{a} <+strict +exists> [exception] ok 5735 - my $x; $x->{a} = 1; delete $$x{a} <+strict +exists> [return] ok 5736 - my $x; $x->{a} = 1; delete $$x{a} <+strict +exists> [variable] ok 5737 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +exists> [exception] ok 5738 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +exists> [return] ok 5739 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +exists> [variable] ok 5740 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +exists> [exception] ok 5741 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +exists> [return] ok 5742 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +exists> [variable] ok 5743 - my %x; $x{a} = 1; delete $x{a} <+strict +exists> [exception] ok 5744 - my %x; $x{a} = 1; delete $x{a} <+strict +exists> [return] ok 5745 - my %x; $x{a} = 1; delete $x{a} <+strict +exists> [variable] ok 5746 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +exists> [exception] ok 5747 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +exists> [return] ok 5748 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +exists> [variable] ok 5749 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +exists> [exception] ok 5750 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +exists> [return] ok 5751 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +exists> [variable] ok 5752 - my $x; $x->{a} = 1; delete $x->{b} <+strict +exists> [exception] ok 5753 - my $x; $x->{a} = 1; delete $x->{b} <+strict +exists> [return] ok 5754 - my $x; $x->{a} = 1; delete $x->{b} <+strict +exists> [variable] ok 5755 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +exists> [exception] ok 5756 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +exists> [return] ok 5757 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +exists> [variable] ok 5758 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +exists> [exception] ok 5759 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +exists> [return] ok 5760 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +exists> [variable] ok 5761 - my $x; $x->{a} = 1; delete $$x{b} <+strict +exists> [exception] ok 5762 - my $x; $x->{a} = 1; delete $$x{b} <+strict +exists> [return] ok 5763 - my $x; $x->{a} = 1; delete $$x{b} <+strict +exists> [variable] ok 5764 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +exists> [exception] ok 5765 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +exists> [return] ok 5766 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +exists> [variable] ok 5767 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +exists> [exception] ok 5768 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +exists> [return] ok 5769 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +exists> [variable] ok 5770 - my %x; $x{a} = 1; delete $x{b} <+strict +exists> [exception] ok 5771 - my %x; $x{a} = 1; delete $x{b} <+strict +exists> [return] ok 5772 - my %x; $x{a} = 1; delete $x{b} <+strict +exists> [variable] ok 5773 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +exists> [exception] ok 5774 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +exists> [return] ok 5775 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +exists> [variable] ok 5776 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +exists> [exception] ok 5777 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +exists> [return] ok 5778 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +exists> [variable] ok 5779 - my $x; $x->{a} = 1; delete $x->{a} <+strict +delete> [exception] ok 5780 - my $x; $x->{a} = 1; delete $x->{a} <+strict +delete> [return] ok 5781 - my $x; $x->{a} = 1; delete $x->{a} <+strict +delete> [variable] ok 5782 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +delete> [exception] ok 5783 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +delete> [return] ok 5784 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +delete> [variable] ok 5785 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +delete> [exception] ok 5786 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +delete> [return] ok 5787 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +delete> [variable] ok 5788 - my $x; $x->{a} = 1; delete $$x{a} <+strict +delete> [exception] ok 5789 - my $x; $x->{a} = 1; delete $$x{a} <+strict +delete> [return] ok 5790 - my $x; $x->{a} = 1; delete $$x{a} <+strict +delete> [variable] ok 5791 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +delete> [exception] ok 5792 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +delete> [return] ok 5793 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +delete> [variable] ok 5794 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +delete> [exception] ok 5795 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +delete> [return] ok 5796 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +delete> [variable] ok 5797 - my %x; $x{a} = 1; delete $x{a} <+strict +delete> [exception] ok 5798 - my %x; $x{a} = 1; delete $x{a} <+strict +delete> [return] ok 5799 - my %x; $x{a} = 1; delete $x{a} <+strict +delete> [variable] ok 5800 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +delete> [exception] ok 5801 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +delete> [return] ok 5802 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +delete> [variable] ok 5803 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +delete> [exception] ok 5804 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +delete> [return] ok 5805 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +delete> [variable] ok 5806 - my $x; $x->{a} = 1; delete $x->{b} <+strict +delete> [exception] ok 5807 - my $x; $x->{a} = 1; delete $x->{b} <+strict +delete> [return] ok 5808 - my $x; $x->{a} = 1; delete $x->{b} <+strict +delete> [variable] ok 5809 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +delete> [exception] ok 5810 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +delete> [return] ok 5811 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +delete> [variable] ok 5812 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +delete> [exception] ok 5813 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +delete> [return] ok 5814 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +delete> [variable] ok 5815 - my $x; $x->{a} = 1; delete $$x{b} <+strict +delete> [exception] ok 5816 - my $x; $x->{a} = 1; delete $$x{b} <+strict +delete> [return] ok 5817 - my $x; $x->{a} = 1; delete $$x{b} <+strict +delete> [variable] ok 5818 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +delete> [exception] ok 5819 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +delete> [return] ok 5820 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +delete> [variable] ok 5821 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +delete> [exception] ok 5822 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +delete> [return] ok 5823 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +delete> [variable] ok 5824 - my %x; $x{a} = 1; delete $x{b} <+strict +delete> [exception] ok 5825 - my %x; $x{a} = 1; delete $x{b} <+strict +delete> [return] ok 5826 - my %x; $x{a} = 1; delete $x{b} <+strict +delete> [variable] ok 5827 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +delete> [exception] ok 5828 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +delete> [return] ok 5829 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +delete> [variable] ok 5830 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +delete> [exception] ok 5831 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +delete> [return] ok 5832 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +delete> [variable] ok 5833 - my $x; $x->{a} = 1; delete $x->{a} <+strict +store> [exception] ok 5834 - my $x; $x->{a} = 1; delete $x->{a} <+strict +store> [return] ok 5835 - my $x; $x->{a} = 1; delete $x->{a} <+strict +store> [variable] ok 5836 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +store> [exception] ok 5837 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +store> [return] ok 5838 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +store> [variable] ok 5839 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +store> [exception] ok 5840 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +store> [return] ok 5841 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +store> [variable] ok 5842 - my $x; $x->{a} = 1; delete $$x{a} <+strict +store> [exception] ok 5843 - my $x; $x->{a} = 1; delete $$x{a} <+strict +store> [return] ok 5844 - my $x; $x->{a} = 1; delete $$x{a} <+strict +store> [variable] ok 5845 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +store> [exception] ok 5846 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +store> [return] ok 5847 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +store> [variable] ok 5848 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +store> [exception] ok 5849 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +store> [return] ok 5850 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +store> [variable] ok 5851 - my %x; $x{a} = 1; delete $x{a} <+strict +store> [exception] ok 5852 - my %x; $x{a} = 1; delete $x{a} <+strict +store> [return] ok 5853 - my %x; $x{a} = 1; delete $x{a} <+strict +store> [variable] ok 5854 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +store> [exception] ok 5855 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +store> [return] ok 5856 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +store> [variable] ok 5857 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +store> [exception] ok 5858 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +store> [return] ok 5859 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +store> [variable] ok 5860 - my $x; $x->{a} = 1; delete $x->{b} <+strict +store> [exception] ok 5861 - my $x; $x->{a} = 1; delete $x->{b} <+strict +store> [return] ok 5862 - my $x; $x->{a} = 1; delete $x->{b} <+strict +store> [variable] ok 5863 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +store> [exception] ok 5864 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +store> [return] ok 5865 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +store> [variable] ok 5866 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +store> [exception] ok 5867 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +store> [return] ok 5868 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +store> [variable] ok 5869 - my $x; $x->{a} = 1; delete $$x{b} <+strict +store> [exception] ok 5870 - my $x; $x->{a} = 1; delete $$x{b} <+strict +store> [return] ok 5871 - my $x; $x->{a} = 1; delete $$x{b} <+strict +store> [variable] ok 5872 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +store> [exception] ok 5873 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +store> [return] ok 5874 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +store> [variable] ok 5875 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +store> [exception] ok 5876 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +store> [return] ok 5877 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +store> [variable] ok 5878 - my %x; $x{a} = 1; delete $x{b} <+strict +store> [exception] ok 5879 - my %x; $x{a} = 1; delete $x{b} <+strict +store> [return] ok 5880 - my %x; $x{a} = 1; delete $x{b} <+strict +store> [variable] ok 5881 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +store> [exception] ok 5882 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +store> [return] ok 5883 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +store> [variable] ok 5884 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +store> [exception] ok 5885 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +store> [return] ok 5886 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +store> [variable] ok 5887 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [exception] ok 5888 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [return] ok 5889 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [variable] ok 5890 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [exception] ok 5891 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [return] ok 5892 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [variable] ok 5893 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [exception] ok 5894 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [return] ok 5895 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [variable] ok 5896 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [exception] ok 5897 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [return] ok 5898 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [variable] ok 5899 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [exception] ok 5900 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [return] ok 5901 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [variable] ok 5902 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [exception] ok 5903 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [return] ok 5904 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [variable] ok 5905 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [exception] ok 5906 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [return] ok 5907 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [variable] ok 5908 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [exception] ok 5909 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [return] ok 5910 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [variable] ok 5911 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [exception] ok 5912 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [return] ok 5913 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [variable] ok 5914 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [exception] ok 5915 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [return] ok 5916 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [variable] ok 5917 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [exception] ok 5918 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [return] ok 5919 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [variable] ok 5920 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [exception] ok 5921 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [return] ok 5922 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [variable] ok 5923 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [exception] ok 5924 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [return] ok 5925 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [variable] ok 5926 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [exception] ok 5927 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [return] ok 5928 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [variable] ok 5929 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [exception] ok 5930 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [return] ok 5931 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [variable] ok 5932 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [exception] ok 5933 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [return] ok 5934 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [variable] ok 5935 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [exception] ok 5936 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [return] ok 5937 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [variable] ok 5938 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [exception] ok 5939 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [return] ok 5940 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [variable] ok 5941 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [exception] ok 5942 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [return] ok 5943 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [variable] ok 5944 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [exception] ok 5945 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [return] ok 5946 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [variable] ok 5947 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [exception] ok 5948 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [return] ok 5949 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [variable] ok 5950 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [exception] ok 5951 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [return] ok 5952 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [variable] ok 5953 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [exception] ok 5954 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [return] ok 5955 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [variable] ok 5956 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [exception] ok 5957 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [return] ok 5958 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [variable] ok 5959 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [exception] ok 5960 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [return] ok 5961 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [variable] ok 5962 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [exception] ok 5963 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [return] ok 5964 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [variable] ok 5965 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [exception] ok 5966 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [return] ok 5967 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [variable] ok 5968 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [exception] ok 5969 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [return] ok 5970 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [variable] ok 5971 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [exception] ok 5972 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [return] ok 5973 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [variable] ok 5974 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [exception] ok 5975 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [return] ok 5976 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [variable] ok 5977 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [exception] ok 5978 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [return] ok 5979 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [variable] ok 5980 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [exception] ok 5981 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [return] ok 5982 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [variable] ok 5983 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [exception] ok 5984 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [return] ok 5985 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [variable] ok 5986 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [exception] ok 5987 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [return] ok 5988 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [variable] ok 5989 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [exception] ok 5990 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [return] ok 5991 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [variable] ok 5992 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [exception] ok 5993 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [return] ok 5994 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [variable] ok 5995 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [exception] ok 5996 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [return] ok 5997 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [variable] ok 5998 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [exception] ok 5999 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [return] ok 6000 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [variable] ok 6001 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [exception] ok 6002 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [return] ok 6003 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [variable] ok 6004 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [exception] ok 6005 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [return] ok 6006 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [variable] ok 6007 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [exception] ok 6008 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [return] ok 6009 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [variable] ok 6010 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [exception] ok 6011 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [return] ok 6012 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [variable] ok 6013 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [exception] ok 6014 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [return] ok 6015 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [variable] ok 6016 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [exception] ok 6017 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [return] ok 6018 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [variable] ok 6019 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [exception] ok 6020 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [return] ok 6021 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [variable] ok 6022 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [exception] ok 6023 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [return] ok 6024 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [variable] ok 6025 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [exception] ok 6026 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [return] ok 6027 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [variable] ok 6028 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [exception] ok 6029 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [return] ok 6030 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [variable] ok 6031 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [exception] ok 6032 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [return] ok 6033 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [variable] ok 6034 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [exception] ok 6035 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [return] ok 6036 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [variable] ok 6037 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [exception] ok 6038 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [return] ok 6039 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [variable] ok 6040 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [exception] ok 6041 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [return] ok 6042 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [variable] ok 6043 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [exception] ok 6044 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [return] ok 6045 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [variable] ok 6046 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [exception] ok 6047 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [return] ok 6048 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [variable] ok 6049 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [exception] ok 6050 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [return] ok 6051 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [variable] ok 6052 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [exception] ok 6053 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [return] ok 6054 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [variable] ok 6055 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [exception] ok 6056 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [return] ok 6057 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [variable] ok 6058 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [exception] ok 6059 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [return] ok 6060 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [variable] ok 6061 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [exception] ok 6062 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [return] ok 6063 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [variable] ok 6064 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [exception] ok 6065 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [return] ok 6066 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [variable] ok 6067 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [exception] ok 6068 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [return] ok 6069 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [variable] ok 6070 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [exception] ok 6071 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [return] ok 6072 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [variable] ok 6073 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [exception] ok 6074 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [return] ok 6075 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [variable] ok 6076 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [exception] ok 6077 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [return] ok 6078 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [variable] ok 6079 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [exception] ok 6080 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [return] ok 6081 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [variable] ok 6082 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [exception] ok 6083 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [return] ok 6084 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [variable] ok 6085 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [exception] ok 6086 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [return] ok 6087 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [variable] ok 6088 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [exception] ok 6089 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [return] ok 6090 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [variable] ok 6091 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [exception] ok 6092 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [return] ok 6093 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [variable] ok 6094 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [exception] ok 6095 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [return] ok 6096 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [variable] ok 6097 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [exception] ok 6098 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [return] ok 6099 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [variable] ok 6100 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [exception] ok 6101 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [return] ok 6102 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [variable] ok 6103 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [exception] ok 6104 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [return] ok 6105 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [variable] ok 6106 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [exception] ok 6107 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [return] ok 6108 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [variable] ok 6109 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [exception] ok 6110 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [return] ok 6111 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [variable] ok 6112 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [exception] ok 6113 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [return] ok 6114 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [variable] ok 6115 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [exception] ok 6116 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [return] ok 6117 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [variable] ok 6118 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [exception] ok 6119 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [return] ok 6120 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [variable] ok 6121 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [exception] ok 6122 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [return] ok 6123 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [variable] ok 6124 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [exception] ok 6125 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [return] ok 6126 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [variable] ok 6127 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [exception] ok 6128 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [return] ok 6129 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [variable] ok 6130 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [exception] ok 6131 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [return] ok 6132 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [variable] ok 6133 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [exception] ok 6134 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [return] ok 6135 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [variable] ok 6136 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [exception] ok 6137 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [return] ok 6138 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [variable] ok 6139 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [exception] ok 6140 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [return] ok 6141 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [variable] ok 6142 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [exception] ok 6143 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [return] ok 6144 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [variable] ok 6145 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [exception] ok 6146 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [return] ok 6147 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [variable] ok 6148 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [exception] ok 6149 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [return] ok 6150 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [variable] ok 6151 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [exception] ok 6152 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [return] ok 6153 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [variable] ok 6154 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [exception] ok 6155 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [return] ok 6156 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [variable] ok 6157 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [exception] ok 6158 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [return] ok 6159 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [variable] ok 6160 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [exception] ok 6161 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [return] ok 6162 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [variable] ok 6163 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [exception] ok 6164 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [return] ok 6165 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [variable] ok 6166 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [exception] ok 6167 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [return] ok 6168 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [variable] ok 6169 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [exception] ok 6170 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [return] ok 6171 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [variable] ok 6172 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [exception] ok 6173 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [return] ok 6174 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [variable] ok 6175 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [exception] ok 6176 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [return] ok 6177 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [variable] ok 6178 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [exception] ok 6179 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [return] ok 6180 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [variable] ok 6181 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [exception] ok 6182 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [return] ok 6183 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [variable] ok 6184 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [exception] ok 6185 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [return] ok 6186 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [variable] ok 6187 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [exception] ok 6188 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [return] ok 6189 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [variable] ok 6190 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [exception] ok 6191 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [return] ok 6192 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [variable] ok 6193 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [exception] ok 6194 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [return] ok 6195 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [variable] ok 6196 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [exception] ok 6197 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [return] ok 6198 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [variable] ok 6199 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [exception] ok 6200 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [return] ok 6201 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [variable] ok 6202 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [exception] ok 6203 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [return] ok 6204 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [variable] ok 6205 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [exception] ok 6206 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [return] ok 6207 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [variable] ok 6208 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [exception] ok 6209 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [return] ok 6210 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [variable] ok 6211 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [exception] ok 6212 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [return] ok 6213 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [variable] ok 6214 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [exception] ok 6215 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [return] ok 6216 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [variable] ok 6217 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [exception] ok 6218 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [return] ok 6219 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [variable] ok 6220 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [exception] ok 6221 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [return] ok 6222 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [variable] ok 6223 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [exception] ok 6224 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [return] ok 6225 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [variable] ok 6226 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [exception] ok 6227 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [return] ok 6228 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [variable] ok 6229 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [exception] ok 6230 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [return] ok 6231 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [variable] ok 6232 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [exception] ok 6233 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [return] ok 6234 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [variable] ok 6235 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [exception] ok 6236 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [return] ok 6237 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [variable] ok 6238 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [exception] ok 6239 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [return] ok 6240 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [variable] ok 6241 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [exception] ok 6242 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [return] ok 6243 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [variable] ok 6244 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [exception] ok 6245 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [return] ok 6246 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [variable] ok 6247 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [exception] ok 6248 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [return] ok 6249 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [variable] ok 6250 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [exception] ok 6251 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [return] ok 6252 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [variable] ok 6253 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [exception] ok 6254 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [return] ok 6255 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [variable] ok 6256 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [exception] ok 6257 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [return] ok 6258 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [variable] ok 6259 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [exception] ok 6260 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [return] ok 6261 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [variable] ok 6262 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [exception] ok 6263 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [return] ok 6264 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [variable] ok 6265 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [exception] ok 6266 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [return] ok 6267 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [variable] ok 6268 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [exception] ok 6269 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [return] ok 6270 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [variable] ok 6271 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [exception] ok 6272 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [return] ok 6273 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [variable] ok 6274 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [exception] ok 6275 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [return] ok 6276 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [variable] ok 6277 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [exception] ok 6278 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [return] ok 6279 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [variable] ok 6280 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [exception] ok 6281 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [return] ok 6282 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [variable] ok 6283 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [exception] ok 6284 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [return] ok 6285 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [variable] ok 6286 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [exception] ok 6287 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [return] ok 6288 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [variable] ok 6289 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [exception] ok 6290 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [return] ok 6291 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [variable] ok 6292 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [exception] ok 6293 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [return] ok 6294 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [variable] ok 6295 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [exception] ok 6296 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [return] ok 6297 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [variable] ok 6298 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [exception] ok 6299 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [return] ok 6300 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [variable] ok 6301 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [exception] ok 6302 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [return] ok 6303 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [variable] ok 6304 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [exception] ok 6305 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [return] ok 6306 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [variable] ok 6307 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [exception] ok 6308 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [return] ok 6309 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [variable] ok 6310 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [exception] ok 6311 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [return] ok 6312 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [variable] ok 6313 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [exception] ok 6314 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [return] ok 6315 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [variable] ok 6316 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [exception] ok 6317 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [return] ok 6318 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [variable] ok 6319 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [exception] ok 6320 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [return] ok 6321 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [variable] ok 6322 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [exception] ok 6323 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [return] ok 6324 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [variable] ok 6325 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [exception] ok 6326 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [return] ok 6327 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [variable] ok 6328 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [exception] ok 6329 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [return] ok 6330 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [variable] ok 6331 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [exception] ok 6332 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [return] ok 6333 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [variable] ok 6334 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [exception] ok 6335 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [return] ok 6336 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [variable] ok 6337 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [exception] ok 6338 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [return] ok 6339 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [variable] ok 6340 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [exception] ok 6341 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [return] ok 6342 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [variable] ok 6343 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [exception] ok 6344 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [return] ok 6345 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [variable] ok 6346 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [exception] ok 6347 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [return] ok 6348 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [variable] ok 6349 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [exception] ok 6350 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [return] ok 6351 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [variable] ok 6352 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [exception] ok 6353 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [return] ok 6354 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [variable] ok 6355 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [exception] ok 6356 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [return] ok 6357 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [variable] ok 6358 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [exception] ok 6359 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [return] ok 6360 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [variable] ok 6361 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [exception] ok 6362 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [return] ok 6363 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [variable] ok 6364 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [exception] ok 6365 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [return] ok 6366 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [variable] ok 6367 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [exception] ok 6368 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [return] ok 6369 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [variable] ok 6370 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [exception] ok 6371 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [return] ok 6372 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [variable] ok 6373 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [exception] ok 6374 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [return] ok 6375 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [variable] ok 6376 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [exception] ok 6377 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [return] ok 6378 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [variable] ok 6379 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [exception] ok 6380 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [return] ok 6381 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [variable] ok 6382 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [exception] ok 6383 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [return] ok 6384 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [variable] ok 6385 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [exception] ok 6386 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [return] ok 6387 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [variable] ok 6388 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [exception] ok 6389 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [return] ok 6390 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [variable] ok 6391 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [exception] ok 6392 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [return] ok 6393 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [variable] ok 6394 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [exception] ok 6395 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [return] ok 6396 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [variable] ok 6397 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [exception] ok 6398 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [return] ok 6399 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [variable] ok 6400 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [exception] ok 6401 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [return] ok 6402 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [variable] ok 6403 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [exception] ok 6404 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [return] ok 6405 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [variable] ok 6406 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [exception] ok 6407 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [return] ok 6408 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [variable] ok 6409 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [exception] ok 6410 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [return] ok 6411 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [variable] ok 6412 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [exception] ok 6413 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [return] ok 6414 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [variable] ok 6415 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [exception] ok 6416 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [return] ok 6417 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [variable] ok 6418 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [exception] ok 6419 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [return] ok 6420 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [variable] ok 6421 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [exception] ok 6422 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [return] ok 6423 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [variable] ok 6424 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [exception] ok 6425 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [return] ok 6426 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [variable] ok 6427 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [exception] ok 6428 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [return] ok 6429 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [variable] ok 6430 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [exception] ok 6431 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [return] ok 6432 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [variable] ok 6433 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [exception] ok 6434 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [return] ok 6435 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [variable] ok 6436 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [exception] ok 6437 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [return] ok 6438 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [variable] ok 6439 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [exception] ok 6440 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [return] ok 6441 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [variable] ok 6442 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [exception] ok 6443 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [return] ok 6444 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [variable] ok 6445 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [exception] ok 6446 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [return] ok 6447 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [variable] ok 6448 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [exception] ok 6449 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [return] ok 6450 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [variable] ok 6451 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [exception] ok 6452 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [return] ok 6453 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [variable] ok 6454 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [exception] ok 6455 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [return] ok 6456 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [variable] ok 6457 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [exception] ok 6458 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [return] ok 6459 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [variable] ok 6460 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [exception] ok 6461 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [return] ok 6462 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [variable] ok 6463 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [exception] ok 6464 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [return] ok 6465 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [variable] ok 6466 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [exception] ok 6467 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [return] ok 6468 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [variable] ok 6469 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [exception] ok 6470 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [return] ok 6471 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [variable] ok 6472 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [exception] ok 6473 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [return] ok 6474 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [variable] ok 6475 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [exception] ok 6476 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [return] ok 6477 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [variable] ok 6478 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [exception] ok 6479 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [return] ok 6480 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [variable] ok 6481 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [exception] ok 6482 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [return] ok 6483 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [variable] ok 6484 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [exception] ok 6485 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [return] ok 6486 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [variable] ok 6487 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [exception] ok 6488 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [return] ok 6489 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [variable] ok 6490 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [exception] ok 6491 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [return] ok 6492 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [variable] ok 6493 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [exception] ok 6494 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [return] ok 6495 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [variable] ok 6496 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [exception] ok 6497 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [return] ok 6498 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [variable] ok 6499 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [exception] ok 6500 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [return] ok 6501 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [variable] ok 6502 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [exception] ok 6503 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [return] ok 6504 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [variable] ok 6505 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [exception] ok 6506 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [return] ok 6507 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [variable] ok 6508 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [exception] ok 6509 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [return] ok 6510 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [variable] ok 6511 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [exception] ok 6512 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [return] ok 6513 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [variable] ok 6514 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [exception] ok 6515 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [return] ok 6516 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [variable] ok 6517 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [exception] ok 6518 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [return] ok 6519 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [variable] ok 6520 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [exception] ok 6521 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [return] ok 6522 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [variable] ok 6523 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [exception] ok 6524 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [return] ok 6525 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [variable] ok 6526 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [exception] ok 6527 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [return] ok 6528 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [variable] ok 6529 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [exception] ok 6530 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [return] ok 6531 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [variable] ok 6532 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [exception] ok 6533 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [return] ok 6534 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [variable] ok 6535 - my $x; $x->{a} = 1 [exception] ok 6536 - my $x; $x->{a} = 1 [return] ok 6537 - my $x; $x->{a} = 1 [variable] ok 6538 - our $x; local $x; use strict; $x->{a} = 1 [exception] ok 6539 - our $x; local $x; use strict; $x->{a} = 1 [return] ok 6540 - our $x; local $x; use strict; $x->{a} = 1 [variable] ok 6541 - our $x; local $x; no strict; $x->{a} = 1 [exception] ok 6542 - our $x; local $x; no strict; $x->{a} = 1 [return] ok 6543 - our $x; local $x; no strict; $x->{a} = 1 [variable] ok 6544 - my $x; $$x{a} = 1 [exception] ok 6545 - my $x; $$x{a} = 1 [return] ok 6546 - my $x; $$x{a} = 1 [variable] ok 6547 - our $x; local $x; use strict; $$x{a} = 1 [exception] ok 6548 - our $x; local $x; use strict; $$x{a} = 1 [return] ok 6549 - our $x; local $x; use strict; $$x{a} = 1 [variable] ok 6550 - our $x; local $x; no strict; $$x{a} = 1 [exception] ok 6551 - our $x; local $x; no strict; $$x{a} = 1 [return] ok 6552 - our $x; local $x; no strict; $$x{a} = 1 [variable] ok 6553 - my %x; $x{a} = 1 [exception] ok 6554 - my %x; $x{a} = 1 [return] ok 6555 - my %x; $x{a} = 1 [variable] ok 6556 - our %x; local %x; use strict; $x{a} = 1 [exception] ok 6557 - our %x; local %x; use strict; $x{a} = 1 [return] ok 6558 - our %x; local %x; use strict; $x{a} = 1 [variable] ok 6559 - our %x; local %x; no strict; $x{a} = 1 [exception] ok 6560 - our %x; local %x; no strict; $x{a} = 1 [return] ok 6561 - our %x; local %x; no strict; $x{a} = 1 [variable] ok 6562 - my $x; $x->{a} = 1 [exception] ok 6563 - my $x; $x->{a} = 1 [return] ok 6564 - my $x; $x->{a} = 1 [variable] ok 6565 - our $x; local $x; use strict; $x->{a} = 1 [exception] ok 6566 - our $x; local $x; use strict; $x->{a} = 1 [return] ok 6567 - our $x; local $x; use strict; $x->{a} = 1 [variable] ok 6568 - our $x; local $x; no strict; $x->{a} = 1 [exception] ok 6569 - our $x; local $x; no strict; $x->{a} = 1 [return] ok 6570 - our $x; local $x; no strict; $x->{a} = 1 [variable] ok 6571 - my $x; $$x{a} = 1 [exception] ok 6572 - my $x; $$x{a} = 1 [return] ok 6573 - my $x; $$x{a} = 1 [variable] ok 6574 - our $x; local $x; use strict; $$x{a} = 1 [exception] ok 6575 - our $x; local $x; use strict; $$x{a} = 1 [return] ok 6576 - our $x; local $x; use strict; $$x{a} = 1 [variable] ok 6577 - our $x; local $x; no strict; $$x{a} = 1 [exception] ok 6578 - our $x; local $x; no strict; $$x{a} = 1 [return] ok 6579 - our $x; local $x; no strict; $$x{a} = 1 [variable] ok 6580 - my %x; $x{a} = 1 [exception] ok 6581 - my %x; $x{a} = 1 [return] ok 6582 - my %x; $x{a} = 1 [variable] ok 6583 - our %x; local %x; use strict; $x{a} = 1 [exception] ok 6584 - our %x; local %x; use strict; $x{a} = 1 [return] ok 6585 - our %x; local %x; use strict; $x{a} = 1 [variable] ok 6586 - our %x; local %x; no strict; $x{a} = 1 [exception] ok 6587 - our %x; local %x; no strict; $x{a} = 1 [return] ok 6588 - our %x; local %x; no strict; $x{a} = 1 [variable] ok 6589 - my $x; $x->{a} = 1 <+fetch> [exception] ok 6590 - my $x; $x->{a} = 1 <+fetch> [return] ok 6591 - my $x; $x->{a} = 1 <+fetch> [variable] ok 6592 - our $x; local $x; use strict; $x->{a} = 1 <+fetch> [exception] ok 6593 - our $x; local $x; use strict; $x->{a} = 1 <+fetch> [return] ok 6594 - our $x; local $x; use strict; $x->{a} = 1 <+fetch> [variable] ok 6595 - our $x; local $x; no strict; $x->{a} = 1 <+fetch> [exception] ok 6596 - our $x; local $x; no strict; $x->{a} = 1 <+fetch> [return] ok 6597 - our $x; local $x; no strict; $x->{a} = 1 <+fetch> [variable] ok 6598 - my $x; $$x{a} = 1 <+fetch> [exception] ok 6599 - my $x; $$x{a} = 1 <+fetch> [return] ok 6600 - my $x; $$x{a} = 1 <+fetch> [variable] ok 6601 - our $x; local $x; use strict; $$x{a} = 1 <+fetch> [exception] ok 6602 - our $x; local $x; use strict; $$x{a} = 1 <+fetch> [return] ok 6603 - our $x; local $x; use strict; $$x{a} = 1 <+fetch> [variable] ok 6604 - our $x; local $x; no strict; $$x{a} = 1 <+fetch> [exception] ok 6605 - our $x; local $x; no strict; $$x{a} = 1 <+fetch> [return] ok 6606 - our $x; local $x; no strict; $$x{a} = 1 <+fetch> [variable] ok 6607 - my %x; $x{a} = 1 <+fetch> [exception] ok 6608 - my %x; $x{a} = 1 <+fetch> [return] ok 6609 - my %x; $x{a} = 1 <+fetch> [variable] ok 6610 - our %x; local %x; use strict; $x{a} = 1 <+fetch> [exception] ok 6611 - our %x; local %x; use strict; $x{a} = 1 <+fetch> [return] ok 6612 - our %x; local %x; use strict; $x{a} = 1 <+fetch> [variable] ok 6613 - our %x; local %x; no strict; $x{a} = 1 <+fetch> [exception] ok 6614 - our %x; local %x; no strict; $x{a} = 1 <+fetch> [return] ok 6615 - our %x; local %x; no strict; $x{a} = 1 <+fetch> [variable] ok 6616 - my $x; $x->{a} = 1 <+exists> [exception] ok 6617 - my $x; $x->{a} = 1 <+exists> [return] ok 6618 - my $x; $x->{a} = 1 <+exists> [variable] ok 6619 - our $x; local $x; use strict; $x->{a} = 1 <+exists> [exception] ok 6620 - our $x; local $x; use strict; $x->{a} = 1 <+exists> [return] ok 6621 - our $x; local $x; use strict; $x->{a} = 1 <+exists> [variable] ok 6622 - our $x; local $x; no strict; $x->{a} = 1 <+exists> [exception] ok 6623 - our $x; local $x; no strict; $x->{a} = 1 <+exists> [return] ok 6624 - our $x; local $x; no strict; $x->{a} = 1 <+exists> [variable] ok 6625 - my $x; $$x{a} = 1 <+exists> [exception] ok 6626 - my $x; $$x{a} = 1 <+exists> [return] ok 6627 - my $x; $$x{a} = 1 <+exists> [variable] ok 6628 - our $x; local $x; use strict; $$x{a} = 1 <+exists> [exception] ok 6629 - our $x; local $x; use strict; $$x{a} = 1 <+exists> [return] ok 6630 - our $x; local $x; use strict; $$x{a} = 1 <+exists> [variable] ok 6631 - our $x; local $x; no strict; $$x{a} = 1 <+exists> [exception] ok 6632 - our $x; local $x; no strict; $$x{a} = 1 <+exists> [return] ok 6633 - our $x; local $x; no strict; $$x{a} = 1 <+exists> [variable] ok 6634 - my %x; $x{a} = 1 <+exists> [exception] ok 6635 - my %x; $x{a} = 1 <+exists> [return] ok 6636 - my %x; $x{a} = 1 <+exists> [variable] ok 6637 - our %x; local %x; use strict; $x{a} = 1 <+exists> [exception] ok 6638 - our %x; local %x; use strict; $x{a} = 1 <+exists> [return] ok 6639 - our %x; local %x; use strict; $x{a} = 1 <+exists> [variable] ok 6640 - our %x; local %x; no strict; $x{a} = 1 <+exists> [exception] ok 6641 - our %x; local %x; no strict; $x{a} = 1 <+exists> [return] ok 6642 - our %x; local %x; no strict; $x{a} = 1 <+exists> [variable] ok 6643 - my $x; $x->{a} = 1 <+delete> [exception] ok 6644 - my $x; $x->{a} = 1 <+delete> [return] ok 6645 - my $x; $x->{a} = 1 <+delete> [variable] ok 6646 - our $x; local $x; use strict; $x->{a} = 1 <+delete> [exception] ok 6647 - our $x; local $x; use strict; $x->{a} = 1 <+delete> [return] ok 6648 - our $x; local $x; use strict; $x->{a} = 1 <+delete> [variable] ok 6649 - our $x; local $x; no strict; $x->{a} = 1 <+delete> [exception] ok 6650 - our $x; local $x; no strict; $x->{a} = 1 <+delete> [return] ok 6651 - our $x; local $x; no strict; $x->{a} = 1 <+delete> [variable] ok 6652 - my $x; $$x{a} = 1 <+delete> [exception] ok 6653 - my $x; $$x{a} = 1 <+delete> [return] ok 6654 - my $x; $$x{a} = 1 <+delete> [variable] ok 6655 - our $x; local $x; use strict; $$x{a} = 1 <+delete> [exception] ok 6656 - our $x; local $x; use strict; $$x{a} = 1 <+delete> [return] ok 6657 - our $x; local $x; use strict; $$x{a} = 1 <+delete> [variable] ok 6658 - our $x; local $x; no strict; $$x{a} = 1 <+delete> [exception] ok 6659 - our $x; local $x; no strict; $$x{a} = 1 <+delete> [return] ok 6660 - our $x; local $x; no strict; $$x{a} = 1 <+delete> [variable] ok 6661 - my %x; $x{a} = 1 <+delete> [exception] ok 6662 - my %x; $x{a} = 1 <+delete> [return] ok 6663 - my %x; $x{a} = 1 <+delete> [variable] ok 6664 - our %x; local %x; use strict; $x{a} = 1 <+delete> [exception] ok 6665 - our %x; local %x; use strict; $x{a} = 1 <+delete> [return] ok 6666 - our %x; local %x; use strict; $x{a} = 1 <+delete> [variable] ok 6667 - our %x; local %x; no strict; $x{a} = 1 <+delete> [exception] ok 6668 - our %x; local %x; no strict; $x{a} = 1 <+delete> [return] ok 6669 - our %x; local %x; no strict; $x{a} = 1 <+delete> [variable] ok 6670 - my $x; $x->{a} = 1 <+store> [exception] ok 6671 - my $x; $x->{a} = 1 <+store> [return] ok 6672 - my $x; $x->{a} = 1 <+store> [variable] ok 6673 - our $x; local $x; use strict; $x->{a} = 1 <+store> [exception] ok 6674 - our $x; local $x; use strict; $x->{a} = 1 <+store> [return] ok 6675 - our $x; local $x; use strict; $x->{a} = 1 <+store> [variable] ok 6676 - our $x; local $x; no strict; $x->{a} = 1 <+store> [exception] ok 6677 - our $x; local $x; no strict; $x->{a} = 1 <+store> [return] ok 6678 - our $x; local $x; no strict; $x->{a} = 1 <+store> [variable] ok 6679 - my $x; $$x{a} = 1 <+store> [exception] ok 6680 - my $x; $$x{a} = 1 <+store> [return] ok 6681 - my $x; $$x{a} = 1 <+store> [variable] ok 6682 - our $x; local $x; use strict; $$x{a} = 1 <+store> [exception] ok 6683 - our $x; local $x; use strict; $$x{a} = 1 <+store> [return] ok 6684 - our $x; local $x; use strict; $$x{a} = 1 <+store> [variable] ok 6685 - our $x; local $x; no strict; $$x{a} = 1 <+store> [exception] ok 6686 - our $x; local $x; no strict; $$x{a} = 1 <+store> [return] ok 6687 - our $x; local $x; no strict; $$x{a} = 1 <+store> [variable] ok 6688 - my %x; 1 <+store> [exception] ok 6689 - my %x; 1 <+store> [return] ok 6690 - my %x; 1 <+store> [variable] ok 6691 - our %x; local %x; use strict; 1 <+store> [exception] ok 6692 - our %x; local %x; use strict; 1 <+store> [return] ok 6693 - our %x; local %x; use strict; 1 <+store> [variable] ok 6694 - our %x; local %x; no strict; 1 <+store> [exception] ok 6695 - our %x; local %x; no strict; 1 <+store> [return] ok 6696 - our %x; local %x; no strict; 1 <+store> [variable] ok 6697 - my $x; $x->{a} = 1 <+strict +fetch> [exception] ok 6698 - my $x; $x->{a} = 1 <+strict +fetch> [return] ok 6699 - my $x; $x->{a} = 1 <+strict +fetch> [variable] ok 6700 - our $x; local $x; use strict; $x->{a} = 1 <+strict +fetch> [exception] ok 6701 - our $x; local $x; use strict; $x->{a} = 1 <+strict +fetch> [return] ok 6702 - our $x; local $x; use strict; $x->{a} = 1 <+strict +fetch> [variable] ok 6703 - our $x; local $x; no strict; $x->{a} = 1 <+strict +fetch> [exception] ok 6704 - our $x; local $x; no strict; $x->{a} = 1 <+strict +fetch> [return] ok 6705 - our $x; local $x; no strict; $x->{a} = 1 <+strict +fetch> [variable] ok 6706 - my $x; $$x{a} = 1 <+strict +fetch> [exception] ok 6707 - my $x; $$x{a} = 1 <+strict +fetch> [return] ok 6708 - my $x; $$x{a} = 1 <+strict +fetch> [variable] ok 6709 - our $x; local $x; use strict; $$x{a} = 1 <+strict +fetch> [exception] ok 6710 - our $x; local $x; use strict; $$x{a} = 1 <+strict +fetch> [return] ok 6711 - our $x; local $x; use strict; $$x{a} = 1 <+strict +fetch> [variable] ok 6712 - our $x; local $x; no strict; $$x{a} = 1 <+strict +fetch> [exception] ok 6713 - our $x; local $x; no strict; $$x{a} = 1 <+strict +fetch> [return] ok 6714 - our $x; local $x; no strict; $$x{a} = 1 <+strict +fetch> [variable] ok 6715 - my %x; $x{a} = 1 <+strict +fetch> [exception] ok 6716 - my %x; $x{a} = 1 <+strict +fetch> [return] ok 6717 - my %x; $x{a} = 1 <+strict +fetch> [variable] ok 6718 - our %x; local %x; use strict; $x{a} = 1 <+strict +fetch> [exception] ok 6719 - our %x; local %x; use strict; $x{a} = 1 <+strict +fetch> [return] ok 6720 - our %x; local %x; use strict; $x{a} = 1 <+strict +fetch> [variable] ok 6721 - our %x; local %x; no strict; $x{a} = 1 <+strict +fetch> [exception] ok 6722 - our %x; local %x; no strict; $x{a} = 1 <+strict +fetch> [return] ok 6723 - our %x; local %x; no strict; $x{a} = 1 <+strict +fetch> [variable] ok 6724 - my $x; $x->{a} = 1 <+strict +exists> [exception] ok 6725 - my $x; $x->{a} = 1 <+strict +exists> [return] ok 6726 - my $x; $x->{a} = 1 <+strict +exists> [variable] ok 6727 - our $x; local $x; use strict; $x->{a} = 1 <+strict +exists> [exception] ok 6728 - our $x; local $x; use strict; $x->{a} = 1 <+strict +exists> [return] ok 6729 - our $x; local $x; use strict; $x->{a} = 1 <+strict +exists> [variable] ok 6730 - our $x; local $x; no strict; $x->{a} = 1 <+strict +exists> [exception] ok 6731 - our $x; local $x; no strict; $x->{a} = 1 <+strict +exists> [return] ok 6732 - our $x; local $x; no strict; $x->{a} = 1 <+strict +exists> [variable] ok 6733 - my $x; $$x{a} = 1 <+strict +exists> [exception] ok 6734 - my $x; $$x{a} = 1 <+strict +exists> [return] ok 6735 - my $x; $$x{a} = 1 <+strict +exists> [variable] ok 6736 - our $x; local $x; use strict; $$x{a} = 1 <+strict +exists> [exception] ok 6737 - our $x; local $x; use strict; $$x{a} = 1 <+strict +exists> [return] ok 6738 - our $x; local $x; use strict; $$x{a} = 1 <+strict +exists> [variable] ok 6739 - our $x; local $x; no strict; $$x{a} = 1 <+strict +exists> [exception] ok 6740 - our $x; local $x; no strict; $$x{a} = 1 <+strict +exists> [return] ok 6741 - our $x; local $x; no strict; $$x{a} = 1 <+strict +exists> [variable] ok 6742 - my %x; $x{a} = 1 <+strict +exists> [exception] ok 6743 - my %x; $x{a} = 1 <+strict +exists> [return] ok 6744 - my %x; $x{a} = 1 <+strict +exists> [variable] ok 6745 - our %x; local %x; use strict; $x{a} = 1 <+strict +exists> [exception] ok 6746 - our %x; local %x; use strict; $x{a} = 1 <+strict +exists> [return] ok 6747 - our %x; local %x; use strict; $x{a} = 1 <+strict +exists> [variable] ok 6748 - our %x; local %x; no strict; $x{a} = 1 <+strict +exists> [exception] ok 6749 - our %x; local %x; no strict; $x{a} = 1 <+strict +exists> [return] ok 6750 - our %x; local %x; no strict; $x{a} = 1 <+strict +exists> [variable] ok 6751 - my $x; $x->{a} = 1 <+strict +delete> [exception] ok 6752 - my $x; $x->{a} = 1 <+strict +delete> [return] ok 6753 - my $x; $x->{a} = 1 <+strict +delete> [variable] ok 6754 - our $x; local $x; use strict; $x->{a} = 1 <+strict +delete> [exception] ok 6755 - our $x; local $x; use strict; $x->{a} = 1 <+strict +delete> [return] ok 6756 - our $x; local $x; use strict; $x->{a} = 1 <+strict +delete> [variable] ok 6757 - our $x; local $x; no strict; $x->{a} = 1 <+strict +delete> [exception] ok 6758 - our $x; local $x; no strict; $x->{a} = 1 <+strict +delete> [return] ok 6759 - our $x; local $x; no strict; $x->{a} = 1 <+strict +delete> [variable] ok 6760 - my $x; $$x{a} = 1 <+strict +delete> [exception] ok 6761 - my $x; $$x{a} = 1 <+strict +delete> [return] ok 6762 - my $x; $$x{a} = 1 <+strict +delete> [variable] ok 6763 - our $x; local $x; use strict; $$x{a} = 1 <+strict +delete> [exception] ok 6764 - our $x; local $x; use strict; $$x{a} = 1 <+strict +delete> [return] ok 6765 - our $x; local $x; use strict; $$x{a} = 1 <+strict +delete> [variable] ok 6766 - our $x; local $x; no strict; $$x{a} = 1 <+strict +delete> [exception] ok 6767 - our $x; local $x; no strict; $$x{a} = 1 <+strict +delete> [return] ok 6768 - our $x; local $x; no strict; $$x{a} = 1 <+strict +delete> [variable] ok 6769 - my %x; $x{a} = 1 <+strict +delete> [exception] ok 6770 - my %x; $x{a} = 1 <+strict +delete> [return] ok 6771 - my %x; $x{a} = 1 <+strict +delete> [variable] ok 6772 - our %x; local %x; use strict; $x{a} = 1 <+strict +delete> [exception] ok 6773 - our %x; local %x; use strict; $x{a} = 1 <+strict +delete> [return] ok 6774 - our %x; local %x; use strict; $x{a} = 1 <+strict +delete> [variable] ok 6775 - our %x; local %x; no strict; $x{a} = 1 <+strict +delete> [exception] ok 6776 - our %x; local %x; no strict; $x{a} = 1 <+strict +delete> [return] ok 6777 - our %x; local %x; no strict; $x{a} = 1 <+strict +delete> [variable] ok 6778 - my $x; $x->{a} = 1 <+strict +store> [exception] ok 6779 - my $x; $x->{a} = 1 <+strict +store> [return] ok 6780 - my $x; $x->{a} = 1 <+strict +store> [variable] ok 6781 - our $x; local $x; use strict; $x->{a} = 1 <+strict +store> [exception] ok 6782 - our $x; local $x; use strict; $x->{a} = 1 <+strict +store> [return] ok 6783 - our $x; local $x; use strict; $x->{a} = 1 <+strict +store> [variable] ok 6784 - our $x; local $x; no strict; $x->{a} = 1 <+strict +store> [exception] ok 6785 - our $x; local $x; no strict; $x->{a} = 1 <+strict +store> [return] ok 6786 - our $x; local $x; no strict; $x->{a} = 1 <+strict +store> [variable] ok 6787 - my $x; $$x{a} = 1 <+strict +store> [exception] ok 6788 - my $x; $$x{a} = 1 <+strict +store> [return] ok 6789 - my $x; $$x{a} = 1 <+strict +store> [variable] ok 6790 - our $x; local $x; use strict; $$x{a} = 1 <+strict +store> [exception] ok 6791 - our $x; local $x; use strict; $$x{a} = 1 <+strict +store> [return] ok 6792 - our $x; local $x; use strict; $$x{a} = 1 <+strict +store> [variable] ok 6793 - our $x; local $x; no strict; $$x{a} = 1 <+strict +store> [exception] ok 6794 - our $x; local $x; no strict; $$x{a} = 1 <+strict +store> [return] ok 6795 - our $x; local $x; no strict; $$x{a} = 1 <+strict +store> [variable] ok 6796 - my %x; 1 <+strict +store> [exception] ok 6797 - my %x; 1 <+strict +store> [return] ok 6798 - my %x; 1 <+strict +store> [variable] ok 6799 - our %x; local %x; use strict; 1 <+strict +store> [exception] ok 6800 - our %x; local %x; use strict; 1 <+strict +store> [return] ok 6801 - our %x; local %x; use strict; 1 <+strict +store> [variable] ok 6802 - our %x; local %x; no strict; 1 <+strict +store> [exception] ok 6803 - our %x; local %x; no strict; 1 <+strict +store> [return] ok 6804 - our %x; local %x; no strict; 1 <+strict +store> [variable] ok 6805 - my $x; $x->{a}->{b} = 1 [exception] ok 6806 - my $x; $x->{a}->{b} = 1 [return] ok 6807 - my $x; $x->{a}->{b} = 1 [variable] ok 6808 - our $x; local $x; use strict; $x->{a}->{b} = 1 [exception] ok 6809 - our $x; local $x; use strict; $x->{a}->{b} = 1 [return] ok 6810 - our $x; local $x; use strict; $x->{a}->{b} = 1 [variable] ok 6811 - our $x; local $x; no strict; $x->{a}->{b} = 1 [exception] ok 6812 - our $x; local $x; no strict; $x->{a}->{b} = 1 [return] ok 6813 - our $x; local $x; no strict; $x->{a}->{b} = 1 [variable] ok 6814 - my $x; $$x{a}->{b} = 1 [exception] ok 6815 - my $x; $$x{a}->{b} = 1 [return] ok 6816 - my $x; $$x{a}->{b} = 1 [variable] ok 6817 - our $x; local $x; use strict; $$x{a}->{b} = 1 [exception] ok 6818 - our $x; local $x; use strict; $$x{a}->{b} = 1 [return] ok 6819 - our $x; local $x; use strict; $$x{a}->{b} = 1 [variable] ok 6820 - our $x; local $x; no strict; $$x{a}->{b} = 1 [exception] ok 6821 - our $x; local $x; no strict; $$x{a}->{b} = 1 [return] ok 6822 - our $x; local $x; no strict; $$x{a}->{b} = 1 [variable] ok 6823 - my %x; $x{a}->{b} = 1 [exception] ok 6824 - my %x; $x{a}->{b} = 1 [return] ok 6825 - my %x; $x{a}->{b} = 1 [variable] ok 6826 - our %x; local %x; use strict; $x{a}->{b} = 1 [exception] ok 6827 - our %x; local %x; use strict; $x{a}->{b} = 1 [return] ok 6828 - our %x; local %x; use strict; $x{a}->{b} = 1 [variable] ok 6829 - our %x; local %x; no strict; $x{a}->{b} = 1 [exception] ok 6830 - our %x; local %x; no strict; $x{a}->{b} = 1 [return] ok 6831 - our %x; local %x; no strict; $x{a}->{b} = 1 [variable] ok 6832 - my $x; $x->{a}->{b} = 1 [exception] ok 6833 - my $x; $x->{a}->{b} = 1 [return] ok 6834 - my $x; $x->{a}->{b} = 1 [variable] ok 6835 - our $x; local $x; use strict; $x->{a}->{b} = 1 [exception] ok 6836 - our $x; local $x; use strict; $x->{a}->{b} = 1 [return] ok 6837 - our $x; local $x; use strict; $x->{a}->{b} = 1 [variable] ok 6838 - our $x; local $x; no strict; $x->{a}->{b} = 1 [exception] ok 6839 - our $x; local $x; no strict; $x->{a}->{b} = 1 [return] ok 6840 - our $x; local $x; no strict; $x->{a}->{b} = 1 [variable] ok 6841 - my $x; $$x{a}->{b} = 1 [exception] ok 6842 - my $x; $$x{a}->{b} = 1 [return] ok 6843 - my $x; $$x{a}->{b} = 1 [variable] ok 6844 - our $x; local $x; use strict; $$x{a}->{b} = 1 [exception] ok 6845 - our $x; local $x; use strict; $$x{a}->{b} = 1 [return] ok 6846 - our $x; local $x; use strict; $$x{a}->{b} = 1 [variable] ok 6847 - our $x; local $x; no strict; $$x{a}->{b} = 1 [exception] ok 6848 - our $x; local $x; no strict; $$x{a}->{b} = 1 [return] ok 6849 - our $x; local $x; no strict; $$x{a}->{b} = 1 [variable] ok 6850 - my %x; $x{a}->{b} = 1 [exception] ok 6851 - my %x; $x{a}->{b} = 1 [return] ok 6852 - my %x; $x{a}->{b} = 1 [variable] ok 6853 - our %x; local %x; use strict; $x{a}->{b} = 1 [exception] ok 6854 - our %x; local %x; use strict; $x{a}->{b} = 1 [return] ok 6855 - our %x; local %x; use strict; $x{a}->{b} = 1 [variable] ok 6856 - our %x; local %x; no strict; $x{a}->{b} = 1 [exception] ok 6857 - our %x; local %x; no strict; $x{a}->{b} = 1 [return] ok 6858 - our %x; local %x; no strict; $x{a}->{b} = 1 [variable] ok 6859 - my $x; $x->{a}->{b} = 1 <+fetch> [exception] ok 6860 - my $x; $x->{a}->{b} = 1 <+fetch> [return] ok 6861 - my $x; $x->{a}->{b} = 1 <+fetch> [variable] ok 6862 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+fetch> [exception] ok 6863 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+fetch> [return] ok 6864 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+fetch> [variable] ok 6865 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+fetch> [exception] ok 6866 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+fetch> [return] ok 6867 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+fetch> [variable] ok 6868 - my $x; $$x{a}->{b} = 1 <+fetch> [exception] ok 6869 - my $x; $$x{a}->{b} = 1 <+fetch> [return] ok 6870 - my $x; $$x{a}->{b} = 1 <+fetch> [variable] ok 6871 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+fetch> [exception] ok 6872 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+fetch> [return] ok 6873 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+fetch> [variable] ok 6874 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+fetch> [exception] ok 6875 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+fetch> [return] ok 6876 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+fetch> [variable] ok 6877 - my %x; $x{a}->{b} = 1 <+fetch> [exception] ok 6878 - my %x; $x{a}->{b} = 1 <+fetch> [return] ok 6879 - my %x; $x{a}->{b} = 1 <+fetch> [variable] ok 6880 - our %x; local %x; use strict; $x{a}->{b} = 1 <+fetch> [exception] ok 6881 - our %x; local %x; use strict; $x{a}->{b} = 1 <+fetch> [return] ok 6882 - our %x; local %x; use strict; $x{a}->{b} = 1 <+fetch> [variable] ok 6883 - our %x; local %x; no strict; $x{a}->{b} = 1 <+fetch> [exception] ok 6884 - our %x; local %x; no strict; $x{a}->{b} = 1 <+fetch> [return] ok 6885 - our %x; local %x; no strict; $x{a}->{b} = 1 <+fetch> [variable] ok 6886 - my $x; $x->{a}->{b} = 1 <+exists> [exception] ok 6887 - my $x; $x->{a}->{b} = 1 <+exists> [return] ok 6888 - my $x; $x->{a}->{b} = 1 <+exists> [variable] ok 6889 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+exists> [exception] ok 6890 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+exists> [return] ok 6891 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+exists> [variable] ok 6892 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+exists> [exception] ok 6893 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+exists> [return] ok 6894 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+exists> [variable] ok 6895 - my $x; $$x{a}->{b} = 1 <+exists> [exception] ok 6896 - my $x; $$x{a}->{b} = 1 <+exists> [return] ok 6897 - my $x; $$x{a}->{b} = 1 <+exists> [variable] ok 6898 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+exists> [exception] ok 6899 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+exists> [return] ok 6900 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+exists> [variable] ok 6901 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+exists> [exception] ok 6902 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+exists> [return] ok 6903 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+exists> [variable] ok 6904 - my %x; $x{a}->{b} = 1 <+exists> [exception] ok 6905 - my %x; $x{a}->{b} = 1 <+exists> [return] ok 6906 - my %x; $x{a}->{b} = 1 <+exists> [variable] ok 6907 - our %x; local %x; use strict; $x{a}->{b} = 1 <+exists> [exception] ok 6908 - our %x; local %x; use strict; $x{a}->{b} = 1 <+exists> [return] ok 6909 - our %x; local %x; use strict; $x{a}->{b} = 1 <+exists> [variable] ok 6910 - our %x; local %x; no strict; $x{a}->{b} = 1 <+exists> [exception] ok 6911 - our %x; local %x; no strict; $x{a}->{b} = 1 <+exists> [return] ok 6912 - our %x; local %x; no strict; $x{a}->{b} = 1 <+exists> [variable] ok 6913 - my $x; $x->{a}->{b} = 1 <+delete> [exception] ok 6914 - my $x; $x->{a}->{b} = 1 <+delete> [return] ok 6915 - my $x; $x->{a}->{b} = 1 <+delete> [variable] ok 6916 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+delete> [exception] ok 6917 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+delete> [return] ok 6918 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+delete> [variable] ok 6919 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+delete> [exception] ok 6920 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+delete> [return] ok 6921 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+delete> [variable] ok 6922 - my $x; $$x{a}->{b} = 1 <+delete> [exception] ok 6923 - my $x; $$x{a}->{b} = 1 <+delete> [return] ok 6924 - my $x; $$x{a}->{b} = 1 <+delete> [variable] ok 6925 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+delete> [exception] ok 6926 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+delete> [return] ok 6927 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+delete> [variable] ok 6928 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+delete> [exception] ok 6929 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+delete> [return] ok 6930 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+delete> [variable] ok 6931 - my %x; $x{a}->{b} = 1 <+delete> [exception] ok 6932 - my %x; $x{a}->{b} = 1 <+delete> [return] ok 6933 - my %x; $x{a}->{b} = 1 <+delete> [variable] ok 6934 - our %x; local %x; use strict; $x{a}->{b} = 1 <+delete> [exception] ok 6935 - our %x; local %x; use strict; $x{a}->{b} = 1 <+delete> [return] ok 6936 - our %x; local %x; use strict; $x{a}->{b} = 1 <+delete> [variable] ok 6937 - our %x; local %x; no strict; $x{a}->{b} = 1 <+delete> [exception] ok 6938 - our %x; local %x; no strict; $x{a}->{b} = 1 <+delete> [return] ok 6939 - our %x; local %x; no strict; $x{a}->{b} = 1 <+delete> [variable] ok 6940 - my $x; $x->{a}->{b} = 1 <+store> [exception] ok 6941 - my $x; $x->{a}->{b} = 1 <+store> [return] ok 6942 - my $x; $x->{a}->{b} = 1 <+store> [variable] ok 6943 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+store> [exception] ok 6944 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+store> [return] ok 6945 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+store> [variable] ok 6946 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+store> [exception] ok 6947 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+store> [return] ok 6948 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+store> [variable] ok 6949 - my $x; $$x{a}->{b} = 1 <+store> [exception] ok 6950 - my $x; $$x{a}->{b} = 1 <+store> [return] ok 6951 - my $x; $$x{a}->{b} = 1 <+store> [variable] ok 6952 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+store> [exception] ok 6953 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+store> [return] ok 6954 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+store> [variable] ok 6955 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+store> [exception] ok 6956 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+store> [return] ok 6957 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+store> [variable] ok 6958 - my %x; $x{a}->{b} = 1 <+store> [exception] ok 6959 - my %x; $x{a}->{b} = 1 <+store> [return] ok 6960 - my %x; $x{a}->{b} = 1 <+store> [variable] ok 6961 - our %x; local %x; use strict; $x{a}->{b} = 1 <+store> [exception] ok 6962 - our %x; local %x; use strict; $x{a}->{b} = 1 <+store> [return] ok 6963 - our %x; local %x; use strict; $x{a}->{b} = 1 <+store> [variable] ok 6964 - our %x; local %x; no strict; $x{a}->{b} = 1 <+store> [exception] ok 6965 - our %x; local %x; no strict; $x{a}->{b} = 1 <+store> [return] ok 6966 - our %x; local %x; no strict; $x{a}->{b} = 1 <+store> [variable] ok 6967 - my $x; $x->{a}->{b} = 1 <+strict +fetch> [exception] ok 6968 - my $x; $x->{a}->{b} = 1 <+strict +fetch> [return] ok 6969 - my $x; $x->{a}->{b} = 1 <+strict +fetch> [variable] ok 6970 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +fetch> [exception] ok 6971 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +fetch> [return] ok 6972 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +fetch> [variable] ok 6973 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +fetch> [exception] ok 6974 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +fetch> [return] ok 6975 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +fetch> [variable] ok 6976 - my $x; $$x{a}->{b} = 1 <+strict +fetch> [exception] ok 6977 - my $x; $$x{a}->{b} = 1 <+strict +fetch> [return] ok 6978 - my $x; $$x{a}->{b} = 1 <+strict +fetch> [variable] ok 6979 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +fetch> [exception] ok 6980 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +fetch> [return] ok 6981 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +fetch> [variable] ok 6982 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +fetch> [exception] ok 6983 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +fetch> [return] ok 6984 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +fetch> [variable] ok 6985 - my %x; $x{a}->{b} = 1 <+strict +fetch> [exception] ok 6986 - my %x; $x{a}->{b} = 1 <+strict +fetch> [return] ok 6987 - my %x; $x{a}->{b} = 1 <+strict +fetch> [variable] ok 6988 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +fetch> [exception] ok 6989 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +fetch> [return] ok 6990 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +fetch> [variable] ok 6991 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +fetch> [exception] ok 6992 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +fetch> [return] ok 6993 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +fetch> [variable] ok 6994 - my $x; $x->{a}->{b} = 1 <+strict +exists> [exception] ok 6995 - my $x; $x->{a}->{b} = 1 <+strict +exists> [return] ok 6996 - my $x; $x->{a}->{b} = 1 <+strict +exists> [variable] ok 6997 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +exists> [exception] ok 6998 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +exists> [return] ok 6999 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +exists> [variable] ok 7000 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +exists> [exception] ok 7001 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +exists> [return] ok 7002 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +exists> [variable] ok 7003 - my $x; $$x{a}->{b} = 1 <+strict +exists> [exception] ok 7004 - my $x; $$x{a}->{b} = 1 <+strict +exists> [return] ok 7005 - my $x; $$x{a}->{b} = 1 <+strict +exists> [variable] ok 7006 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +exists> [exception] ok 7007 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +exists> [return] ok 7008 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +exists> [variable] ok 7009 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +exists> [exception] ok 7010 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +exists> [return] ok 7011 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +exists> [variable] ok 7012 - my %x; $x{a}->{b} = 1 <+strict +exists> [exception] ok 7013 - my %x; $x{a}->{b} = 1 <+strict +exists> [return] ok 7014 - my %x; $x{a}->{b} = 1 <+strict +exists> [variable] ok 7015 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +exists> [exception] ok 7016 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +exists> [return] ok 7017 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +exists> [variable] ok 7018 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +exists> [exception] ok 7019 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +exists> [return] ok 7020 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +exists> [variable] ok 7021 - my $x; $x->{a}->{b} = 1 <+strict +delete> [exception] ok 7022 - my $x; $x->{a}->{b} = 1 <+strict +delete> [return] ok 7023 - my $x; $x->{a}->{b} = 1 <+strict +delete> [variable] ok 7024 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +delete> [exception] ok 7025 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +delete> [return] ok 7026 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +delete> [variable] ok 7027 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +delete> [exception] ok 7028 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +delete> [return] ok 7029 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +delete> [variable] ok 7030 - my $x; $$x{a}->{b} = 1 <+strict +delete> [exception] ok 7031 - my $x; $$x{a}->{b} = 1 <+strict +delete> [return] ok 7032 - my $x; $$x{a}->{b} = 1 <+strict +delete> [variable] ok 7033 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +delete> [exception] ok 7034 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +delete> [return] ok 7035 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +delete> [variable] ok 7036 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +delete> [exception] ok 7037 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +delete> [return] ok 7038 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +delete> [variable] ok 7039 - my %x; $x{a}->{b} = 1 <+strict +delete> [exception] ok 7040 - my %x; $x{a}->{b} = 1 <+strict +delete> [return] ok 7041 - my %x; $x{a}->{b} = 1 <+strict +delete> [variable] ok 7042 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +delete> [exception] ok 7043 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +delete> [return] ok 7044 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +delete> [variable] ok 7045 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +delete> [exception] ok 7046 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +delete> [return] ok 7047 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +delete> [variable] ok 7048 - my $x; $x->{a}->{b} = 1 <+strict +store> [exception] ok 7049 - my $x; $x->{a}->{b} = 1 <+strict +store> [return] ok 7050 - my $x; $x->{a}->{b} = 1 <+strict +store> [variable] ok 7051 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +store> [exception] ok 7052 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +store> [return] ok 7053 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +store> [variable] ok 7054 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +store> [exception] ok 7055 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +store> [return] ok 7056 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +store> [variable] ok 7057 - my $x; $$x{a}->{b} = 1 <+strict +store> [exception] ok 7058 - my $x; $$x{a}->{b} = 1 <+strict +store> [return] ok 7059 - my $x; $$x{a}->{b} = 1 <+strict +store> [variable] ok 7060 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +store> [exception] ok 7061 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +store> [return] ok 7062 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +store> [variable] ok 7063 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +store> [exception] ok 7064 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +store> [return] ok 7065 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +store> [variable] ok 7066 - my %x; $x{a}->{b} = 1 <+strict +store> [exception] ok 7067 - my %x; $x{a}->{b} = 1 <+strict +store> [return] ok 7068 - my %x; $x{a}->{b} = 1 <+strict +store> [variable] ok 7069 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +store> [exception] ok 7070 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +store> [return] ok 7071 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +store> [variable] ok 7072 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +store> [exception] ok 7073 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +store> [return] ok 7074 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +store> [variable] ok 7075 - my $x; $x->{a} = 1; $x->{a} = 2 <+fetch> [exception] ok 7076 - my $x; $x->{a} = 1; $x->{a} = 2 <+fetch> [return] ok 7077 - my $x; $x->{a} = 1; $x->{a} = 2 <+fetch> [variable] ok 7078 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+fetch> [exception] ok 7079 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+fetch> [return] ok 7080 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+fetch> [variable] ok 7081 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+fetch> [exception] ok 7082 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+fetch> [return] ok 7083 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+fetch> [variable] ok 7084 - my $x; $x->{a} = 1; $$x{a} = 2 <+fetch> [exception] ok 7085 - my $x; $x->{a} = 1; $$x{a} = 2 <+fetch> [return] ok 7086 - my $x; $x->{a} = 1; $$x{a} = 2 <+fetch> [variable] ok 7087 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+fetch> [exception] ok 7088 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+fetch> [return] ok 7089 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+fetch> [variable] ok 7090 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+fetch> [exception] ok 7091 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+fetch> [return] ok 7092 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+fetch> [variable] ok 7093 - my %x; $x{a} = 1; $x{a} = 2 <+fetch> [exception] ok 7094 - my %x; $x{a} = 1; $x{a} = 2 <+fetch> [return] ok 7095 - my %x; $x{a} = 1; $x{a} = 2 <+fetch> [variable] ok 7096 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+fetch> [exception] ok 7097 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+fetch> [return] ok 7098 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+fetch> [variable] ok 7099 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+fetch> [exception] ok 7100 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+fetch> [return] ok 7101 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+fetch> [variable] ok 7102 - my $x; $x->{a} = 1; $x->{b} = 2 <+fetch> [exception] ok 7103 - my $x; $x->{a} = 1; $x->{b} = 2 <+fetch> [return] ok 7104 - my $x; $x->{a} = 1; $x->{b} = 2 <+fetch> [variable] ok 7105 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+fetch> [exception] ok 7106 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+fetch> [return] ok 7107 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+fetch> [variable] ok 7108 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+fetch> [exception] ok 7109 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+fetch> [return] ok 7110 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+fetch> [variable] ok 7111 - my $x; $x->{a} = 1; $$x{b} = 2 <+fetch> [exception] ok 7112 - my $x; $x->{a} = 1; $$x{b} = 2 <+fetch> [return] ok 7113 - my $x; $x->{a} = 1; $$x{b} = 2 <+fetch> [variable] ok 7114 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+fetch> [exception] ok 7115 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+fetch> [return] ok 7116 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+fetch> [variable] ok 7117 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+fetch> [exception] ok 7118 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+fetch> [return] ok 7119 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+fetch> [variable] ok 7120 - my %x; $x{a} = 1; $x{b} = 2 <+fetch> [exception] ok 7121 - my %x; $x{a} = 1; $x{b} = 2 <+fetch> [return] ok 7122 - my %x; $x{a} = 1; $x{b} = 2 <+fetch> [variable] ok 7123 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+fetch> [exception] ok 7124 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+fetch> [return] ok 7125 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+fetch> [variable] ok 7126 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+fetch> [exception] ok 7127 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+fetch> [return] ok 7128 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+fetch> [variable] ok 7129 - my $x; $x->{a} = 1; $x->{a} = 2 <+exists> [exception] ok 7130 - my $x; $x->{a} = 1; $x->{a} = 2 <+exists> [return] ok 7131 - my $x; $x->{a} = 1; $x->{a} = 2 <+exists> [variable] ok 7132 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+exists> [exception] ok 7133 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+exists> [return] ok 7134 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+exists> [variable] ok 7135 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+exists> [exception] ok 7136 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+exists> [return] ok 7137 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+exists> [variable] ok 7138 - my $x; $x->{a} = 1; $$x{a} = 2 <+exists> [exception] ok 7139 - my $x; $x->{a} = 1; $$x{a} = 2 <+exists> [return] ok 7140 - my $x; $x->{a} = 1; $$x{a} = 2 <+exists> [variable] ok 7141 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+exists> [exception] ok 7142 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+exists> [return] ok 7143 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+exists> [variable] ok 7144 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+exists> [exception] ok 7145 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+exists> [return] ok 7146 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+exists> [variable] ok 7147 - my %x; $x{a} = 1; $x{a} = 2 <+exists> [exception] ok 7148 - my %x; $x{a} = 1; $x{a} = 2 <+exists> [return] ok 7149 - my %x; $x{a} = 1; $x{a} = 2 <+exists> [variable] ok 7150 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+exists> [exception] ok 7151 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+exists> [return] ok 7152 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+exists> [variable] ok 7153 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+exists> [exception] ok 7154 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+exists> [return] ok 7155 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+exists> [variable] ok 7156 - my $x; $x->{a} = 1; $x->{b} = 2 <+exists> [exception] ok 7157 - my $x; $x->{a} = 1; $x->{b} = 2 <+exists> [return] ok 7158 - my $x; $x->{a} = 1; $x->{b} = 2 <+exists> [variable] ok 7159 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+exists> [exception] ok 7160 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+exists> [return] ok 7161 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+exists> [variable] ok 7162 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+exists> [exception] ok 7163 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+exists> [return] ok 7164 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+exists> [variable] ok 7165 - my $x; $x->{a} = 1; $$x{b} = 2 <+exists> [exception] ok 7166 - my $x; $x->{a} = 1; $$x{b} = 2 <+exists> [return] ok 7167 - my $x; $x->{a} = 1; $$x{b} = 2 <+exists> [variable] ok 7168 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+exists> [exception] ok 7169 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+exists> [return] ok 7170 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+exists> [variable] ok 7171 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+exists> [exception] ok 7172 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+exists> [return] ok 7173 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+exists> [variable] ok 7174 - my %x; $x{a} = 1; $x{b} = 2 <+exists> [exception] ok 7175 - my %x; $x{a} = 1; $x{b} = 2 <+exists> [return] ok 7176 - my %x; $x{a} = 1; $x{b} = 2 <+exists> [variable] ok 7177 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+exists> [exception] ok 7178 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+exists> [return] ok 7179 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+exists> [variable] ok 7180 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+exists> [exception] ok 7181 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+exists> [return] ok 7182 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+exists> [variable] ok 7183 - my $x; $x->{a} = 1; $x->{a} = 2 <+delete> [exception] ok 7184 - my $x; $x->{a} = 1; $x->{a} = 2 <+delete> [return] ok 7185 - my $x; $x->{a} = 1; $x->{a} = 2 <+delete> [variable] ok 7186 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+delete> [exception] ok 7187 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+delete> [return] ok 7188 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+delete> [variable] ok 7189 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+delete> [exception] ok 7190 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+delete> [return] ok 7191 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+delete> [variable] ok 7192 - my $x; $x->{a} = 1; $$x{a} = 2 <+delete> [exception] ok 7193 - my $x; $x->{a} = 1; $$x{a} = 2 <+delete> [return] ok 7194 - my $x; $x->{a} = 1; $$x{a} = 2 <+delete> [variable] ok 7195 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+delete> [exception] ok 7196 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+delete> [return] ok 7197 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+delete> [variable] ok 7198 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+delete> [exception] ok 7199 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+delete> [return] ok 7200 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+delete> [variable] ok 7201 - my %x; $x{a} = 1; $x{a} = 2 <+delete> [exception] ok 7202 - my %x; $x{a} = 1; $x{a} = 2 <+delete> [return] ok 7203 - my %x; $x{a} = 1; $x{a} = 2 <+delete> [variable] ok 7204 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+delete> [exception] ok 7205 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+delete> [return] ok 7206 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+delete> [variable] ok 7207 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+delete> [exception] ok 7208 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+delete> [return] ok 7209 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+delete> [variable] ok 7210 - my $x; $x->{a} = 1; $x->{b} = 2 <+delete> [exception] ok 7211 - my $x; $x->{a} = 1; $x->{b} = 2 <+delete> [return] ok 7212 - my $x; $x->{a} = 1; $x->{b} = 2 <+delete> [variable] ok 7213 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+delete> [exception] ok 7214 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+delete> [return] ok 7215 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+delete> [variable] ok 7216 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+delete> [exception] ok 7217 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+delete> [return] ok 7218 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+delete> [variable] ok 7219 - my $x; $x->{a} = 1; $$x{b} = 2 <+delete> [exception] ok 7220 - my $x; $x->{a} = 1; $$x{b} = 2 <+delete> [return] ok 7221 - my $x; $x->{a} = 1; $$x{b} = 2 <+delete> [variable] ok 7222 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+delete> [exception] ok 7223 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+delete> [return] ok 7224 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+delete> [variable] ok 7225 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+delete> [exception] ok 7226 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+delete> [return] ok 7227 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+delete> [variable] ok 7228 - my %x; $x{a} = 1; $x{b} = 2 <+delete> [exception] ok 7229 - my %x; $x{a} = 1; $x{b} = 2 <+delete> [return] ok 7230 - my %x; $x{a} = 1; $x{b} = 2 <+delete> [variable] ok 7231 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+delete> [exception] ok 7232 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+delete> [return] ok 7233 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+delete> [variable] ok 7234 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+delete> [exception] ok 7235 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+delete> [return] ok 7236 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+delete> [variable] ok 7237 - my $x; $x->{a} = 1; $x->{a} = 2 <+store> [exception] ok 7238 - my $x; $x->{a} = 1; $x->{a} = 2 <+store> [return] ok 7239 - my $x; $x->{a} = 1; $x->{a} = 2 <+store> [variable] ok 7240 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+store> [exception] ok 7241 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+store> [return] ok 7242 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+store> [variable] ok 7243 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+store> [exception] ok 7244 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+store> [return] ok 7245 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+store> [variable] ok 7246 - my $x; $x->{a} = 1; $$x{a} = 2 <+store> [exception] ok 7247 - my $x; $x->{a} = 1; $$x{a} = 2 <+store> [return] ok 7248 - my $x; $x->{a} = 1; $$x{a} = 2 <+store> [variable] ok 7249 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+store> [exception] ok 7250 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+store> [return] ok 7251 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+store> [variable] ok 7252 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+store> [exception] ok 7253 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+store> [return] ok 7254 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+store> [variable] ok 7255 - my %x; $x{a} = 1; $x{a} = 2 <+store> [exception] ok 7256 - my %x; $x{a} = 1; $x{a} = 2 <+store> [return] ok 7257 - my %x; $x{a} = 1; $x{a} = 2 <+store> [variable] ok 7258 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+store> [exception] ok 7259 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+store> [return] ok 7260 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+store> [variable] ok 7261 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+store> [exception] ok 7262 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+store> [return] ok 7263 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+store> [variable] ok 7264 - my $x; $x->{a} = 1; $x->{b} = 2 <+store> [exception] ok 7265 - my $x; $x->{a} = 1; $x->{b} = 2 <+store> [return] ok 7266 - my $x; $x->{a} = 1; $x->{b} = 2 <+store> [variable] ok 7267 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+store> [exception] ok 7268 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+store> [return] ok 7269 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+store> [variable] ok 7270 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+store> [exception] ok 7271 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+store> [return] ok 7272 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+store> [variable] ok 7273 - my $x; $x->{a} = 1; $$x{b} = 2 <+store> [exception] ok 7274 - my $x; $x->{a} = 1; $$x{b} = 2 <+store> [return] ok 7275 - my $x; $x->{a} = 1; $$x{b} = 2 <+store> [variable] ok 7276 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+store> [exception] ok 7277 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+store> [return] ok 7278 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+store> [variable] ok 7279 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+store> [exception] ok 7280 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+store> [return] ok 7281 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+store> [variable] ok 7282 - my %x; $x{a} = 1; $x{b} = 2 <+store> [exception] ok 7283 - my %x; $x{a} = 1; $x{b} = 2 <+store> [return] ok 7284 - my %x; $x{a} = 1; $x{b} = 2 <+store> [variable] ok 7285 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+store> [exception] ok 7286 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+store> [return] ok 7287 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+store> [variable] ok 7288 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+store> [exception] ok 7289 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+store> [return] ok 7290 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+store> [variable] ok 7291 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [exception] ok 7292 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [return] ok 7293 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [variable] ok 7294 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [exception] ok 7295 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [return] ok 7296 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [variable] ok 7297 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [exception] ok 7298 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [return] ok 7299 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [variable] ok 7300 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [exception] ok 7301 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [return] ok 7302 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [variable] ok 7303 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [exception] ok 7304 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [return] ok 7305 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [variable] ok 7306 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [exception] ok 7307 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [return] ok 7308 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [variable] ok 7309 - my %x; $x{a} = 1; $x{a} = 2 <+strict +fetch> [exception] ok 7310 - my %x; $x{a} = 1; $x{a} = 2 <+strict +fetch> [return] ok 7311 - my %x; $x{a} = 1; $x{a} = 2 <+strict +fetch> [variable] ok 7312 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +fetch> [exception] ok 7313 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +fetch> [return] ok 7314 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +fetch> [variable] ok 7315 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +fetch> [exception] ok 7316 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +fetch> [return] ok 7317 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +fetch> [variable] ok 7318 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [exception] ok 7319 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [return] ok 7320 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [variable] ok 7321 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [exception] ok 7322 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [return] ok 7323 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [variable] ok 7324 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [exception] ok 7325 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [return] ok 7326 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [variable] ok 7327 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [exception] ok 7328 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [return] ok 7329 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [variable] ok 7330 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [exception] ok 7331 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [return] ok 7332 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [variable] ok 7333 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [exception] ok 7334 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [return] ok 7335 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [variable] ok 7336 - my %x; $x{a} = 1; $x{b} = 2 <+strict +fetch> [exception] ok 7337 - my %x; $x{a} = 1; $x{b} = 2 <+strict +fetch> [return] ok 7338 - my %x; $x{a} = 1; $x{b} = 2 <+strict +fetch> [variable] ok 7339 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +fetch> [exception] ok 7340 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +fetch> [return] ok 7341 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +fetch> [variable] ok 7342 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +fetch> [exception] ok 7343 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +fetch> [return] ok 7344 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +fetch> [variable] ok 7345 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [exception] ok 7346 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [return] ok 7347 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [variable] ok 7348 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [exception] ok 7349 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [return] ok 7350 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [variable] ok 7351 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [exception] ok 7352 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [return] ok 7353 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [variable] ok 7354 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [exception] ok 7355 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [return] ok 7356 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [variable] ok 7357 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [exception] ok 7358 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [return] ok 7359 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [variable] ok 7360 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [exception] ok 7361 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [return] ok 7362 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [variable] ok 7363 - my %x; $x{a} = 1; $x{a} = 2 <+strict +exists> [exception] ok 7364 - my %x; $x{a} = 1; $x{a} = 2 <+strict +exists> [return] ok 7365 - my %x; $x{a} = 1; $x{a} = 2 <+strict +exists> [variable] ok 7366 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +exists> [exception] ok 7367 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +exists> [return] ok 7368 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +exists> [variable] ok 7369 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +exists> [exception] ok 7370 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +exists> [return] ok 7371 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +exists> [variable] ok 7372 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [exception] ok 7373 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [return] ok 7374 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [variable] ok 7375 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [exception] ok 7376 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [return] ok 7377 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [variable] ok 7378 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [exception] ok 7379 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [return] ok 7380 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [variable] ok 7381 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [exception] ok 7382 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [return] ok 7383 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [variable] ok 7384 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [exception] ok 7385 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [return] ok 7386 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [variable] ok 7387 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [exception] ok 7388 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [return] ok 7389 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [variable] ok 7390 - my %x; $x{a} = 1; $x{b} = 2 <+strict +exists> [exception] ok 7391 - my %x; $x{a} = 1; $x{b} = 2 <+strict +exists> [return] ok 7392 - my %x; $x{a} = 1; $x{b} = 2 <+strict +exists> [variable] ok 7393 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +exists> [exception] ok 7394 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +exists> [return] ok 7395 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +exists> [variable] ok 7396 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +exists> [exception] ok 7397 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +exists> [return] ok 7398 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +exists> [variable] ok 7399 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [exception] ok 7400 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [return] ok 7401 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [variable] ok 7402 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [exception] ok 7403 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [return] ok 7404 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [variable] ok 7405 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [exception] ok 7406 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [return] ok 7407 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [variable] ok 7408 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [exception] ok 7409 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [return] ok 7410 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [variable] ok 7411 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [exception] ok 7412 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [return] ok 7413 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [variable] ok 7414 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [exception] ok 7415 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [return] ok 7416 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [variable] ok 7417 - my %x; $x{a} = 1; $x{a} = 2 <+strict +delete> [exception] ok 7418 - my %x; $x{a} = 1; $x{a} = 2 <+strict +delete> [return] ok 7419 - my %x; $x{a} = 1; $x{a} = 2 <+strict +delete> [variable] ok 7420 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +delete> [exception] ok 7421 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +delete> [return] ok 7422 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +delete> [variable] ok 7423 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +delete> [exception] ok 7424 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +delete> [return] ok 7425 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +delete> [variable] ok 7426 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [exception] ok 7427 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [return] ok 7428 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [variable] ok 7429 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [exception] ok 7430 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [return] ok 7431 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [variable] ok 7432 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [exception] ok 7433 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [return] ok 7434 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [variable] ok 7435 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [exception] ok 7436 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [return] ok 7437 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [variable] ok 7438 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [exception] ok 7439 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [return] ok 7440 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [variable] ok 7441 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [exception] ok 7442 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [return] ok 7443 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [variable] ok 7444 - my %x; $x{a} = 1; $x{b} = 2 <+strict +delete> [exception] ok 7445 - my %x; $x{a} = 1; $x{b} = 2 <+strict +delete> [return] ok 7446 - my %x; $x{a} = 1; $x{b} = 2 <+strict +delete> [variable] ok 7447 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +delete> [exception] ok 7448 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +delete> [return] ok 7449 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +delete> [variable] ok 7450 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +delete> [exception] ok 7451 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +delete> [return] ok 7452 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +delete> [variable] ok 7453 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +store> [exception] ok 7454 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +store> [return] ok 7455 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +store> [variable] ok 7456 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +store> [exception] ok 7457 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +store> [return] ok 7458 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +store> [variable] ok 7459 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +store> [exception] ok 7460 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +store> [return] ok 7461 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +store> [variable] ok 7462 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +store> [exception] ok 7463 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +store> [return] ok 7464 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +store> [variable] ok 7465 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +store> [exception] ok 7466 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +store> [return] ok 7467 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +store> [variable] ok 7468 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +store> [exception] ok 7469 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +store> [return] ok 7470 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +store> [variable] ok 7471 - my %x; $x{a} = 1; $x{a} = 2 <+strict +store> [exception] ok 7472 - my %x; $x{a} = 1; $x{a} = 2 <+strict +store> [return] ok 7473 - my %x; $x{a} = 1; $x{a} = 2 <+strict +store> [variable] ok 7474 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +store> [exception] ok 7475 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +store> [return] ok 7476 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +store> [variable] ok 7477 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +store> [exception] ok 7478 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +store> [return] ok 7479 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +store> [variable] ok 7480 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +store> [exception] ok 7481 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +store> [return] ok 7482 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +store> [variable] ok 7483 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +store> [exception] ok 7484 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +store> [return] ok 7485 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +store> [variable] ok 7486 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +store> [exception] ok 7487 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +store> [return] ok 7488 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +store> [variable] ok 7489 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +store> [exception] ok 7490 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +store> [return] ok 7491 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +store> [variable] ok 7492 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +store> [exception] ok 7493 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +store> [return] ok 7494 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +store> [variable] ok 7495 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +store> [exception] ok 7496 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +store> [return] ok 7497 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +store> [variable] ok 7498 - my %x; $x{a} = 1; $x{b} = 2 <+strict +store> [exception] ok 7499 - my %x; $x{a} = 1; $x{b} = 2 <+strict +store> [return] ok 7500 - my %x; $x{a} = 1; $x{b} = 2 <+strict +store> [variable] ok 7501 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +store> [exception] ok 7502 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +store> [return] ok 7503 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +store> [variable] ok 7504 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +store> [exception] ok 7505 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +store> [return] ok 7506 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +store> [variable] ok 7507 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [exception] ok 7508 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [return] ok 7509 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [variable] ok 7510 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [exception] ok 7511 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [return] ok 7512 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [variable] ok 7513 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [exception] ok 7514 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [return] ok 7515 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [variable] ok 7516 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [exception] ok 7517 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [return] ok 7518 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [variable] ok 7519 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [exception] ok 7520 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [return] ok 7521 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [variable] ok 7522 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [exception] ok 7523 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [return] ok 7524 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [variable] ok 7525 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [exception] ok 7526 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [return] ok 7527 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [variable] ok 7528 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [exception] ok 7529 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [return] ok 7530 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [variable] ok 7531 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [exception] ok 7532 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [return] ok 7533 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [variable] ok 7534 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [exception] ok 7535 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [return] ok 7536 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [variable] ok 7537 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [exception] ok 7538 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [return] ok 7539 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [variable] ok 7540 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [exception] ok 7541 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [return] ok 7542 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [variable] ok 7543 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [exception] ok 7544 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [return] ok 7545 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [variable] ok 7546 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [exception] ok 7547 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [return] ok 7548 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [variable] ok 7549 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [exception] ok 7550 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [return] ok 7551 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [variable] ok 7552 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [exception] ok 7553 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [return] ok 7554 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [variable] ok 7555 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [exception] ok 7556 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [return] ok 7557 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [variable] ok 7558 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [exception] ok 7559 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [return] ok 7560 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [variable] ok 7561 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [exception] ok 7562 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [return] ok 7563 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [variable] ok 7564 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [exception] ok 7565 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [return] ok 7566 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [variable] ok 7567 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [exception] ok 7568 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [return] ok 7569 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [variable] ok 7570 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [exception] ok 7571 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [return] ok 7572 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [variable] ok 7573 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [exception] ok 7574 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [return] ok 7575 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [variable] ok 7576 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [exception] ok 7577 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [return] ok 7578 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [variable] ok 7579 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [exception] ok 7580 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [return] ok 7581 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [variable] ok 7582 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [exception] ok 7583 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [return] ok 7584 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [variable] ok 7585 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [exception] ok 7586 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [return] ok 7587 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [variable] ok 7588 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [exception] ok 7589 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [return] ok 7590 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [variable] ok 7591 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [exception] ok 7592 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [return] ok 7593 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [variable] ok 7594 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [exception] ok 7595 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [return] ok 7596 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [variable] ok 7597 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [exception] ok 7598 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [return] ok 7599 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [variable] ok 7600 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [exception] ok 7601 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [return] ok 7602 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [variable] ok 7603 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [exception] ok 7604 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [return] ok 7605 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [variable] ok 7606 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [exception] ok 7607 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [return] ok 7608 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [variable] ok 7609 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [exception] ok 7610 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [return] ok 7611 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [variable] ok 7612 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [exception] ok 7613 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [return] ok 7614 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [variable] ok 7615 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [exception] ok 7616 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [return] ok 7617 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [variable] ok 7618 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [exception] ok 7619 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [return] ok 7620 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [variable] ok 7621 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [exception] ok 7622 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [return] ok 7623 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [variable] ok 7624 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [exception] ok 7625 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [return] ok 7626 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [variable] ok 7627 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [exception] ok 7628 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [return] ok 7629 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [variable] ok 7630 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [exception] ok 7631 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [return] ok 7632 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [variable] ok 7633 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [exception] ok 7634 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [return] ok 7635 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [variable] ok 7636 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [exception] ok 7637 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [return] ok 7638 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [variable] ok 7639 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [exception] ok 7640 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [return] ok 7641 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [variable] ok 7642 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [exception] ok 7643 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [return] ok 7644 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [variable] ok 7645 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [exception] ok 7646 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [return] ok 7647 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [variable] ok 7648 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [exception] ok 7649 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [return] ok 7650 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [variable] ok 7651 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [exception] ok 7652 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [return] ok 7653 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [variable] ok 7654 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [exception] ok 7655 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [return] ok 7656 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [variable] ok 7657 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [exception] ok 7658 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [return] ok 7659 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [variable] ok 7660 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [exception] ok 7661 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [return] ok 7662 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [variable] ok 7663 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [exception] ok 7664 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [return] ok 7665 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [variable] ok 7666 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [exception] ok 7667 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [return] ok 7668 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [variable] ok 7669 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [exception] ok 7670 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [return] ok 7671 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [variable] ok 7672 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [exception] ok 7673 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [return] ok 7674 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [variable] ok 7675 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [exception] ok 7676 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [return] ok 7677 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [variable] ok 7678 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [exception] ok 7679 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [return] ok 7680 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [variable] ok 7681 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [exception] ok 7682 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [return] ok 7683 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [variable] ok 7684 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [exception] ok 7685 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [return] ok 7686 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [variable] ok 7687 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [exception] ok 7688 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [return] ok 7689 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [variable] ok 7690 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [exception] ok 7691 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [return] ok 7692 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [variable] ok 7693 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [exception] ok 7694 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [return] ok 7695 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [variable] ok 7696 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [exception] ok 7697 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [return] ok 7698 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [variable] ok 7699 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [exception] ok 7700 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [return] ok 7701 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [variable] ok 7702 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [exception] ok 7703 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [return] ok 7704 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [variable] ok 7705 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [exception] ok 7706 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [return] ok 7707 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [variable] ok 7708 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [exception] ok 7709 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [return] ok 7710 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [variable] ok 7711 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [exception] ok 7712 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [return] ok 7713 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [variable] ok 7714 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [exception] ok 7715 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [return] ok 7716 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [variable] ok 7717 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [exception] ok 7718 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [return] ok 7719 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [variable] ok 7720 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [exception] ok 7721 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [return] ok 7722 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [variable] ok 7723 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [exception] ok 7724 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [return] ok 7725 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [variable] ok 7726 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [exception] ok 7727 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [return] ok 7728 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [variable] ok 7729 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [exception] ok 7730 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [return] ok 7731 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [variable] ok 7732 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [exception] ok 7733 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [return] ok 7734 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [variable] ok 7735 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [exception] ok 7736 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [return] ok 7737 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [variable] ok 7738 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [exception] ok 7739 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [return] ok 7740 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [variable] ok 7741 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [exception] ok 7742 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [return] ok 7743 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [variable] ok 7744 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [exception] ok 7745 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [return] ok 7746 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [variable] ok 7747 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [exception] ok 7748 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [return] ok 7749 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [variable] ok 7750 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [exception] ok 7751 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [return] ok 7752 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [variable] ok 7753 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [exception] ok 7754 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [return] ok 7755 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [variable] ok 7756 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [exception] ok 7757 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [return] ok 7758 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [variable] ok 7759 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [exception] ok 7760 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [return] ok 7761 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [variable] ok 7762 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [exception] ok 7763 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [return] ok 7764 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [variable] ok 7765 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [exception] ok 7766 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [return] ok 7767 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [variable] ok 7768 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [exception] ok 7769 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [return] ok 7770 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [variable] ok 7771 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [exception] ok 7772 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [return] ok 7773 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [variable] ok 7774 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [exception] ok 7775 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [return] ok 7776 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [variable] ok 7777 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [exception] ok 7778 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [return] ok 7779 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [variable] ok 7780 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [exception] ok 7781 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [return] ok 7782 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [variable] ok 7783 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [exception] ok 7784 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [return] ok 7785 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [variable] ok 7786 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [exception] ok 7787 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [return] ok 7788 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [variable] ok 7789 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [exception] ok 7790 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [return] ok 7791 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [variable] ok 7792 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [exception] ok 7793 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [return] ok 7794 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [variable] ok 7795 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [exception] ok 7796 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [return] ok 7797 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [variable] ok 7798 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [exception] ok 7799 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [return] ok 7800 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [variable] ok 7801 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [exception] ok 7802 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [return] ok 7803 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [variable] ok 7804 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [exception] ok 7805 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [return] ok 7806 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [variable] ok 7807 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [exception] ok 7808 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [return] ok 7809 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [variable] ok 7810 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [exception] ok 7811 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [return] ok 7812 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [variable] ok 7813 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [exception] ok 7814 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [return] ok 7815 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [variable] ok 7816 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [exception] ok 7817 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [return] ok 7818 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [variable] ok 7819 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [exception] ok 7820 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [return] ok 7821 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [variable] ok 7822 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [exception] ok 7823 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [return] ok 7824 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [variable] ok 7825 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [exception] ok 7826 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [return] ok 7827 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [variable] ok 7828 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [exception] ok 7829 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [return] ok 7830 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [variable] ok 7831 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [exception] ok 7832 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [return] ok 7833 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [variable] ok 7834 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [exception] ok 7835 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [return] ok 7836 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [variable] ok 7837 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [exception] ok 7838 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [return] ok 7839 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [variable] ok 7840 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [exception] ok 7841 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [return] ok 7842 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [variable] ok 7843 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [exception] ok 7844 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [return] ok 7845 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [variable] ok 7846 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [exception] ok 7847 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [return] ok 7848 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [variable] ok 7849 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [exception] ok 7850 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [return] ok 7851 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [variable] ok 7852 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [exception] ok 7853 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [return] ok 7854 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [variable] ok 7855 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [exception] ok 7856 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [return] ok 7857 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [variable] ok 7858 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [exception] ok 7859 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [return] ok 7860 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [variable] ok 7861 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [exception] ok 7862 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [return] ok 7863 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [variable] ok 7864 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [exception] ok 7865 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [return] ok 7866 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [variable] ok 7867 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [exception] ok 7868 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [return] ok 7869 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [variable] ok 7870 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [exception] ok 7871 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [return] ok 7872 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [variable] ok 7873 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [exception] ok 7874 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [return] ok 7875 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [variable] ok 7876 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [exception] ok 7877 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [return] ok 7878 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [variable] ok 7879 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [exception] ok 7880 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [return] ok 7881 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [variable] ok 7882 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [exception] ok 7883 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [return] ok 7884 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [variable] ok 7885 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [exception] ok 7886 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [return] ok 7887 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [variable] ok 7888 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [exception] ok 7889 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [return] ok 7890 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [variable] ok 7891 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [exception] ok 7892 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [return] ok 7893 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [variable] ok 7894 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [exception] ok 7895 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [return] ok 7896 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [variable] ok 7897 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [exception] ok 7898 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [return] ok 7899 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [variable] ok 7900 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [exception] ok 7901 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [return] ok 7902 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [variable] ok 7903 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [exception] ok 7904 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [return] ok 7905 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [variable] ok 7906 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [exception] ok 7907 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [return] ok 7908 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [variable] ok 7909 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [exception] ok 7910 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [return] ok 7911 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [variable] ok 7912 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [exception] ok 7913 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [return] ok 7914 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [variable] ok 7915 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [exception] ok 7916 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [return] ok 7917 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [variable] ok 7918 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [exception] ok 7919 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [return] ok 7920 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [variable] ok 7921 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [exception] ok 7922 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [return] ok 7923 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [variable] ok 7924 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [exception] ok 7925 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [return] ok 7926 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [variable] ok 7927 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [exception] ok 7928 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [return] ok 7929 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [variable] ok 7930 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [exception] ok 7931 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [return] ok 7932 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [variable] ok 7933 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [exception] ok 7934 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [return] ok 7935 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [variable] ok 7936 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [exception] ok 7937 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [return] ok 7938 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [variable] ok 7939 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [exception] ok 7940 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [return] ok 7941 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [variable] ok 7942 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [exception] ok 7943 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [return] ok 7944 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [variable] ok 7945 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [exception] ok 7946 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [return] ok 7947 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [variable] ok 7948 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [exception] ok 7949 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [return] ok 7950 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [variable] ok 7951 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [exception] ok 7952 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [return] ok 7953 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [variable] ok 7954 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [exception] ok 7955 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [return] ok 7956 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [variable] ok 7957 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [exception] ok 7958 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [return] ok 7959 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [variable] ok 7960 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [exception] ok 7961 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [return] ok 7962 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [variable] ok 7963 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [exception] ok 7964 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [return] ok 7965 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [variable] ok 7966 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [exception] ok 7967 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [return] ok 7968 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [variable] ok 7969 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [exception] ok 7970 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [return] ok 7971 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [variable] ok 7972 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [exception] ok 7973 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [return] ok 7974 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [variable] ok 7975 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [exception] ok 7976 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [return] ok 7977 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [variable] ok 7978 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [exception] ok 7979 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [return] ok 7980 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [variable] ok 7981 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [exception] ok 7982 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [return] ok 7983 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [variable] ok 7984 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [exception] ok 7985 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [return] ok 7986 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [variable] ok 7987 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [exception] ok 7988 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [return] ok 7989 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [variable] ok 7990 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [exception] ok 7991 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [return] ok 7992 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [variable] ok 7993 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [exception] ok 7994 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [return] ok 7995 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [variable] ok 7996 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [exception] ok 7997 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [return] ok 7998 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [variable] ok 7999 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [exception] ok 8000 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [return] ok 8001 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [variable] ok 8002 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [exception] ok 8003 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [return] ok 8004 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [variable] ok 8005 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [exception] ok 8006 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [return] ok 8007 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [variable] ok 8008 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [exception] ok 8009 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [return] ok 8010 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [variable] ok 8011 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [exception] ok 8012 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [return] ok 8013 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [variable] ok 8014 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [exception] ok 8015 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [return] ok 8016 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [variable] ok 8017 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [exception] ok 8018 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [return] ok 8019 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [variable] ok 8020 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [exception] ok 8021 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [return] ok 8022 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [variable] ok 8023 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [exception] ok 8024 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [return] ok 8025 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [variable] ok 8026 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [exception] ok 8027 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [return] ok 8028 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [variable] ok 8029 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [exception] ok 8030 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [return] ok 8031 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [variable] ok 8032 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [exception] ok 8033 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [return] ok 8034 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [variable] ok 8035 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [exception] ok 8036 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [return] ok 8037 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [variable] ok 8038 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [exception] ok 8039 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [return] ok 8040 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [variable] ok 8041 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [exception] ok 8042 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [return] ok 8043 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [variable] ok 8044 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [exception] ok 8045 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [return] ok 8046 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [variable] ok 8047 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [exception] ok 8048 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [return] ok 8049 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [variable] ok 8050 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [exception] ok 8051 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [return] ok 8052 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [variable] ok 8053 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [exception] ok 8054 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [return] ok 8055 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [variable] ok 8056 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [exception] ok 8057 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [return] ok 8058 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [variable] ok 8059 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [exception] ok 8060 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [return] ok 8061 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [variable] ok 8062 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [exception] ok 8063 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [return] ok 8064 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [variable] ok 8065 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [exception] ok 8066 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [return] ok 8067 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [variable] ok 8068 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [exception] ok 8069 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [return] ok 8070 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [variable] ok 8071 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [exception] ok 8072 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [return] ok 8073 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [variable] ok 8074 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [exception] ok 8075 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [return] ok 8076 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [variable] ok 8077 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [exception] ok 8078 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [return] ok 8079 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [variable] ok 8080 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [exception] ok 8081 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [return] ok 8082 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [variable] ok 8083 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [exception] ok 8084 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [return] ok 8085 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [variable] ok 8086 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [exception] ok 8087 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [return] ok 8088 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [variable] ok 8089 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [exception] ok 8090 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [return] ok 8091 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [variable] ok 8092 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [exception] ok 8093 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [return] ok 8094 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [variable] ok 8095 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [exception] ok 8096 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [return] ok 8097 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [variable] ok 8098 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [exception] ok 8099 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [return] ok 8100 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [variable] ok 8101 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [exception] ok 8102 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [return] ok 8103 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [variable] ok 8104 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [exception] ok 8105 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [return] ok 8106 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [variable] ok 8107 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [exception] ok 8108 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [return] ok 8109 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [variable] ok 8110 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [exception] ok 8111 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [return] ok 8112 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [variable] ok 8113 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [exception] ok 8114 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [return] ok 8115 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [variable] ok 8116 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [exception] ok 8117 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [return] ok 8118 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [variable] ok 8119 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [exception] ok 8120 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [return] ok 8121 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [variable] ok 8122 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [exception] ok 8123 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [return] ok 8124 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [variable] ok 8125 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [exception] ok 8126 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [return] ok 8127 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [variable] ok 8128 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [exception] ok 8129 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [return] ok 8130 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [variable] ok 8131 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [exception] ok 8132 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [return] ok 8133 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [variable] ok 8134 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [exception] ok 8135 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [return] ok 8136 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [variable] ok 8137 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [exception] ok 8138 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [return] ok 8139 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [variable] ok 8140 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [exception] ok 8141 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [return] ok 8142 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [variable] ok 8143 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [exception] ok 8144 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [return] ok 8145 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [variable] ok 8146 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [exception] ok 8147 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [return] ok 8148 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [variable] ok 8149 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [exception] ok 8150 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [return] ok 8151 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [variable] ok 8152 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [exception] ok 8153 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [return] ok 8154 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [variable] ok t/22-hash-kv.t ........... 1..1728 ok 1 - my $x; keys %$x [exception] ok 2 - my $x; keys %$x [return] ok 3 - my $x; keys %$x [variable] ok 4 - our $x; local $x; use strict; keys %$x [exception] ok 5 - our $x; local $x; use strict; keys %$x [return] ok 6 - our $x; local $x; use strict; keys %$x [variable] ok 7 - our $x; local $x; no strict; keys %$x [exception] ok 8 - our $x; local $x; no strict; keys %$x [return] ok 9 - our $x; local $x; no strict; keys %$x [variable] ok 10 - my $x; keys %$x [exception] ok 11 - my $x; keys %$x [return] ok 12 - my $x; keys %$x [variable] ok 13 - our $x; local $x; use strict; keys %$x [exception] ok 14 - our $x; local $x; use strict; keys %$x [return] ok 15 - our $x; local $x; use strict; keys %$x [variable] ok 16 - our $x; local $x; no strict; keys %$x [exception] ok 17 - our $x; local $x; no strict; keys %$x [return] ok 18 - our $x; local $x; no strict; keys %$x [variable] ok 19 - my %x; keys %x [exception] ok 20 - my %x; keys %x [return] ok 21 - my %x; keys %x [variable] ok 22 - our %x; local %x; use strict; keys %x [exception] ok 23 - our %x; local %x; use strict; keys %x [return] ok 24 - our %x; local %x; use strict; keys %x [variable] ok 25 - our %x; local %x; no strict; keys %x [exception] ok 26 - our %x; local %x; no strict; keys %x [return] ok 27 - our %x; local %x; no strict; keys %x [variable] ok 28 - my $x; keys %$x [exception] ok 29 - my $x; keys %$x [return] ok 30 - my $x; keys %$x [variable] ok 31 - our $x; local $x; use strict; keys %$x [exception] ok 32 - our $x; local $x; use strict; keys %$x [return] ok 33 - our $x; local $x; use strict; keys %$x [variable] ok 34 - our $x; local $x; no strict; keys %$x [exception] ok 35 - our $x; local $x; no strict; keys %$x [return] ok 36 - our $x; local $x; no strict; keys %$x [variable] ok 37 - my $x; keys %$x [exception] ok 38 - my $x; keys %$x [return] ok 39 - my $x; keys %$x [variable] ok 40 - our $x; local $x; use strict; keys %$x [exception] ok 41 - our $x; local $x; use strict; keys %$x [return] ok 42 - our $x; local $x; use strict; keys %$x [variable] ok 43 - our $x; local $x; no strict; keys %$x [exception] ok 44 - our $x; local $x; no strict; keys %$x [return] ok 45 - our $x; local $x; no strict; keys %$x [variable] ok 46 - my %x; keys %x [exception] ok 47 - my %x; keys %x [return] ok 48 - my %x; keys %x [variable] ok 49 - our %x; local %x; use strict; keys %x [exception] ok 50 - our %x; local %x; use strict; keys %x [return] ok 51 - our %x; local %x; use strict; keys %x [variable] ok 52 - our %x; local %x; no strict; keys %x [exception] ok 53 - our %x; local %x; no strict; keys %x [return] ok 54 - our %x; local %x; no strict; keys %x [variable] ok 55 - my $x; keys %$x <+fetch> [exception] ok 56 - my $x; keys %$x <+fetch> [return] ok 57 - my $x; keys %$x <+fetch> [variable] ok 58 - our $x; local $x; use strict; keys %$x <+fetch> [exception] ok 59 - our $x; local $x; use strict; keys %$x <+fetch> [return] ok 60 - our $x; local $x; use strict; keys %$x <+fetch> [variable] ok 61 - our $x; local $x; no strict; keys %$x <+fetch> [exception] ok 62 - our $x; local $x; no strict; keys %$x <+fetch> [return] ok 63 - our $x; local $x; no strict; keys %$x <+fetch> [variable] ok 64 - my $x; keys %$x <+fetch> [exception] ok 65 - my $x; keys %$x <+fetch> [return] ok 66 - my $x; keys %$x <+fetch> [variable] ok 67 - our $x; local $x; use strict; keys %$x <+fetch> [exception] ok 68 - our $x; local $x; use strict; keys %$x <+fetch> [return] ok 69 - our $x; local $x; use strict; keys %$x <+fetch> [variable] ok 70 - our $x; local $x; no strict; keys %$x <+fetch> [exception] ok 71 - our $x; local $x; no strict; keys %$x <+fetch> [return] ok 72 - our $x; local $x; no strict; keys %$x <+fetch> [variable] ok 73 - my %x; keys %x <+fetch> [exception] ok 74 - my %x; keys %x <+fetch> [return] ok 75 - my %x; keys %x <+fetch> [variable] ok 76 - our %x; local %x; use strict; keys %x <+fetch> [exception] ok 77 - our %x; local %x; use strict; keys %x <+fetch> [return] ok 78 - our %x; local %x; use strict; keys %x <+fetch> [variable] ok 79 - our %x; local %x; no strict; keys %x <+fetch> [exception] ok 80 - our %x; local %x; no strict; keys %x <+fetch> [return] ok 81 - our %x; local %x; no strict; keys %x <+fetch> [variable] ok 82 - my $x; keys %$x <+exists> [exception] ok 83 - my $x; keys %$x <+exists> [return] ok 84 - my $x; keys %$x <+exists> [variable] ok 85 - our $x; local $x; use strict; keys %$x <+exists> [exception] ok 86 - our $x; local $x; use strict; keys %$x <+exists> [return] ok 87 - our $x; local $x; use strict; keys %$x <+exists> [variable] ok 88 - our $x; local $x; no strict; keys %$x <+exists> [exception] ok 89 - our $x; local $x; no strict; keys %$x <+exists> [return] ok 90 - our $x; local $x; no strict; keys %$x <+exists> [variable] ok 91 - my $x; keys %$x <+exists> [exception] ok 92 - my $x; keys %$x <+exists> [return] ok 93 - my $x; keys %$x <+exists> [variable] ok 94 - our $x; local $x; use strict; keys %$x <+exists> [exception] ok 95 - our $x; local $x; use strict; keys %$x <+exists> [return] ok 96 - our $x; local $x; use strict; keys %$x <+exists> [variable] ok 97 - our $x; local $x; no strict; keys %$x <+exists> [exception] ok 98 - our $x; local $x; no strict; keys %$x <+exists> [return] ok 99 - our $x; local $x; no strict; keys %$x <+exists> [variable] ok 100 - my %x; keys %x <+exists> [exception] ok 101 - my %x; keys %x <+exists> [return] ok 102 - my %x; keys %x <+exists> [variable] ok 103 - our %x; local %x; use strict; keys %x <+exists> [exception] ok 104 - our %x; local %x; use strict; keys %x <+exists> [return] ok 105 - our %x; local %x; use strict; keys %x <+exists> [variable] ok 106 - our %x; local %x; no strict; keys %x <+exists> [exception] ok 107 - our %x; local %x; no strict; keys %x <+exists> [return] ok 108 - our %x; local %x; no strict; keys %x <+exists> [variable] ok 109 - my $x; keys %$x <+delete> [exception] ok 110 - my $x; keys %$x <+delete> [return] ok 111 - my $x; keys %$x <+delete> [variable] ok 112 - our $x; local $x; use strict; keys %$x <+delete> [exception] ok 113 - our $x; local $x; use strict; keys %$x <+delete> [return] ok 114 - our $x; local $x; use strict; keys %$x <+delete> [variable] ok 115 - our $x; local $x; no strict; keys %$x <+delete> [exception] ok 116 - our $x; local $x; no strict; keys %$x <+delete> [return] ok 117 - our $x; local $x; no strict; keys %$x <+delete> [variable] ok 118 - my $x; keys %$x <+delete> [exception] ok 119 - my $x; keys %$x <+delete> [return] ok 120 - my $x; keys %$x <+delete> [variable] ok 121 - our $x; local $x; use strict; keys %$x <+delete> [exception] ok 122 - our $x; local $x; use strict; keys %$x <+delete> [return] ok 123 - our $x; local $x; use strict; keys %$x <+delete> [variable] ok 124 - our $x; local $x; no strict; keys %$x <+delete> [exception] ok 125 - our $x; local $x; no strict; keys %$x <+delete> [return] ok 126 - our $x; local $x; no strict; keys %$x <+delete> [variable] ok 127 - my %x; keys %x <+delete> [exception] ok 128 - my %x; keys %x <+delete> [return] ok 129 - my %x; keys %x <+delete> [variable] ok 130 - our %x; local %x; use strict; keys %x <+delete> [exception] ok 131 - our %x; local %x; use strict; keys %x <+delete> [return] ok 132 - our %x; local %x; use strict; keys %x <+delete> [variable] ok 133 - our %x; local %x; no strict; keys %x <+delete> [exception] ok 134 - our %x; local %x; no strict; keys %x <+delete> [return] ok 135 - our %x; local %x; no strict; keys %x <+delete> [variable] ok 136 - my $x; keys %$x <+store> [exception] ok 137 - my $x; keys %$x <+store> [return] ok 138 - my $x; keys %$x <+store> [variable] ok 139 - our $x; local $x; use strict; keys %$x <+store> [exception] ok 140 - our $x; local $x; use strict; keys %$x <+store> [return] ok 141 - our $x; local $x; use strict; keys %$x <+store> [variable] ok 142 - our $x; local $x; no strict; keys %$x <+store> [exception] ok 143 - our $x; local $x; no strict; keys %$x <+store> [return] ok 144 - our $x; local $x; no strict; keys %$x <+store> [variable] ok 145 - my $x; keys %$x <+store> [exception] ok 146 - my $x; keys %$x <+store> [return] ok 147 - my $x; keys %$x <+store> [variable] ok 148 - our $x; local $x; use strict; keys %$x <+store> [exception] ok 149 - our $x; local $x; use strict; keys %$x <+store> [return] ok 150 - our $x; local $x; use strict; keys %$x <+store> [variable] ok 151 - our $x; local $x; no strict; keys %$x <+store> [exception] ok 152 - our $x; local $x; no strict; keys %$x <+store> [return] ok 153 - our $x; local $x; no strict; keys %$x <+store> [variable] ok 154 - my %x; keys %x <+store> [exception] ok 155 - my %x; keys %x <+store> [return] ok 156 - my %x; keys %x <+store> [variable] ok 157 - our %x; local %x; use strict; keys %x <+store> [exception] ok 158 - our %x; local %x; use strict; keys %x <+store> [return] ok 159 - our %x; local %x; use strict; keys %x <+store> [variable] ok 160 - our %x; local %x; no strict; keys %x <+store> [exception] ok 161 - our %x; local %x; no strict; keys %x <+store> [return] ok 162 - our %x; local %x; no strict; keys %x <+store> [variable] ok 163 - my $x; keys %$x <+strict +fetch> [exception] ok 164 - my $x; keys %$x <+strict +fetch> [return] ok 165 - my $x; keys %$x <+strict +fetch> [variable] ok 166 - our $x; local $x; use strict; keys %$x <+strict +fetch> [exception] ok 167 - our $x; local $x; use strict; keys %$x <+strict +fetch> [return] ok 168 - our $x; local $x; use strict; keys %$x <+strict +fetch> [variable] ok 169 - our $x; local $x; no strict; keys %$x <+strict +fetch> [exception] ok 170 - our $x; local $x; no strict; keys %$x <+strict +fetch> [return] ok 171 - our $x; local $x; no strict; keys %$x <+strict +fetch> [variable] ok 172 - my $x; keys %$x <+strict +fetch> [exception] ok 173 - my $x; keys %$x <+strict +fetch> [return] ok 174 - my $x; keys %$x <+strict +fetch> [variable] ok 175 - our $x; local $x; use strict; keys %$x <+strict +fetch> [exception] ok 176 - our $x; local $x; use strict; keys %$x <+strict +fetch> [return] ok 177 - our $x; local $x; use strict; keys %$x <+strict +fetch> [variable] ok 178 - our $x; local $x; no strict; keys %$x <+strict +fetch> [exception] ok 179 - our $x; local $x; no strict; keys %$x <+strict +fetch> [return] ok 180 - our $x; local $x; no strict; keys %$x <+strict +fetch> [variable] ok 181 - my %x; 1 <+strict +fetch> [exception] ok 182 - my %x; 1 <+strict +fetch> [return] ok 183 - my %x; 1 <+strict +fetch> [variable] ok 184 - our %x; local %x; use strict; 1 <+strict +fetch> [exception] ok 185 - our %x; local %x; use strict; 1 <+strict +fetch> [return] ok 186 - our %x; local %x; use strict; 1 <+strict +fetch> [variable] ok 187 - our %x; local %x; no strict; 1 <+strict +fetch> [exception] ok 188 - our %x; local %x; no strict; 1 <+strict +fetch> [return] ok 189 - our %x; local %x; no strict; 1 <+strict +fetch> [variable] ok 190 - my $x; keys %$x <+strict +exists> [exception] ok 191 - my $x; keys %$x <+strict +exists> [return] ok 192 - my $x; keys %$x <+strict +exists> [variable] ok 193 - our $x; local $x; use strict; keys %$x <+strict +exists> [exception] ok 194 - our $x; local $x; use strict; keys %$x <+strict +exists> [return] ok 195 - our $x; local $x; use strict; keys %$x <+strict +exists> [variable] ok 196 - our $x; local $x; no strict; keys %$x <+strict +exists> [exception] ok 197 - our $x; local $x; no strict; keys %$x <+strict +exists> [return] ok 198 - our $x; local $x; no strict; keys %$x <+strict +exists> [variable] ok 199 - my $x; keys %$x <+strict +exists> [exception] ok 200 - my $x; keys %$x <+strict +exists> [return] ok 201 - my $x; keys %$x <+strict +exists> [variable] ok 202 - our $x; local $x; use strict; keys %$x <+strict +exists> [exception] ok 203 - our $x; local $x; use strict; keys %$x <+strict +exists> [return] ok 204 - our $x; local $x; use strict; keys %$x <+strict +exists> [variable] ok 205 - our $x; local $x; no strict; keys %$x <+strict +exists> [exception] ok 206 - our $x; local $x; no strict; keys %$x <+strict +exists> [return] ok 207 - our $x; local $x; no strict; keys %$x <+strict +exists> [variable] ok 208 - my %x; keys %x <+strict +exists> [exception] ok 209 - my %x; keys %x <+strict +exists> [return] ok 210 - my %x; keys %x <+strict +exists> [variable] ok 211 - our %x; local %x; use strict; keys %x <+strict +exists> [exception] ok 212 - our %x; local %x; use strict; keys %x <+strict +exists> [return] ok 213 - our %x; local %x; use strict; keys %x <+strict +exists> [variable] ok 214 - our %x; local %x; no strict; keys %x <+strict +exists> [exception] ok 215 - our %x; local %x; no strict; keys %x <+strict +exists> [return] ok 216 - our %x; local %x; no strict; keys %x <+strict +exists> [variable] ok 217 - my $x; keys %$x <+strict +delete> [exception] ok 218 - my $x; keys %$x <+strict +delete> [return] ok 219 - my $x; keys %$x <+strict +delete> [variable] ok 220 - our $x; local $x; use strict; keys %$x <+strict +delete> [exception] ok 221 - our $x; local $x; use strict; keys %$x <+strict +delete> [return] ok 222 - our $x; local $x; use strict; keys %$x <+strict +delete> [variable] ok 223 - our $x; local $x; no strict; keys %$x <+strict +delete> [exception] ok 224 - our $x; local $x; no strict; keys %$x <+strict +delete> [return] ok 225 - our $x; local $x; no strict; keys %$x <+strict +delete> [variable] ok 226 - my $x; keys %$x <+strict +delete> [exception] ok 227 - my $x; keys %$x <+strict +delete> [return] ok 228 - my $x; keys %$x <+strict +delete> [variable] ok 229 - our $x; local $x; use strict; keys %$x <+strict +delete> [exception] ok 230 - our $x; local $x; use strict; keys %$x <+strict +delete> [return] ok 231 - our $x; local $x; use strict; keys %$x <+strict +delete> [variable] ok 232 - our $x; local $x; no strict; keys %$x <+strict +delete> [exception] ok 233 - our $x; local $x; no strict; keys %$x <+strict +delete> [return] ok 234 - our $x; local $x; no strict; keys %$x <+strict +delete> [variable] ok 235 - my %x; keys %x <+strict +delete> [exception] ok 236 - my %x; keys %x <+strict +delete> [return] ok 237 - my %x; keys %x <+strict +delete> [variable] ok 238 - our %x; local %x; use strict; keys %x <+strict +delete> [exception] ok 239 - our %x; local %x; use strict; keys %x <+strict +delete> [return] ok 240 - our %x; local %x; use strict; keys %x <+strict +delete> [variable] ok 241 - our %x; local %x; no strict; keys %x <+strict +delete> [exception] ok 242 - our %x; local %x; no strict; keys %x <+strict +delete> [return] ok 243 - our %x; local %x; no strict; keys %x <+strict +delete> [variable] ok 244 - my $x; keys %$x <+strict +store> [exception] ok 245 - my $x; keys %$x <+strict +store> [return] ok 246 - my $x; keys %$x <+strict +store> [variable] ok 247 - our $x; local $x; use strict; keys %$x <+strict +store> [exception] ok 248 - our $x; local $x; use strict; keys %$x <+strict +store> [return] ok 249 - our $x; local $x; use strict; keys %$x <+strict +store> [variable] ok 250 - our $x; local $x; no strict; keys %$x <+strict +store> [exception] ok 251 - our $x; local $x; no strict; keys %$x <+strict +store> [return] ok 252 - our $x; local $x; no strict; keys %$x <+strict +store> [variable] ok 253 - my $x; keys %$x <+strict +store> [exception] ok 254 - my $x; keys %$x <+strict +store> [return] ok 255 - my $x; keys %$x <+strict +store> [variable] ok 256 - our $x; local $x; use strict; keys %$x <+strict +store> [exception] ok 257 - our $x; local $x; use strict; keys %$x <+strict +store> [return] ok 258 - our $x; local $x; use strict; keys %$x <+strict +store> [variable] ok 259 - our $x; local $x; no strict; keys %$x <+strict +store> [exception] ok 260 - our $x; local $x; no strict; keys %$x <+strict +store> [return] ok 261 - our $x; local $x; no strict; keys %$x <+strict +store> [variable] ok 262 - my %x; keys %x <+strict +store> [exception] ok 263 - my %x; keys %x <+strict +store> [return] ok 264 - my %x; keys %x <+strict +store> [variable] ok 265 - our %x; local %x; use strict; keys %x <+strict +store> [exception] ok 266 - our %x; local %x; use strict; keys %x <+strict +store> [return] ok 267 - our %x; local %x; use strict; keys %x <+strict +store> [variable] ok 268 - our %x; local %x; no strict; keys %x <+strict +store> [exception] ok 269 - our %x; local %x; no strict; keys %x <+strict +store> [return] ok 270 - our %x; local %x; no strict; keys %x <+strict +store> [variable] ok 271 - my $x; [ keys %$x ] [exception] ok 272 - my $x; [ keys %$x ] [return] ok 273 - my $x; [ keys %$x ] [variable] ok 274 - our $x; local $x; use strict; [ keys %$x ] [exception] ok 275 - our $x; local $x; use strict; [ keys %$x ] [return] ok 276 - our $x; local $x; use strict; [ keys %$x ] [variable] ok 277 - our $x; local $x; no strict; [ keys %$x ] [exception] ok 278 - our $x; local $x; no strict; [ keys %$x ] [return] ok 279 - our $x; local $x; no strict; [ keys %$x ] [variable] ok 280 - my $x; [ keys %$x ] [exception] ok 281 - my $x; [ keys %$x ] [return] ok 282 - my $x; [ keys %$x ] [variable] ok 283 - our $x; local $x; use strict; [ keys %$x ] [exception] ok 284 - our $x; local $x; use strict; [ keys %$x ] [return] ok 285 - our $x; local $x; use strict; [ keys %$x ] [variable] ok 286 - our $x; local $x; no strict; [ keys %$x ] [exception] ok 287 - our $x; local $x; no strict; [ keys %$x ] [return] ok 288 - our $x; local $x; no strict; [ keys %$x ] [variable] ok 289 - my %x; [ keys %x ] [exception] ok 290 - my %x; [ keys %x ] [return] ok 291 - my %x; [ keys %x ] [variable] ok 292 - our %x; local %x; use strict; [ keys %x ] [exception] ok 293 - our %x; local %x; use strict; [ keys %x ] [return] ok 294 - our %x; local %x; use strict; [ keys %x ] [variable] ok 295 - our %x; local %x; no strict; [ keys %x ] [exception] ok 296 - our %x; local %x; no strict; [ keys %x ] [return] ok 297 - our %x; local %x; no strict; [ keys %x ] [variable] ok 298 - my $x; [ keys %$x ] [exception] ok 299 - my $x; [ keys %$x ] [return] ok 300 - my $x; [ keys %$x ] [variable] ok 301 - our $x; local $x; use strict; [ keys %$x ] [exception] ok 302 - our $x; local $x; use strict; [ keys %$x ] [return] ok 303 - our $x; local $x; use strict; [ keys %$x ] [variable] ok 304 - our $x; local $x; no strict; [ keys %$x ] [exception] ok 305 - our $x; local $x; no strict; [ keys %$x ] [return] ok 306 - our $x; local $x; no strict; [ keys %$x ] [variable] ok 307 - my $x; [ keys %$x ] [exception] ok 308 - my $x; [ keys %$x ] [return] ok 309 - my $x; [ keys %$x ] [variable] ok 310 - our $x; local $x; use strict; [ keys %$x ] [exception] ok 311 - our $x; local $x; use strict; [ keys %$x ] [return] ok 312 - our $x; local $x; use strict; [ keys %$x ] [variable] ok 313 - our $x; local $x; no strict; [ keys %$x ] [exception] ok 314 - our $x; local $x; no strict; [ keys %$x ] [return] ok 315 - our $x; local $x; no strict; [ keys %$x ] [variable] ok 316 - my %x; [ keys %x ] [exception] ok 317 - my %x; [ keys %x ] [return] ok 318 - my %x; [ keys %x ] [variable] ok 319 - our %x; local %x; use strict; [ keys %x ] [exception] ok 320 - our %x; local %x; use strict; [ keys %x ] [return] ok 321 - our %x; local %x; use strict; [ keys %x ] [variable] ok 322 - our %x; local %x; no strict; [ keys %x ] [exception] ok 323 - our %x; local %x; no strict; [ keys %x ] [return] ok 324 - our %x; local %x; no strict; [ keys %x ] [variable] ok 325 - my $x; [ keys %$x ] <+fetch> [exception] ok 326 - my $x; [ keys %$x ] <+fetch> [return] ok 327 - my $x; [ keys %$x ] <+fetch> [variable] ok 328 - our $x; local $x; use strict; [ keys %$x ] <+fetch> [exception] ok 329 - our $x; local $x; use strict; [ keys %$x ] <+fetch> [return] ok 330 - our $x; local $x; use strict; [ keys %$x ] <+fetch> [variable] ok 331 - our $x; local $x; no strict; [ keys %$x ] <+fetch> [exception] ok 332 - our $x; local $x; no strict; [ keys %$x ] <+fetch> [return] ok 333 - our $x; local $x; no strict; [ keys %$x ] <+fetch> [variable] ok 334 - my $x; [ keys %$x ] <+fetch> [exception] ok 335 - my $x; [ keys %$x ] <+fetch> [return] ok 336 - my $x; [ keys %$x ] <+fetch> [variable] ok 337 - our $x; local $x; use strict; [ keys %$x ] <+fetch> [exception] ok 338 - our $x; local $x; use strict; [ keys %$x ] <+fetch> [return] ok 339 - our $x; local $x; use strict; [ keys %$x ] <+fetch> [variable] ok 340 - our $x; local $x; no strict; [ keys %$x ] <+fetch> [exception] ok 341 - our $x; local $x; no strict; [ keys %$x ] <+fetch> [return] ok 342 - our $x; local $x; no strict; [ keys %$x ] <+fetch> [variable] ok 343 - my %x; [ keys %x ] <+fetch> [exception] ok 344 - my %x; [ keys %x ] <+fetch> [return] ok 345 - my %x; [ keys %x ] <+fetch> [variable] ok 346 - our %x; local %x; use strict; [ keys %x ] <+fetch> [exception] ok 347 - our %x; local %x; use strict; [ keys %x ] <+fetch> [return] ok 348 - our %x; local %x; use strict; [ keys %x ] <+fetch> [variable] ok 349 - our %x; local %x; no strict; [ keys %x ] <+fetch> [exception] ok 350 - our %x; local %x; no strict; [ keys %x ] <+fetch> [return] ok 351 - our %x; local %x; no strict; [ keys %x ] <+fetch> [variable] ok 352 - my $x; [ keys %$x ] <+exists +delete +store> [exception] ok 353 - my $x; [ keys %$x ] <+exists +delete +store> [return] ok 354 - my $x; [ keys %$x ] <+exists +delete +store> [variable] ok 355 - our $x; local $x; use strict; [ keys %$x ] <+exists +delete +store> [exception] ok 356 - our $x; local $x; use strict; [ keys %$x ] <+exists +delete +store> [return] ok 357 - our $x; local $x; use strict; [ keys %$x ] <+exists +delete +store> [variable] ok 358 - our $x; local $x; no strict; [ keys %$x ] <+exists +delete +store> [exception] ok 359 - our $x; local $x; no strict; [ keys %$x ] <+exists +delete +store> [return] ok 360 - our $x; local $x; no strict; [ keys %$x ] <+exists +delete +store> [variable] ok 361 - my $x; [ keys %$x ] <+exists +delete +store> [exception] ok 362 - my $x; [ keys %$x ] <+exists +delete +store> [return] ok 363 - my $x; [ keys %$x ] <+exists +delete +store> [variable] ok 364 - our $x; local $x; use strict; [ keys %$x ] <+exists +delete +store> [exception] ok 365 - our $x; local $x; use strict; [ keys %$x ] <+exists +delete +store> [return] ok 366 - our $x; local $x; use strict; [ keys %$x ] <+exists +delete +store> [variable] ok 367 - our $x; local $x; no strict; [ keys %$x ] <+exists +delete +store> [exception] ok 368 - our $x; local $x; no strict; [ keys %$x ] <+exists +delete +store> [return] ok 369 - our $x; local $x; no strict; [ keys %$x ] <+exists +delete +store> [variable] ok 370 - my %x; [ keys %x ] <+exists +delete +store> [exception] ok 371 - my %x; [ keys %x ] <+exists +delete +store> [return] ok 372 - my %x; [ keys %x ] <+exists +delete +store> [variable] ok 373 - our %x; local %x; use strict; [ keys %x ] <+exists +delete +store> [exception] ok 374 - our %x; local %x; use strict; [ keys %x ] <+exists +delete +store> [return] ok 375 - our %x; local %x; use strict; [ keys %x ] <+exists +delete +store> [variable] ok 376 - our %x; local %x; no strict; [ keys %x ] <+exists +delete +store> [exception] ok 377 - our %x; local %x; no strict; [ keys %x ] <+exists +delete +store> [return] ok 378 - our %x; local %x; no strict; [ keys %x ] <+exists +delete +store> [variable] ok 379 - my $x; $x->{a} = 1; [ keys %$x ] [exception] ok 380 - my $x; $x->{a} = 1; [ keys %$x ] [return] ok 381 - my $x; $x->{a} = 1; [ keys %$x ] [variable] ok 382 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [exception] ok 383 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [return] ok 384 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [variable] ok 385 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [exception] ok 386 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [return] ok 387 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [variable] ok 388 - my $x; $x->{a} = 1; [ keys %$x ] [exception] ok 389 - my $x; $x->{a} = 1; [ keys %$x ] [return] ok 390 - my $x; $x->{a} = 1; [ keys %$x ] [variable] ok 391 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [exception] ok 392 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [return] ok 393 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [variable] ok 394 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [exception] ok 395 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [return] ok 396 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [variable] ok 397 - my %x; $x{a} = 1; [ keys %x ] [exception] ok 398 - my %x; $x{a} = 1; [ keys %x ] [return] ok 399 - my %x; $x{a} = 1; [ keys %x ] [variable] ok 400 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] [exception] ok 401 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] [return] ok 402 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] [variable] ok 403 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] [exception] ok 404 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] [return] ok 405 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] [variable] ok 406 - my $x; $x->{a} = 1; [ keys %$x ] [exception] ok 407 - my $x; $x->{a} = 1; [ keys %$x ] [return] ok 408 - my $x; $x->{a} = 1; [ keys %$x ] [variable] ok 409 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [exception] ok 410 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [return] ok 411 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [variable] ok 412 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [exception] ok 413 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [return] ok 414 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [variable] ok 415 - my $x; $x->{a} = 1; [ keys %$x ] [exception] ok 416 - my $x; $x->{a} = 1; [ keys %$x ] [return] ok 417 - my $x; $x->{a} = 1; [ keys %$x ] [variable] ok 418 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [exception] ok 419 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [return] ok 420 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [variable] ok 421 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [exception] ok 422 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [return] ok 423 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [variable] ok 424 - my %x; $x{a} = 1; [ keys %x ] [exception] ok 425 - my %x; $x{a} = 1; [ keys %x ] [return] ok 426 - my %x; $x{a} = 1; [ keys %x ] [variable] ok 427 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] [exception] ok 428 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] [return] ok 429 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] [variable] ok 430 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] [exception] ok 431 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] [return] ok 432 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] [variable] ok 433 - my $x; $x->{a} = 1; [ keys %$x ] <+fetch> [exception] ok 434 - my $x; $x->{a} = 1; [ keys %$x ] <+fetch> [return] ok 435 - my $x; $x->{a} = 1; [ keys %$x ] <+fetch> [variable] ok 436 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+fetch> [exception] ok 437 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+fetch> [return] ok 438 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+fetch> [variable] ok 439 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+fetch> [exception] ok 440 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+fetch> [return] ok 441 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+fetch> [variable] ok 442 - my $x; $x->{a} = 1; [ keys %$x ] <+fetch> [exception] ok 443 - my $x; $x->{a} = 1; [ keys %$x ] <+fetch> [return] ok 444 - my $x; $x->{a} = 1; [ keys %$x ] <+fetch> [variable] ok 445 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+fetch> [exception] ok 446 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+fetch> [return] ok 447 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+fetch> [variable] ok 448 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+fetch> [exception] ok 449 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+fetch> [return] ok 450 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+fetch> [variable] ok 451 - my %x; $x{a} = 1; [ keys %x ] <+fetch> [exception] ok 452 - my %x; $x{a} = 1; [ keys %x ] <+fetch> [return] ok 453 - my %x; $x{a} = 1; [ keys %x ] <+fetch> [variable] ok 454 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] <+fetch> [exception] ok 455 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] <+fetch> [return] ok 456 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] <+fetch> [variable] ok 457 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] <+fetch> [exception] ok 458 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] <+fetch> [return] ok 459 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] <+fetch> [variable] ok 460 - my $x; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [exception] ok 461 - my $x; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [return] ok 462 - my $x; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [variable] ok 463 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [exception] ok 464 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [return] ok 465 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [variable] ok 466 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [exception] ok 467 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [return] ok 468 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [variable] ok 469 - my $x; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [exception] ok 470 - my $x; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [return] ok 471 - my $x; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [variable] ok 472 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [exception] ok 473 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [return] ok 474 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [variable] ok 475 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [exception] ok 476 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [return] ok 477 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [variable] ok 478 - my %x; $x{a} = 1; [ keys %x ] <+exists +delete +store> [exception] ok 479 - my %x; $x{a} = 1; [ keys %x ] <+exists +delete +store> [return] ok 480 - my %x; $x{a} = 1; [ keys %x ] <+exists +delete +store> [variable] ok 481 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] <+exists +delete +store> [exception] ok 482 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] <+exists +delete +store> [return] ok 483 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] <+exists +delete +store> [variable] ok 484 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] <+exists +delete +store> [exception] ok 485 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] <+exists +delete +store> [return] ok 486 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] <+exists +delete +store> [variable] ok 487 - my $x; keys %{$x->{a}} [exception] ok 488 - my $x; keys %{$x->{a}} [return] ok 489 - my $x; keys %{$x->{a}} [variable] ok 490 - our $x; local $x; use strict; keys %{$x->{a}} [exception] ok 491 - our $x; local $x; use strict; keys %{$x->{a}} [return] ok 492 - our $x; local $x; use strict; keys %{$x->{a}} [variable] ok 493 - our $x; local $x; no strict; keys %{$x->{a}} [exception] ok 494 - our $x; local $x; no strict; keys %{$x->{a}} [return] ok 495 - our $x; local $x; no strict; keys %{$x->{a}} [variable] ok 496 - my $x; keys %{$$x{a}} [exception] ok 497 - my $x; keys %{$$x{a}} [return] ok 498 - my $x; keys %{$$x{a}} [variable] ok 499 - our $x; local $x; use strict; keys %{$$x{a}} [exception] ok 500 - our $x; local $x; use strict; keys %{$$x{a}} [return] ok 501 - our $x; local $x; use strict; keys %{$$x{a}} [variable] ok 502 - our $x; local $x; no strict; keys %{$$x{a}} [exception] ok 503 - our $x; local $x; no strict; keys %{$$x{a}} [return] ok 504 - our $x; local $x; no strict; keys %{$$x{a}} [variable] ok 505 - my %x; keys %{$x{a}} [exception] ok 506 - my %x; keys %{$x{a}} [return] ok 507 - my %x; keys %{$x{a}} [variable] ok 508 - our %x; local %x; use strict; keys %{$x{a}} [exception] ok 509 - our %x; local %x; use strict; keys %{$x{a}} [return] ok 510 - our %x; local %x; use strict; keys %{$x{a}} [variable] ok 511 - our %x; local %x; no strict; keys %{$x{a}} [exception] ok 512 - our %x; local %x; no strict; keys %{$x{a}} [return] ok 513 - our %x; local %x; no strict; keys %{$x{a}} [variable] ok 514 - my $x; keys %{$x->{a}} [exception] ok 515 - my $x; keys %{$x->{a}} [return] ok 516 - my $x; keys %{$x->{a}} [variable] ok 517 - our $x; local $x; use strict; keys %{$x->{a}} [exception] ok 518 - our $x; local $x; use strict; keys %{$x->{a}} [return] ok 519 - our $x; local $x; use strict; keys %{$x->{a}} [variable] ok 520 - our $x; local $x; no strict; keys %{$x->{a}} [exception] ok 521 - our $x; local $x; no strict; keys %{$x->{a}} [return] ok 522 - our $x; local $x; no strict; keys %{$x->{a}} [variable] ok 523 - my $x; keys %{$$x{a}} [exception] ok 524 - my $x; keys %{$$x{a}} [return] ok 525 - my $x; keys %{$$x{a}} [variable] ok 526 - our $x; local $x; use strict; keys %{$$x{a}} [exception] ok 527 - our $x; local $x; use strict; keys %{$$x{a}} [return] ok 528 - our $x; local $x; use strict; keys %{$$x{a}} [variable] ok 529 - our $x; local $x; no strict; keys %{$$x{a}} [exception] ok 530 - our $x; local $x; no strict; keys %{$$x{a}} [return] ok 531 - our $x; local $x; no strict; keys %{$$x{a}} [variable] ok 532 - my %x; keys %{$x{a}} [exception] ok 533 - my %x; keys %{$x{a}} [return] ok 534 - my %x; keys %{$x{a}} [variable] ok 535 - our %x; local %x; use strict; keys %{$x{a}} [exception] ok 536 - our %x; local %x; use strict; keys %{$x{a}} [return] ok 537 - our %x; local %x; use strict; keys %{$x{a}} [variable] ok 538 - our %x; local %x; no strict; keys %{$x{a}} [exception] ok 539 - our %x; local %x; no strict; keys %{$x{a}} [return] ok 540 - our %x; local %x; no strict; keys %{$x{a}} [variable] ok 541 - my $x; keys %{$x->{a}} <+fetch> [exception] ok 542 - my $x; keys %{$x->{a}} <+fetch> [return] ok 543 - my $x; keys %{$x->{a}} <+fetch> [variable] ok 544 - our $x; local $x; use strict; keys %{$x->{a}} <+fetch> [exception] ok 545 - our $x; local $x; use strict; keys %{$x->{a}} <+fetch> [return] ok 546 - our $x; local $x; use strict; keys %{$x->{a}} <+fetch> [variable] ok 547 - our $x; local $x; no strict; keys %{$x->{a}} <+fetch> [exception] ok 548 - our $x; local $x; no strict; keys %{$x->{a}} <+fetch> [return] ok 549 - our $x; local $x; no strict; keys %{$x->{a}} <+fetch> [variable] ok 550 - my $x; keys %{$$x{a}} <+fetch> [exception] ok 551 - my $x; keys %{$$x{a}} <+fetch> [return] ok 552 - my $x; keys %{$$x{a}} <+fetch> [variable] ok 553 - our $x; local $x; use strict; keys %{$$x{a}} <+fetch> [exception] ok 554 - our $x; local $x; use strict; keys %{$$x{a}} <+fetch> [return] ok 555 - our $x; local $x; use strict; keys %{$$x{a}} <+fetch> [variable] ok 556 - our $x; local $x; no strict; keys %{$$x{a}} <+fetch> [exception] ok 557 - our $x; local $x; no strict; keys %{$$x{a}} <+fetch> [return] ok 558 - our $x; local $x; no strict; keys %{$$x{a}} <+fetch> [variable] ok 559 - my %x; keys %{$x{a}} <+fetch> [exception] ok 560 - my %x; keys %{$x{a}} <+fetch> [return] ok 561 - my %x; keys %{$x{a}} <+fetch> [variable] ok 562 - our %x; local %x; use strict; keys %{$x{a}} <+fetch> [exception] ok 563 - our %x; local %x; use strict; keys %{$x{a}} <+fetch> [return] ok 564 - our %x; local %x; use strict; keys %{$x{a}} <+fetch> [variable] ok 565 - our %x; local %x; no strict; keys %{$x{a}} <+fetch> [exception] ok 566 - our %x; local %x; no strict; keys %{$x{a}} <+fetch> [return] ok 567 - our %x; local %x; no strict; keys %{$x{a}} <+fetch> [variable] ok 568 - my $x; keys %{$x->{a}} <+exists> [exception] ok 569 - my $x; keys %{$x->{a}} <+exists> [return] ok 570 - my $x; keys %{$x->{a}} <+exists> [variable] ok 571 - our $x; local $x; use strict; keys %{$x->{a}} <+exists> [exception] ok 572 - our $x; local $x; use strict; keys %{$x->{a}} <+exists> [return] ok 573 - our $x; local $x; use strict; keys %{$x->{a}} <+exists> [variable] ok 574 - our $x; local $x; no strict; keys %{$x->{a}} <+exists> [exception] ok 575 - our $x; local $x; no strict; keys %{$x->{a}} <+exists> [return] ok 576 - our $x; local $x; no strict; keys %{$x->{a}} <+exists> [variable] ok 577 - my $x; keys %{$$x{a}} <+exists> [exception] ok 578 - my $x; keys %{$$x{a}} <+exists> [return] ok 579 - my $x; keys %{$$x{a}} <+exists> [variable] ok 580 - our $x; local $x; use strict; keys %{$$x{a}} <+exists> [exception] ok 581 - our $x; local $x; use strict; keys %{$$x{a}} <+exists> [return] ok 582 - our $x; local $x; use strict; keys %{$$x{a}} <+exists> [variable] ok 583 - our $x; local $x; no strict; keys %{$$x{a}} <+exists> [exception] ok 584 - our $x; local $x; no strict; keys %{$$x{a}} <+exists> [return] ok 585 - our $x; local $x; no strict; keys %{$$x{a}} <+exists> [variable] ok 586 - my %x; keys %{$x{a}} <+exists> [exception] ok 587 - my %x; keys %{$x{a}} <+exists> [return] ok 588 - my %x; keys %{$x{a}} <+exists> [variable] ok 589 - our %x; local %x; use strict; keys %{$x{a}} <+exists> [exception] ok 590 - our %x; local %x; use strict; keys %{$x{a}} <+exists> [return] ok 591 - our %x; local %x; use strict; keys %{$x{a}} <+exists> [variable] ok 592 - our %x; local %x; no strict; keys %{$x{a}} <+exists> [exception] ok 593 - our %x; local %x; no strict; keys %{$x{a}} <+exists> [return] ok 594 - our %x; local %x; no strict; keys %{$x{a}} <+exists> [variable] ok 595 - my $x; keys %{$x->{a}} <+delete> [exception] ok 596 - my $x; keys %{$x->{a}} <+delete> [return] ok 597 - my $x; keys %{$x->{a}} <+delete> [variable] ok 598 - our $x; local $x; use strict; keys %{$x->{a}} <+delete> [exception] ok 599 - our $x; local $x; use strict; keys %{$x->{a}} <+delete> [return] ok 600 - our $x; local $x; use strict; keys %{$x->{a}} <+delete> [variable] ok 601 - our $x; local $x; no strict; keys %{$x->{a}} <+delete> [exception] ok 602 - our $x; local $x; no strict; keys %{$x->{a}} <+delete> [return] ok 603 - our $x; local $x; no strict; keys %{$x->{a}} <+delete> [variable] ok 604 - my $x; keys %{$$x{a}} <+delete> [exception] ok 605 - my $x; keys %{$$x{a}} <+delete> [return] ok 606 - my $x; keys %{$$x{a}} <+delete> [variable] ok 607 - our $x; local $x; use strict; keys %{$$x{a}} <+delete> [exception] ok 608 - our $x; local $x; use strict; keys %{$$x{a}} <+delete> [return] ok 609 - our $x; local $x; use strict; keys %{$$x{a}} <+delete> [variable] ok 610 - our $x; local $x; no strict; keys %{$$x{a}} <+delete> [exception] ok 611 - our $x; local $x; no strict; keys %{$$x{a}} <+delete> [return] ok 612 - our $x; local $x; no strict; keys %{$$x{a}} <+delete> [variable] ok 613 - my %x; keys %{$x{a}} <+delete> [exception] ok 614 - my %x; keys %{$x{a}} <+delete> [return] ok 615 - my %x; keys %{$x{a}} <+delete> [variable] ok 616 - our %x; local %x; use strict; keys %{$x{a}} <+delete> [exception] ok 617 - our %x; local %x; use strict; keys %{$x{a}} <+delete> [return] ok 618 - our %x; local %x; use strict; keys %{$x{a}} <+delete> [variable] ok 619 - our %x; local %x; no strict; keys %{$x{a}} <+delete> [exception] ok 620 - our %x; local %x; no strict; keys %{$x{a}} <+delete> [return] ok 621 - our %x; local %x; no strict; keys %{$x{a}} <+delete> [variable] ok 622 - my $x; keys %{$x->{a}} <+store> [exception] ok 623 - my $x; keys %{$x->{a}} <+store> [return] ok 624 - my $x; keys %{$x->{a}} <+store> [variable] ok 625 - our $x; local $x; use strict; keys %{$x->{a}} <+store> [exception] ok 626 - our $x; local $x; use strict; keys %{$x->{a}} <+store> [return] ok 627 - our $x; local $x; use strict; keys %{$x->{a}} <+store> [variable] ok 628 - our $x; local $x; no strict; keys %{$x->{a}} <+store> [exception] ok 629 - our $x; local $x; no strict; keys %{$x->{a}} <+store> [return] ok 630 - our $x; local $x; no strict; keys %{$x->{a}} <+store> [variable] ok 631 - my $x; keys %{$$x{a}} <+store> [exception] ok 632 - my $x; keys %{$$x{a}} <+store> [return] ok 633 - my $x; keys %{$$x{a}} <+store> [variable] ok 634 - our $x; local $x; use strict; keys %{$$x{a}} <+store> [exception] ok 635 - our $x; local $x; use strict; keys %{$$x{a}} <+store> [return] ok 636 - our $x; local $x; use strict; keys %{$$x{a}} <+store> [variable] ok 637 - our $x; local $x; no strict; keys %{$$x{a}} <+store> [exception] ok 638 - our $x; local $x; no strict; keys %{$$x{a}} <+store> [return] ok 639 - our $x; local $x; no strict; keys %{$$x{a}} <+store> [variable] ok 640 - my %x; keys %{$x{a}} <+store> [exception] ok 641 - my %x; keys %{$x{a}} <+store> [return] ok 642 - my %x; keys %{$x{a}} <+store> [variable] ok 643 - our %x; local %x; use strict; keys %{$x{a}} <+store> [exception] ok 644 - our %x; local %x; use strict; keys %{$x{a}} <+store> [return] ok 645 - our %x; local %x; use strict; keys %{$x{a}} <+store> [variable] ok 646 - our %x; local %x; no strict; keys %{$x{a}} <+store> [exception] ok 647 - our %x; local %x; no strict; keys %{$x{a}} <+store> [return] ok 648 - our %x; local %x; no strict; keys %{$x{a}} <+store> [variable] ok 649 - my $x; keys %{$x->{a}} <+strict +fetch> [exception] ok 650 - my $x; keys %{$x->{a}} <+strict +fetch> [return] ok 651 - my $x; keys %{$x->{a}} <+strict +fetch> [variable] ok 652 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +fetch> [exception] ok 653 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +fetch> [return] ok 654 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +fetch> [variable] ok 655 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +fetch> [exception] ok 656 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +fetch> [return] ok 657 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +fetch> [variable] ok 658 - my $x; keys %{$$x{a}} <+strict +fetch> [exception] ok 659 - my $x; keys %{$$x{a}} <+strict +fetch> [return] ok 660 - my $x; keys %{$$x{a}} <+strict +fetch> [variable] ok 661 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +fetch> [exception] ok 662 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +fetch> [return] ok 663 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +fetch> [variable] ok 664 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +fetch> [exception] ok 665 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +fetch> [return] ok 666 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +fetch> [variable] ok 667 - my %x; 1 <+strict +fetch> [exception] ok 668 - my %x; 1 <+strict +fetch> [return] ok 669 - my %x; 1 <+strict +fetch> [variable] ok 670 - our %x; local %x; use strict; 1 <+strict +fetch> [exception] ok 671 - our %x; local %x; use strict; 1 <+strict +fetch> [return] ok 672 - our %x; local %x; use strict; 1 <+strict +fetch> [variable] ok 673 - our %x; local %x; no strict; 1 <+strict +fetch> [exception] ok 674 - our %x; local %x; no strict; 1 <+strict +fetch> [return] ok 675 - our %x; local %x; no strict; 1 <+strict +fetch> [variable] ok 676 - my $x; keys %{$x->{a}} <+strict +exists> [exception] ok 677 - my $x; keys %{$x->{a}} <+strict +exists> [return] ok 678 - my $x; keys %{$x->{a}} <+strict +exists> [variable] ok 679 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +exists> [exception] ok 680 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +exists> [return] ok 681 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +exists> [variable] ok 682 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +exists> [exception] ok 683 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +exists> [return] ok 684 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +exists> [variable] ok 685 - my $x; keys %{$$x{a}} <+strict +exists> [exception] ok 686 - my $x; keys %{$$x{a}} <+strict +exists> [return] ok 687 - my $x; keys %{$$x{a}} <+strict +exists> [variable] ok 688 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +exists> [exception] ok 689 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +exists> [return] ok 690 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +exists> [variable] ok 691 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +exists> [exception] ok 692 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +exists> [return] ok 693 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +exists> [variable] ok 694 - my %x; keys %{$x{a}} <+strict +exists> [exception] ok 695 - my %x; keys %{$x{a}} <+strict +exists> [return] ok 696 - my %x; keys %{$x{a}} <+strict +exists> [variable] ok 697 - our %x; local %x; use strict; keys %{$x{a}} <+strict +exists> [exception] ok 698 - our %x; local %x; use strict; keys %{$x{a}} <+strict +exists> [return] ok 699 - our %x; local %x; use strict; keys %{$x{a}} <+strict +exists> [variable] ok 700 - our %x; local %x; no strict; keys %{$x{a}} <+strict +exists> [exception] ok 701 - our %x; local %x; no strict; keys %{$x{a}} <+strict +exists> [return] ok 702 - our %x; local %x; no strict; keys %{$x{a}} <+strict +exists> [variable] ok 703 - my $x; keys %{$x->{a}} <+strict +delete> [exception] ok 704 - my $x; keys %{$x->{a}} <+strict +delete> [return] ok 705 - my $x; keys %{$x->{a}} <+strict +delete> [variable] ok 706 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +delete> [exception] ok 707 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +delete> [return] ok 708 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +delete> [variable] ok 709 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +delete> [exception] ok 710 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +delete> [return] ok 711 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +delete> [variable] ok 712 - my $x; keys %{$$x{a}} <+strict +delete> [exception] ok 713 - my $x; keys %{$$x{a}} <+strict +delete> [return] ok 714 - my $x; keys %{$$x{a}} <+strict +delete> [variable] ok 715 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +delete> [exception] ok 716 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +delete> [return] ok 717 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +delete> [variable] ok 718 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +delete> [exception] ok 719 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +delete> [return] ok 720 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +delete> [variable] ok 721 - my %x; keys %{$x{a}} <+strict +delete> [exception] ok 722 - my %x; keys %{$x{a}} <+strict +delete> [return] ok 723 - my %x; keys %{$x{a}} <+strict +delete> [variable] ok 724 - our %x; local %x; use strict; keys %{$x{a}} <+strict +delete> [exception] ok 725 - our %x; local %x; use strict; keys %{$x{a}} <+strict +delete> [return] ok 726 - our %x; local %x; use strict; keys %{$x{a}} <+strict +delete> [variable] ok 727 - our %x; local %x; no strict; keys %{$x{a}} <+strict +delete> [exception] ok 728 - our %x; local %x; no strict; keys %{$x{a}} <+strict +delete> [return] ok 729 - our %x; local %x; no strict; keys %{$x{a}} <+strict +delete> [variable] ok 730 - my $x; keys %{$x->{a}} <+strict +store> [exception] ok 731 - my $x; keys %{$x->{a}} <+strict +store> [return] ok 732 - my $x; keys %{$x->{a}} <+strict +store> [variable] ok 733 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +store> [exception] ok 734 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +store> [return] ok 735 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +store> [variable] ok 736 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +store> [exception] ok 737 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +store> [return] ok 738 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +store> [variable] ok 739 - my $x; keys %{$$x{a}} <+strict +store> [exception] ok 740 - my $x; keys %{$$x{a}} <+strict +store> [return] ok 741 - my $x; keys %{$$x{a}} <+strict +store> [variable] ok 742 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +store> [exception] ok 743 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +store> [return] ok 744 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +store> [variable] ok 745 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +store> [exception] ok 746 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +store> [return] ok 747 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +store> [variable] ok 748 - my %x; keys %{$x{a}} <+strict +store> [exception] ok 749 - my %x; keys %{$x{a}} <+strict +store> [return] ok 750 - my %x; keys %{$x{a}} <+strict +store> [variable] ok 751 - our %x; local %x; use strict; keys %{$x{a}} <+strict +store> [exception] ok 752 - our %x; local %x; use strict; keys %{$x{a}} <+strict +store> [return] ok 753 - our %x; local %x; use strict; keys %{$x{a}} <+strict +store> [variable] ok 754 - our %x; local %x; no strict; keys %{$x{a}} <+strict +store> [exception] ok 755 - our %x; local %x; no strict; keys %{$x{a}} <+strict +store> [return] ok 756 - our %x; local %x; no strict; keys %{$x{a}} <+strict +store> [variable] ok 757 - my $x; [ keys %{$x->{a}} ] [exception] ok 758 - my $x; [ keys %{$x->{a}} ] [return] ok 759 - my $x; [ keys %{$x->{a}} ] [variable] ok 760 - our $x; local $x; use strict; [ keys %{$x->{a}} ] [exception] ok 761 - our $x; local $x; use strict; [ keys %{$x->{a}} ] [return] ok 762 - our $x; local $x; use strict; [ keys %{$x->{a}} ] [variable] ok 763 - our $x; local $x; no strict; [ keys %{$x->{a}} ] [exception] ok 764 - our $x; local $x; no strict; [ keys %{$x->{a}} ] [return] ok 765 - our $x; local $x; no strict; [ keys %{$x->{a}} ] [variable] ok 766 - my $x; [ keys %{$$x{a}} ] [exception] ok 767 - my $x; [ keys %{$$x{a}} ] [return] ok 768 - my $x; [ keys %{$$x{a}} ] [variable] ok 769 - our $x; local $x; use strict; [ keys %{$$x{a}} ] [exception] ok 770 - our $x; local $x; use strict; [ keys %{$$x{a}} ] [return] ok 771 - our $x; local $x; use strict; [ keys %{$$x{a}} ] [variable] ok 772 - our $x; local $x; no strict; [ keys %{$$x{a}} ] [exception] ok 773 - our $x; local $x; no strict; [ keys %{$$x{a}} ] [return] ok 774 - our $x; local $x; no strict; [ keys %{$$x{a}} ] [variable] ok 775 - my %x; [ keys %{$x{a}} ] [exception] ok 776 - my %x; [ keys %{$x{a}} ] [return] ok 777 - my %x; [ keys %{$x{a}} ] [variable] ok 778 - our %x; local %x; use strict; [ keys %{$x{a}} ] [exception] ok 779 - our %x; local %x; use strict; [ keys %{$x{a}} ] [return] ok 780 - our %x; local %x; use strict; [ keys %{$x{a}} ] [variable] ok 781 - our %x; local %x; no strict; [ keys %{$x{a}} ] [exception] ok 782 - our %x; local %x; no strict; [ keys %{$x{a}} ] [return] ok 783 - our %x; local %x; no strict; [ keys %{$x{a}} ] [variable] ok 784 - my $x; [ keys %{$x->{a}} ] [exception] ok 785 - my $x; [ keys %{$x->{a}} ] [return] ok 786 - my $x; [ keys %{$x->{a}} ] [variable] ok 787 - our $x; local $x; use strict; [ keys %{$x->{a}} ] [exception] ok 788 - our $x; local $x; use strict; [ keys %{$x->{a}} ] [return] ok 789 - our $x; local $x; use strict; [ keys %{$x->{a}} ] [variable] ok 790 - our $x; local $x; no strict; [ keys %{$x->{a}} ] [exception] ok 791 - our $x; local $x; no strict; [ keys %{$x->{a}} ] [return] ok 792 - our $x; local $x; no strict; [ keys %{$x->{a}} ] [variable] ok 793 - my $x; [ keys %{$$x{a}} ] [exception] ok 794 - my $x; [ keys %{$$x{a}} ] [return] ok 795 - my $x; [ keys %{$$x{a}} ] [variable] ok 796 - our $x; local $x; use strict; [ keys %{$$x{a}} ] [exception] ok 797 - our $x; local $x; use strict; [ keys %{$$x{a}} ] [return] ok 798 - our $x; local $x; use strict; [ keys %{$$x{a}} ] [variable] ok 799 - our $x; local $x; no strict; [ keys %{$$x{a}} ] [exception] ok 800 - our $x; local $x; no strict; [ keys %{$$x{a}} ] [return] ok 801 - our $x; local $x; no strict; [ keys %{$$x{a}} ] [variable] ok 802 - my %x; [ keys %{$x{a}} ] [exception] ok 803 - my %x; [ keys %{$x{a}} ] [return] ok 804 - my %x; [ keys %{$x{a}} ] [variable] ok 805 - our %x; local %x; use strict; [ keys %{$x{a}} ] [exception] ok 806 - our %x; local %x; use strict; [ keys %{$x{a}} ] [return] ok 807 - our %x; local %x; use strict; [ keys %{$x{a}} ] [variable] ok 808 - our %x; local %x; no strict; [ keys %{$x{a}} ] [exception] ok 809 - our %x; local %x; no strict; [ keys %{$x{a}} ] [return] ok 810 - our %x; local %x; no strict; [ keys %{$x{a}} ] [variable] ok 811 - my $x; [ keys %{$x->{a}} ] <+fetch> [exception] ok 812 - my $x; [ keys %{$x->{a}} ] <+fetch> [return] ok 813 - my $x; [ keys %{$x->{a}} ] <+fetch> [variable] ok 814 - our $x; local $x; use strict; [ keys %{$x->{a}} ] <+fetch> [exception] ok 815 - our $x; local $x; use strict; [ keys %{$x->{a}} ] <+fetch> [return] ok 816 - our $x; local $x; use strict; [ keys %{$x->{a}} ] <+fetch> [variable] ok 817 - our $x; local $x; no strict; [ keys %{$x->{a}} ] <+fetch> [exception] ok 818 - our $x; local $x; no strict; [ keys %{$x->{a}} ] <+fetch> [return] ok 819 - our $x; local $x; no strict; [ keys %{$x->{a}} ] <+fetch> [variable] ok 820 - my $x; [ keys %{$$x{a}} ] <+fetch> [exception] ok 821 - my $x; [ keys %{$$x{a}} ] <+fetch> [return] ok 822 - my $x; [ keys %{$$x{a}} ] <+fetch> [variable] ok 823 - our $x; local $x; use strict; [ keys %{$$x{a}} ] <+fetch> [exception] ok 824 - our $x; local $x; use strict; [ keys %{$$x{a}} ] <+fetch> [return] ok 825 - our $x; local $x; use strict; [ keys %{$$x{a}} ] <+fetch> [variable] ok 826 - our $x; local $x; no strict; [ keys %{$$x{a}} ] <+fetch> [exception] ok 827 - our $x; local $x; no strict; [ keys %{$$x{a}} ] <+fetch> [return] ok 828 - our $x; local $x; no strict; [ keys %{$$x{a}} ] <+fetch> [variable] ok 829 - my %x; [ keys %{$x{a}} ] <+fetch> [exception] ok 830 - my %x; [ keys %{$x{a}} ] <+fetch> [return] ok 831 - my %x; [ keys %{$x{a}} ] <+fetch> [variable] ok 832 - our %x; local %x; use strict; [ keys %{$x{a}} ] <+fetch> [exception] ok 833 - our %x; local %x; use strict; [ keys %{$x{a}} ] <+fetch> [return] ok 834 - our %x; local %x; use strict; [ keys %{$x{a}} ] <+fetch> [variable] ok 835 - our %x; local %x; no strict; [ keys %{$x{a}} ] <+fetch> [exception] ok 836 - our %x; local %x; no strict; [ keys %{$x{a}} ] <+fetch> [return] ok 837 - our %x; local %x; no strict; [ keys %{$x{a}} ] <+fetch> [variable] ok 838 - my $x; [ keys %{$x->{a}} ] <+exists +delete +store> [exception] ok 839 - my $x; [ keys %{$x->{a}} ] <+exists +delete +store> [return] ok 840 - my $x; [ keys %{$x->{a}} ] <+exists +delete +store> [variable] ok 841 - our $x; local $x; use strict; [ keys %{$x->{a}} ] <+exists +delete +store> [exception] ok 842 - our $x; local $x; use strict; [ keys %{$x->{a}} ] <+exists +delete +store> [return] ok 843 - our $x; local $x; use strict; [ keys %{$x->{a}} ] <+exists +delete +store> [variable] ok 844 - our $x; local $x; no strict; [ keys %{$x->{a}} ] <+exists +delete +store> [exception] ok 845 - our $x; local $x; no strict; [ keys %{$x->{a}} ] <+exists +delete +store> [return] ok 846 - our $x; local $x; no strict; [ keys %{$x->{a}} ] <+exists +delete +store> [variable] ok 847 - my $x; [ keys %{$$x{a}} ] <+exists +delete +store> [exception] ok 848 - my $x; [ keys %{$$x{a}} ] <+exists +delete +store> [return] ok 849 - my $x; [ keys %{$$x{a}} ] <+exists +delete +store> [variable] ok 850 - our $x; local $x; use strict; [ keys %{$$x{a}} ] <+exists +delete +store> [exception] ok 851 - our $x; local $x; use strict; [ keys %{$$x{a}} ] <+exists +delete +store> [return] ok 852 - our $x; local $x; use strict; [ keys %{$$x{a}} ] <+exists +delete +store> [variable] ok 853 - our $x; local $x; no strict; [ keys %{$$x{a}} ] <+exists +delete +store> [exception] ok 854 - our $x; local $x; no strict; [ keys %{$$x{a}} ] <+exists +delete +store> [return] ok 855 - our $x; local $x; no strict; [ keys %{$$x{a}} ] <+exists +delete +store> [variable] ok 856 - my %x; [ keys %{$x{a}} ] <+exists +delete +store> [exception] ok 857 - my %x; [ keys %{$x{a}} ] <+exists +delete +store> [return] ok 858 - my %x; [ keys %{$x{a}} ] <+exists +delete +store> [variable] ok 859 - our %x; local %x; use strict; [ keys %{$x{a}} ] <+exists +delete +store> [exception] ok 860 - our %x; local %x; use strict; [ keys %{$x{a}} ] <+exists +delete +store> [return] ok 861 - our %x; local %x; use strict; [ keys %{$x{a}} ] <+exists +delete +store> [variable] ok 862 - our %x; local %x; no strict; [ keys %{$x{a}} ] <+exists +delete +store> [exception] ok 863 - our %x; local %x; no strict; [ keys %{$x{a}} ] <+exists +delete +store> [return] ok 864 - our %x; local %x; no strict; [ keys %{$x{a}} ] <+exists +delete +store> [variable] ok 865 - my $x; values %$x [exception] ok 866 - my $x; values %$x [return] ok 867 - my $x; values %$x [variable] ok 868 - our $x; local $x; use strict; values %$x [exception] ok 869 - our $x; local $x; use strict; values %$x [return] ok 870 - our $x; local $x; use strict; values %$x [variable] ok 871 - our $x; local $x; no strict; values %$x [exception] ok 872 - our $x; local $x; no strict; values %$x [return] ok 873 - our $x; local $x; no strict; values %$x [variable] ok 874 - my $x; values %$x [exception] ok 875 - my $x; values %$x [return] ok 876 - my $x; values %$x [variable] ok 877 - our $x; local $x; use strict; values %$x [exception] ok 878 - our $x; local $x; use strict; values %$x [return] ok 879 - our $x; local $x; use strict; values %$x [variable] ok 880 - our $x; local $x; no strict; values %$x [exception] ok 881 - our $x; local $x; no strict; values %$x [return] ok 882 - our $x; local $x; no strict; values %$x [variable] ok 883 - my %x; values %x [exception] ok 884 - my %x; values %x [return] ok 885 - my %x; values %x [variable] ok 886 - our %x; local %x; use strict; values %x [exception] ok 887 - our %x; local %x; use strict; values %x [return] ok 888 - our %x; local %x; use strict; values %x [variable] ok 889 - our %x; local %x; no strict; values %x [exception] ok 890 - our %x; local %x; no strict; values %x [return] ok 891 - our %x; local %x; no strict; values %x [variable] ok 892 - my $x; values %$x [exception] ok 893 - my $x; values %$x [return] ok 894 - my $x; values %$x [variable] ok 895 - our $x; local $x; use strict; values %$x [exception] ok 896 - our $x; local $x; use strict; values %$x [return] ok 897 - our $x; local $x; use strict; values %$x [variable] ok 898 - our $x; local $x; no strict; values %$x [exception] ok 899 - our $x; local $x; no strict; values %$x [return] ok 900 - our $x; local $x; no strict; values %$x [variable] ok 901 - my $x; values %$x [exception] ok 902 - my $x; values %$x [return] ok 903 - my $x; values %$x [variable] ok 904 - our $x; local $x; use strict; values %$x [exception] ok 905 - our $x; local $x; use strict; values %$x [return] ok 906 - our $x; local $x; use strict; values %$x [variable] ok 907 - our $x; local $x; no strict; values %$x [exception] ok 908 - our $x; local $x; no strict; values %$x [return] ok 909 - our $x; local $x; no strict; values %$x [variable] ok 910 - my %x; values %x [exception] ok 911 - my %x; values %x [return] ok 912 - my %x; values %x [variable] ok 913 - our %x; local %x; use strict; values %x [exception] ok 914 - our %x; local %x; use strict; values %x [return] ok 915 - our %x; local %x; use strict; values %x [variable] ok 916 - our %x; local %x; no strict; values %x [exception] ok 917 - our %x; local %x; no strict; values %x [return] ok 918 - our %x; local %x; no strict; values %x [variable] ok 919 - my $x; values %$x <+fetch> [exception] ok 920 - my $x; values %$x <+fetch> [return] ok 921 - my $x; values %$x <+fetch> [variable] ok 922 - our $x; local $x; use strict; values %$x <+fetch> [exception] ok 923 - our $x; local $x; use strict; values %$x <+fetch> [return] ok 924 - our $x; local $x; use strict; values %$x <+fetch> [variable] ok 925 - our $x; local $x; no strict; values %$x <+fetch> [exception] ok 926 - our $x; local $x; no strict; values %$x <+fetch> [return] ok 927 - our $x; local $x; no strict; values %$x <+fetch> [variable] ok 928 - my $x; values %$x <+fetch> [exception] ok 929 - my $x; values %$x <+fetch> [return] ok 930 - my $x; values %$x <+fetch> [variable] ok 931 - our $x; local $x; use strict; values %$x <+fetch> [exception] ok 932 - our $x; local $x; use strict; values %$x <+fetch> [return] ok 933 - our $x; local $x; use strict; values %$x <+fetch> [variable] ok 934 - our $x; local $x; no strict; values %$x <+fetch> [exception] ok 935 - our $x; local $x; no strict; values %$x <+fetch> [return] ok 936 - our $x; local $x; no strict; values %$x <+fetch> [variable] ok 937 - my %x; values %x <+fetch> [exception] ok 938 - my %x; values %x <+fetch> [return] ok 939 - my %x; values %x <+fetch> [variable] ok 940 - our %x; local %x; use strict; values %x <+fetch> [exception] ok 941 - our %x; local %x; use strict; values %x <+fetch> [return] ok 942 - our %x; local %x; use strict; values %x <+fetch> [variable] ok 943 - our %x; local %x; no strict; values %x <+fetch> [exception] ok 944 - our %x; local %x; no strict; values %x <+fetch> [return] ok 945 - our %x; local %x; no strict; values %x <+fetch> [variable] ok 946 - my $x; values %$x <+exists> [exception] ok 947 - my $x; values %$x <+exists> [return] ok 948 - my $x; values %$x <+exists> [variable] ok 949 - our $x; local $x; use strict; values %$x <+exists> [exception] ok 950 - our $x; local $x; use strict; values %$x <+exists> [return] ok 951 - our $x; local $x; use strict; values %$x <+exists> [variable] ok 952 - our $x; local $x; no strict; values %$x <+exists> [exception] ok 953 - our $x; local $x; no strict; values %$x <+exists> [return] ok 954 - our $x; local $x; no strict; values %$x <+exists> [variable] ok 955 - my $x; values %$x <+exists> [exception] ok 956 - my $x; values %$x <+exists> [return] ok 957 - my $x; values %$x <+exists> [variable] ok 958 - our $x; local $x; use strict; values %$x <+exists> [exception] ok 959 - our $x; local $x; use strict; values %$x <+exists> [return] ok 960 - our $x; local $x; use strict; values %$x <+exists> [variable] ok 961 - our $x; local $x; no strict; values %$x <+exists> [exception] ok 962 - our $x; local $x; no strict; values %$x <+exists> [return] ok 963 - our $x; local $x; no strict; values %$x <+exists> [variable] ok 964 - my %x; values %x <+exists> [exception] ok 965 - my %x; values %x <+exists> [return] ok 966 - my %x; values %x <+exists> [variable] ok 967 - our %x; local %x; use strict; values %x <+exists> [exception] ok 968 - our %x; local %x; use strict; values %x <+exists> [return] ok 969 - our %x; local %x; use strict; values %x <+exists> [variable] ok 970 - our %x; local %x; no strict; values %x <+exists> [exception] ok 971 - our %x; local %x; no strict; values %x <+exists> [return] ok 972 - our %x; local %x; no strict; values %x <+exists> [variable] ok 973 - my $x; values %$x <+delete> [exception] ok 974 - my $x; values %$x <+delete> [return] ok 975 - my $x; values %$x <+delete> [variable] ok 976 - our $x; local $x; use strict; values %$x <+delete> [exception] ok 977 - our $x; local $x; use strict; values %$x <+delete> [return] ok 978 - our $x; local $x; use strict; values %$x <+delete> [variable] ok 979 - our $x; local $x; no strict; values %$x <+delete> [exception] ok 980 - our $x; local $x; no strict; values %$x <+delete> [return] ok 981 - our $x; local $x; no strict; values %$x <+delete> [variable] ok 982 - my $x; values %$x <+delete> [exception] ok 983 - my $x; values %$x <+delete> [return] ok 984 - my $x; values %$x <+delete> [variable] ok 985 - our $x; local $x; use strict; values %$x <+delete> [exception] ok 986 - our $x; local $x; use strict; values %$x <+delete> [return] ok 987 - our $x; local $x; use strict; values %$x <+delete> [variable] ok 988 - our $x; local $x; no strict; values %$x <+delete> [exception] ok 989 - our $x; local $x; no strict; values %$x <+delete> [return] ok 990 - our $x; local $x; no strict; values %$x <+delete> [variable] ok 991 - my %x; values %x <+delete> [exception] ok 992 - my %x; values %x <+delete> [return] ok 993 - my %x; values %x <+delete> [variable] ok 994 - our %x; local %x; use strict; values %x <+delete> [exception] ok 995 - our %x; local %x; use strict; values %x <+delete> [return] ok 996 - our %x; local %x; use strict; values %x <+delete> [variable] ok 997 - our %x; local %x; no strict; values %x <+delete> [exception] ok 998 - our %x; local %x; no strict; values %x <+delete> [return] ok 999 - our %x; local %x; no strict; values %x <+delete> [variable] ok 1000 - my $x; values %$x <+store> [exception] ok 1001 - my $x; values %$x <+store> [return] ok 1002 - my $x; values %$x <+store> [variable] ok 1003 - our $x; local $x; use strict; values %$x <+store> [exception] ok 1004 - our $x; local $x; use strict; values %$x <+store> [return] ok 1005 - our $x; local $x; use strict; values %$x <+store> [variable] ok 1006 - our $x; local $x; no strict; values %$x <+store> [exception] ok 1007 - our $x; local $x; no strict; values %$x <+store> [return] ok 1008 - our $x; local $x; no strict; values %$x <+store> [variable] ok 1009 - my $x; values %$x <+store> [exception] ok 1010 - my $x; values %$x <+store> [return] ok 1011 - my $x; values %$x <+store> [variable] ok 1012 - our $x; local $x; use strict; values %$x <+store> [exception] ok 1013 - our $x; local $x; use strict; values %$x <+store> [return] ok 1014 - our $x; local $x; use strict; values %$x <+store> [variable] ok 1015 - our $x; local $x; no strict; values %$x <+store> [exception] ok 1016 - our $x; local $x; no strict; values %$x <+store> [return] ok 1017 - our $x; local $x; no strict; values %$x <+store> [variable] ok 1018 - my %x; values %x <+store> [exception] ok 1019 - my %x; values %x <+store> [return] ok 1020 - my %x; values %x <+store> [variable] ok 1021 - our %x; local %x; use strict; values %x <+store> [exception] ok 1022 - our %x; local %x; use strict; values %x <+store> [return] ok 1023 - our %x; local %x; use strict; values %x <+store> [variable] ok 1024 - our %x; local %x; no strict; values %x <+store> [exception] ok 1025 - our %x; local %x; no strict; values %x <+store> [return] ok 1026 - our %x; local %x; no strict; values %x <+store> [variable] ok 1027 - my $x; values %$x <+strict +fetch> [exception] ok 1028 - my $x; values %$x <+strict +fetch> [return] ok 1029 - my $x; values %$x <+strict +fetch> [variable] ok 1030 - our $x; local $x; use strict; values %$x <+strict +fetch> [exception] ok 1031 - our $x; local $x; use strict; values %$x <+strict +fetch> [return] ok 1032 - our $x; local $x; use strict; values %$x <+strict +fetch> [variable] ok 1033 - our $x; local $x; no strict; values %$x <+strict +fetch> [exception] ok 1034 - our $x; local $x; no strict; values %$x <+strict +fetch> [return] ok 1035 - our $x; local $x; no strict; values %$x <+strict +fetch> [variable] ok 1036 - my $x; values %$x <+strict +fetch> [exception] ok 1037 - my $x; values %$x <+strict +fetch> [return] ok 1038 - my $x; values %$x <+strict +fetch> [variable] ok 1039 - our $x; local $x; use strict; values %$x <+strict +fetch> [exception] ok 1040 - our $x; local $x; use strict; values %$x <+strict +fetch> [return] ok 1041 - our $x; local $x; use strict; values %$x <+strict +fetch> [variable] ok 1042 - our $x; local $x; no strict; values %$x <+strict +fetch> [exception] ok 1043 - our $x; local $x; no strict; values %$x <+strict +fetch> [return] ok 1044 - our $x; local $x; no strict; values %$x <+strict +fetch> [variable] ok 1045 - my %x; 1 <+strict +fetch> [exception] ok 1046 - my %x; 1 <+strict +fetch> [return] ok 1047 - my %x; 1 <+strict +fetch> [variable] ok 1048 - our %x; local %x; use strict; 1 <+strict +fetch> [exception] ok 1049 - our %x; local %x; use strict; 1 <+strict +fetch> [return] ok 1050 - our %x; local %x; use strict; 1 <+strict +fetch> [variable] ok 1051 - our %x; local %x; no strict; 1 <+strict +fetch> [exception] ok 1052 - our %x; local %x; no strict; 1 <+strict +fetch> [return] ok 1053 - our %x; local %x; no strict; 1 <+strict +fetch> [variable] ok 1054 - my $x; values %$x <+strict +exists> [exception] ok 1055 - my $x; values %$x <+strict +exists> [return] ok 1056 - my $x; values %$x <+strict +exists> [variable] ok 1057 - our $x; local $x; use strict; values %$x <+strict +exists> [exception] ok 1058 - our $x; local $x; use strict; values %$x <+strict +exists> [return] ok 1059 - our $x; local $x; use strict; values %$x <+strict +exists> [variable] ok 1060 - our $x; local $x; no strict; values %$x <+strict +exists> [exception] ok 1061 - our $x; local $x; no strict; values %$x <+strict +exists> [return] ok 1062 - our $x; local $x; no strict; values %$x <+strict +exists> [variable] ok 1063 - my $x; values %$x <+strict +exists> [exception] ok 1064 - my $x; values %$x <+strict +exists> [return] ok 1065 - my $x; values %$x <+strict +exists> [variable] ok 1066 - our $x; local $x; use strict; values %$x <+strict +exists> [exception] ok 1067 - our $x; local $x; use strict; values %$x <+strict +exists> [return] ok 1068 - our $x; local $x; use strict; values %$x <+strict +exists> [variable] ok 1069 - our $x; local $x; no strict; values %$x <+strict +exists> [exception] ok 1070 - our $x; local $x; no strict; values %$x <+strict +exists> [return] ok 1071 - our $x; local $x; no strict; values %$x <+strict +exists> [variable] ok 1072 - my %x; values %x <+strict +exists> [exception] ok 1073 - my %x; values %x <+strict +exists> [return] ok 1074 - my %x; values %x <+strict +exists> [variable] ok 1075 - our %x; local %x; use strict; values %x <+strict +exists> [exception] ok 1076 - our %x; local %x; use strict; values %x <+strict +exists> [return] ok 1077 - our %x; local %x; use strict; values %x <+strict +exists> [variable] ok 1078 - our %x; local %x; no strict; values %x <+strict +exists> [exception] ok 1079 - our %x; local %x; no strict; values %x <+strict +exists> [return] ok 1080 - our %x; local %x; no strict; values %x <+strict +exists> [variable] ok 1081 - my $x; values %$x <+strict +delete> [exception] ok 1082 - my $x; values %$x <+strict +delete> [return] ok 1083 - my $x; values %$x <+strict +delete> [variable] ok 1084 - our $x; local $x; use strict; values %$x <+strict +delete> [exception] ok 1085 - our $x; local $x; use strict; values %$x <+strict +delete> [return] ok 1086 - our $x; local $x; use strict; values %$x <+strict +delete> [variable] ok 1087 - our $x; local $x; no strict; values %$x <+strict +delete> [exception] ok 1088 - our $x; local $x; no strict; values %$x <+strict +delete> [return] ok 1089 - our $x; local $x; no strict; values %$x <+strict +delete> [variable] ok 1090 - my $x; values %$x <+strict +delete> [exception] ok 1091 - my $x; values %$x <+strict +delete> [return] ok 1092 - my $x; values %$x <+strict +delete> [variable] ok 1093 - our $x; local $x; use strict; values %$x <+strict +delete> [exception] ok 1094 - our $x; local $x; use strict; values %$x <+strict +delete> [return] ok 1095 - our $x; local $x; use strict; values %$x <+strict +delete> [variable] ok 1096 - our $x; local $x; no strict; values %$x <+strict +delete> [exception] ok 1097 - our $x; local $x; no strict; values %$x <+strict +delete> [return] ok 1098 - our $x; local $x; no strict; values %$x <+strict +delete> [variable] ok 1099 - my %x; values %x <+strict +delete> [exception] ok 1100 - my %x; values %x <+strict +delete> [return] ok 1101 - my %x; values %x <+strict +delete> [variable] ok 1102 - our %x; local %x; use strict; values %x <+strict +delete> [exception] ok 1103 - our %x; local %x; use strict; values %x <+strict +delete> [return] ok 1104 - our %x; local %x; use strict; values %x <+strict +delete> [variable] ok 1105 - our %x; local %x; no strict; values %x <+strict +delete> [exception] ok 1106 - our %x; local %x; no strict; values %x <+strict +delete> [return] ok 1107 - our %x; local %x; no strict; values %x <+strict +delete> [variable] ok 1108 - my $x; values %$x <+strict +store> [exception] ok 1109 - my $x; values %$x <+strict +store> [return] ok 1110 - my $x; values %$x <+strict +store> [variable] ok 1111 - our $x; local $x; use strict; values %$x <+strict +store> [exception] ok 1112 - our $x; local $x; use strict; values %$x <+strict +store> [return] ok 1113 - our $x; local $x; use strict; values %$x <+strict +store> [variable] ok 1114 - our $x; local $x; no strict; values %$x <+strict +store> [exception] ok 1115 - our $x; local $x; no strict; values %$x <+strict +store> [return] ok 1116 - our $x; local $x; no strict; values %$x <+strict +store> [variable] ok 1117 - my $x; values %$x <+strict +store> [exception] ok 1118 - my $x; values %$x <+strict +store> [return] ok 1119 - my $x; values %$x <+strict +store> [variable] ok 1120 - our $x; local $x; use strict; values %$x <+strict +store> [exception] ok 1121 - our $x; local $x; use strict; values %$x <+strict +store> [return] ok 1122 - our $x; local $x; use strict; values %$x <+strict +store> [variable] ok 1123 - our $x; local $x; no strict; values %$x <+strict +store> [exception] ok 1124 - our $x; local $x; no strict; values %$x <+strict +store> [return] ok 1125 - our $x; local $x; no strict; values %$x <+strict +store> [variable] ok 1126 - my %x; values %x <+strict +store> [exception] ok 1127 - my %x; values %x <+strict +store> [return] ok 1128 - my %x; values %x <+strict +store> [variable] ok 1129 - our %x; local %x; use strict; values %x <+strict +store> [exception] ok 1130 - our %x; local %x; use strict; values %x <+strict +store> [return] ok 1131 - our %x; local %x; use strict; values %x <+strict +store> [variable] ok 1132 - our %x; local %x; no strict; values %x <+strict +store> [exception] ok 1133 - our %x; local %x; no strict; values %x <+strict +store> [return] ok 1134 - our %x; local %x; no strict; values %x <+strict +store> [variable] ok 1135 - my $x; [ values %$x ] [exception] ok 1136 - my $x; [ values %$x ] [return] ok 1137 - my $x; [ values %$x ] [variable] ok 1138 - our $x; local $x; use strict; [ values %$x ] [exception] ok 1139 - our $x; local $x; use strict; [ values %$x ] [return] ok 1140 - our $x; local $x; use strict; [ values %$x ] [variable] ok 1141 - our $x; local $x; no strict; [ values %$x ] [exception] ok 1142 - our $x; local $x; no strict; [ values %$x ] [return] ok 1143 - our $x; local $x; no strict; [ values %$x ] [variable] ok 1144 - my $x; [ values %$x ] [exception] ok 1145 - my $x; [ values %$x ] [return] ok 1146 - my $x; [ values %$x ] [variable] ok 1147 - our $x; local $x; use strict; [ values %$x ] [exception] ok 1148 - our $x; local $x; use strict; [ values %$x ] [return] ok 1149 - our $x; local $x; use strict; [ values %$x ] [variable] ok 1150 - our $x; local $x; no strict; [ values %$x ] [exception] ok 1151 - our $x; local $x; no strict; [ values %$x ] [return] ok 1152 - our $x; local $x; no strict; [ values %$x ] [variable] ok 1153 - my %x; [ values %x ] [exception] ok 1154 - my %x; [ values %x ] [return] ok 1155 - my %x; [ values %x ] [variable] ok 1156 - our %x; local %x; use strict; [ values %x ] [exception] ok 1157 - our %x; local %x; use strict; [ values %x ] [return] ok 1158 - our %x; local %x; use strict; [ values %x ] [variable] ok 1159 - our %x; local %x; no strict; [ values %x ] [exception] ok 1160 - our %x; local %x; no strict; [ values %x ] [return] ok 1161 - our %x; local %x; no strict; [ values %x ] [variable] ok 1162 - my $x; [ values %$x ] [exception] ok 1163 - my $x; [ values %$x ] [return] ok 1164 - my $x; [ values %$x ] [variable] ok 1165 - our $x; local $x; use strict; [ values %$x ] [exception] ok 1166 - our $x; local $x; use strict; [ values %$x ] [return] ok 1167 - our $x; local $x; use strict; [ values %$x ] [variable] ok 1168 - our $x; local $x; no strict; [ values %$x ] [exception] ok 1169 - our $x; local $x; no strict; [ values %$x ] [return] ok 1170 - our $x; local $x; no strict; [ values %$x ] [variable] ok 1171 - my $x; [ values %$x ] [exception] ok 1172 - my $x; [ values %$x ] [return] ok 1173 - my $x; [ values %$x ] [variable] ok 1174 - our $x; local $x; use strict; [ values %$x ] [exception] ok 1175 - our $x; local $x; use strict; [ values %$x ] [return] ok 1176 - our $x; local $x; use strict; [ values %$x ] [variable] ok 1177 - our $x; local $x; no strict; [ values %$x ] [exception] ok 1178 - our $x; local $x; no strict; [ values %$x ] [return] ok 1179 - our $x; local $x; no strict; [ values %$x ] [variable] ok 1180 - my %x; [ values %x ] [exception] ok 1181 - my %x; [ values %x ] [return] ok 1182 - my %x; [ values %x ] [variable] ok 1183 - our %x; local %x; use strict; [ values %x ] [exception] ok 1184 - our %x; local %x; use strict; [ values %x ] [return] ok 1185 - our %x; local %x; use strict; [ values %x ] [variable] ok 1186 - our %x; local %x; no strict; [ values %x ] [exception] ok 1187 - our %x; local %x; no strict; [ values %x ] [return] ok 1188 - our %x; local %x; no strict; [ values %x ] [variable] ok 1189 - my $x; [ values %$x ] <+fetch> [exception] ok 1190 - my $x; [ values %$x ] <+fetch> [return] ok 1191 - my $x; [ values %$x ] <+fetch> [variable] ok 1192 - our $x; local $x; use strict; [ values %$x ] <+fetch> [exception] ok 1193 - our $x; local $x; use strict; [ values %$x ] <+fetch> [return] ok 1194 - our $x; local $x; use strict; [ values %$x ] <+fetch> [variable] ok 1195 - our $x; local $x; no strict; [ values %$x ] <+fetch> [exception] ok 1196 - our $x; local $x; no strict; [ values %$x ] <+fetch> [return] ok 1197 - our $x; local $x; no strict; [ values %$x ] <+fetch> [variable] ok 1198 - my $x; [ values %$x ] <+fetch> [exception] ok 1199 - my $x; [ values %$x ] <+fetch> [return] ok 1200 - my $x; [ values %$x ] <+fetch> [variable] ok 1201 - our $x; local $x; use strict; [ values %$x ] <+fetch> [exception] ok 1202 - our $x; local $x; use strict; [ values %$x ] <+fetch> [return] ok 1203 - our $x; local $x; use strict; [ values %$x ] <+fetch> [variable] ok 1204 - our $x; local $x; no strict; [ values %$x ] <+fetch> [exception] ok 1205 - our $x; local $x; no strict; [ values %$x ] <+fetch> [return] ok 1206 - our $x; local $x; no strict; [ values %$x ] <+fetch> [variable] ok 1207 - my %x; [ values %x ] <+fetch> [exception] ok 1208 - my %x; [ values %x ] <+fetch> [return] ok 1209 - my %x; [ values %x ] <+fetch> [variable] ok 1210 - our %x; local %x; use strict; [ values %x ] <+fetch> [exception] ok 1211 - our %x; local %x; use strict; [ values %x ] <+fetch> [return] ok 1212 - our %x; local %x; use strict; [ values %x ] <+fetch> [variable] ok 1213 - our %x; local %x; no strict; [ values %x ] <+fetch> [exception] ok 1214 - our %x; local %x; no strict; [ values %x ] <+fetch> [return] ok 1215 - our %x; local %x; no strict; [ values %x ] <+fetch> [variable] ok 1216 - my $x; [ values %$x ] <+exists +delete +store> [exception] ok 1217 - my $x; [ values %$x ] <+exists +delete +store> [return] ok 1218 - my $x; [ values %$x ] <+exists +delete +store> [variable] ok 1219 - our $x; local $x; use strict; [ values %$x ] <+exists +delete +store> [exception] ok 1220 - our $x; local $x; use strict; [ values %$x ] <+exists +delete +store> [return] ok 1221 - our $x; local $x; use strict; [ values %$x ] <+exists +delete +store> [variable] ok 1222 - our $x; local $x; no strict; [ values %$x ] <+exists +delete +store> [exception] ok 1223 - our $x; local $x; no strict; [ values %$x ] <+exists +delete +store> [return] ok 1224 - our $x; local $x; no strict; [ values %$x ] <+exists +delete +store> [variable] ok 1225 - my $x; [ values %$x ] <+exists +delete +store> [exception] ok 1226 - my $x; [ values %$x ] <+exists +delete +store> [return] ok 1227 - my $x; [ values %$x ] <+exists +delete +store> [variable] ok 1228 - our $x; local $x; use strict; [ values %$x ] <+exists +delete +store> [exception] ok 1229 - our $x; local $x; use strict; [ values %$x ] <+exists +delete +store> [return] ok 1230 - our $x; local $x; use strict; [ values %$x ] <+exists +delete +store> [variable] ok 1231 - our $x; local $x; no strict; [ values %$x ] <+exists +delete +store> [exception] ok 1232 - our $x; local $x; no strict; [ values %$x ] <+exists +delete +store> [return] ok 1233 - our $x; local $x; no strict; [ values %$x ] <+exists +delete +store> [variable] ok 1234 - my %x; [ values %x ] <+exists +delete +store> [exception] ok 1235 - my %x; [ values %x ] <+exists +delete +store> [return] ok 1236 - my %x; [ values %x ] <+exists +delete +store> [variable] ok 1237 - our %x; local %x; use strict; [ values %x ] <+exists +delete +store> [exception] ok 1238 - our %x; local %x; use strict; [ values %x ] <+exists +delete +store> [return] ok 1239 - our %x; local %x; use strict; [ values %x ] <+exists +delete +store> [variable] ok 1240 - our %x; local %x; no strict; [ values %x ] <+exists +delete +store> [exception] ok 1241 - our %x; local %x; no strict; [ values %x ] <+exists +delete +store> [return] ok 1242 - our %x; local %x; no strict; [ values %x ] <+exists +delete +store> [variable] ok 1243 - my $x; $x->{a} = 1; [ values %$x ] [exception] ok 1244 - my $x; $x->{a} = 1; [ values %$x ] [return] ok 1245 - my $x; $x->{a} = 1; [ values %$x ] [variable] ok 1246 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [exception] ok 1247 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [return] ok 1248 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [variable] ok 1249 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [exception] ok 1250 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [return] ok 1251 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [variable] ok 1252 - my $x; $x->{a} = 1; [ values %$x ] [exception] ok 1253 - my $x; $x->{a} = 1; [ values %$x ] [return] ok 1254 - my $x; $x->{a} = 1; [ values %$x ] [variable] ok 1255 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [exception] ok 1256 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [return] ok 1257 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [variable] ok 1258 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [exception] ok 1259 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [return] ok 1260 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [variable] ok 1261 - my %x; $x{a} = 1; [ values %x ] [exception] ok 1262 - my %x; $x{a} = 1; [ values %x ] [return] ok 1263 - my %x; $x{a} = 1; [ values %x ] [variable] ok 1264 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] [exception] ok 1265 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] [return] ok 1266 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] [variable] ok 1267 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] [exception] ok 1268 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] [return] ok 1269 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] [variable] ok 1270 - my $x; $x->{a} = 1; [ values %$x ] [exception] ok 1271 - my $x; $x->{a} = 1; [ values %$x ] [return] ok 1272 - my $x; $x->{a} = 1; [ values %$x ] [variable] ok 1273 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [exception] ok 1274 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [return] ok 1275 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [variable] ok 1276 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [exception] ok 1277 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [return] ok 1278 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [variable] ok 1279 - my $x; $x->{a} = 1; [ values %$x ] [exception] ok 1280 - my $x; $x->{a} = 1; [ values %$x ] [return] ok 1281 - my $x; $x->{a} = 1; [ values %$x ] [variable] ok 1282 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [exception] ok 1283 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [return] ok 1284 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [variable] ok 1285 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [exception] ok 1286 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [return] ok 1287 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [variable] ok 1288 - my %x; $x{a} = 1; [ values %x ] [exception] ok 1289 - my %x; $x{a} = 1; [ values %x ] [return] ok 1290 - my %x; $x{a} = 1; [ values %x ] [variable] ok 1291 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] [exception] ok 1292 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] [return] ok 1293 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] [variable] ok 1294 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] [exception] ok 1295 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] [return] ok 1296 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] [variable] ok 1297 - my $x; $x->{a} = 1; [ values %$x ] <+fetch> [exception] ok 1298 - my $x; $x->{a} = 1; [ values %$x ] <+fetch> [return] ok 1299 - my $x; $x->{a} = 1; [ values %$x ] <+fetch> [variable] ok 1300 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+fetch> [exception] ok 1301 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+fetch> [return] ok 1302 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+fetch> [variable] ok 1303 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+fetch> [exception] ok 1304 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+fetch> [return] ok 1305 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+fetch> [variable] ok 1306 - my $x; $x->{a} = 1; [ values %$x ] <+fetch> [exception] ok 1307 - my $x; $x->{a} = 1; [ values %$x ] <+fetch> [return] ok 1308 - my $x; $x->{a} = 1; [ values %$x ] <+fetch> [variable] ok 1309 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+fetch> [exception] ok 1310 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+fetch> [return] ok 1311 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+fetch> [variable] ok 1312 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+fetch> [exception] ok 1313 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+fetch> [return] ok 1314 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+fetch> [variable] ok 1315 - my %x; $x{a} = 1; [ values %x ] <+fetch> [exception] ok 1316 - my %x; $x{a} = 1; [ values %x ] <+fetch> [return] ok 1317 - my %x; $x{a} = 1; [ values %x ] <+fetch> [variable] ok 1318 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] <+fetch> [exception] ok 1319 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] <+fetch> [return] ok 1320 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] <+fetch> [variable] ok 1321 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] <+fetch> [exception] ok 1322 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] <+fetch> [return] ok 1323 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] <+fetch> [variable] ok 1324 - my $x; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [exception] ok 1325 - my $x; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [return] ok 1326 - my $x; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [variable] ok 1327 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [exception] ok 1328 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [return] ok 1329 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [variable] ok 1330 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [exception] ok 1331 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [return] ok 1332 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [variable] ok 1333 - my $x; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [exception] ok 1334 - my $x; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [return] ok 1335 - my $x; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [variable] ok 1336 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [exception] ok 1337 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [return] ok 1338 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [variable] ok 1339 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [exception] ok 1340 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [return] ok 1341 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [variable] ok 1342 - my %x; $x{a} = 1; [ values %x ] <+exists +delete +store> [exception] ok 1343 - my %x; $x{a} = 1; [ values %x ] <+exists +delete +store> [return] ok 1344 - my %x; $x{a} = 1; [ values %x ] <+exists +delete +store> [variable] ok 1345 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] <+exists +delete +store> [exception] ok 1346 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] <+exists +delete +store> [return] ok 1347 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] <+exists +delete +store> [variable] ok 1348 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] <+exists +delete +store> [exception] ok 1349 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] <+exists +delete +store> [return] ok 1350 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] <+exists +delete +store> [variable] ok 1351 - my $x; values %{$x->{a}} [exception] ok 1352 - my $x; values %{$x->{a}} [return] ok 1353 - my $x; values %{$x->{a}} [variable] ok 1354 - our $x; local $x; use strict; values %{$x->{a}} [exception] ok 1355 - our $x; local $x; use strict; values %{$x->{a}} [return] ok 1356 - our $x; local $x; use strict; values %{$x->{a}} [variable] ok 1357 - our $x; local $x; no strict; values %{$x->{a}} [exception] ok 1358 - our $x; local $x; no strict; values %{$x->{a}} [return] ok 1359 - our $x; local $x; no strict; values %{$x->{a}} [variable] ok 1360 - my $x; values %{$$x{a}} [exception] ok 1361 - my $x; values %{$$x{a}} [return] ok 1362 - my $x; values %{$$x{a}} [variable] ok 1363 - our $x; local $x; use strict; values %{$$x{a}} [exception] ok 1364 - our $x; local $x; use strict; values %{$$x{a}} [return] ok 1365 - our $x; local $x; use strict; values %{$$x{a}} [variable] ok 1366 - our $x; local $x; no strict; values %{$$x{a}} [exception] ok 1367 - our $x; local $x; no strict; values %{$$x{a}} [return] ok 1368 - our $x; local $x; no strict; values %{$$x{a}} [variable] ok 1369 - my %x; values %{$x{a}} [exception] ok 1370 - my %x; values %{$x{a}} [return] ok 1371 - my %x; values %{$x{a}} [variable] ok 1372 - our %x; local %x; use strict; values %{$x{a}} [exception] ok 1373 - our %x; local %x; use strict; values %{$x{a}} [return] ok 1374 - our %x; local %x; use strict; values %{$x{a}} [variable] ok 1375 - our %x; local %x; no strict; values %{$x{a}} [exception] ok 1376 - our %x; local %x; no strict; values %{$x{a}} [return] ok 1377 - our %x; local %x; no strict; values %{$x{a}} [variable] ok 1378 - my $x; values %{$x->{a}} [exception] ok 1379 - my $x; values %{$x->{a}} [return] ok 1380 - my $x; values %{$x->{a}} [variable] ok 1381 - our $x; local $x; use strict; values %{$x->{a}} [exception] ok 1382 - our $x; local $x; use strict; values %{$x->{a}} [return] ok 1383 - our $x; local $x; use strict; values %{$x->{a}} [variable] ok 1384 - our $x; local $x; no strict; values %{$x->{a}} [exception] ok 1385 - our $x; local $x; no strict; values %{$x->{a}} [return] ok 1386 - our $x; local $x; no strict; values %{$x->{a}} [variable] ok 1387 - my $x; values %{$$x{a}} [exception] ok 1388 - my $x; values %{$$x{a}} [return] ok 1389 - my $x; values %{$$x{a}} [variable] ok 1390 - our $x; local $x; use strict; values %{$$x{a}} [exception] ok 1391 - our $x; local $x; use strict; values %{$$x{a}} [return] ok 1392 - our $x; local $x; use strict; values %{$$x{a}} [variable] ok 1393 - our $x; local $x; no strict; values %{$$x{a}} [exception] ok 1394 - our $x; local $x; no strict; values %{$$x{a}} [return] ok 1395 - our $x; local $x; no strict; values %{$$x{a}} [variable] ok 1396 - my %x; values %{$x{a}} [exception] ok 1397 - my %x; values %{$x{a}} [return] ok 1398 - my %x; values %{$x{a}} [variable] ok 1399 - our %x; local %x; use strict; values %{$x{a}} [exception] ok 1400 - our %x; local %x; use strict; values %{$x{a}} [return] ok 1401 - our %x; local %x; use strict; values %{$x{a}} [variable] ok 1402 - our %x; local %x; no strict; values %{$x{a}} [exception] ok 1403 - our %x; local %x; no strict; values %{$x{a}} [return] ok 1404 - our %x; local %x; no strict; values %{$x{a}} [variable] ok 1405 - my $x; values %{$x->{a}} <+fetch> [exception] ok 1406 - my $x; values %{$x->{a}} <+fetch> [return] ok 1407 - my $x; values %{$x->{a}} <+fetch> [variable] ok 1408 - our $x; local $x; use strict; values %{$x->{a}} <+fetch> [exception] ok 1409 - our $x; local $x; use strict; values %{$x->{a}} <+fetch> [return] ok 1410 - our $x; local $x; use strict; values %{$x->{a}} <+fetch> [variable] ok 1411 - our $x; local $x; no strict; values %{$x->{a}} <+fetch> [exception] ok 1412 - our $x; local $x; no strict; values %{$x->{a}} <+fetch> [return] ok 1413 - our $x; local $x; no strict; values %{$x->{a}} <+fetch> [variable] ok 1414 - my $x; values %{$$x{a}} <+fetch> [exception] ok 1415 - my $x; values %{$$x{a}} <+fetch> [return] ok 1416 - my $x; values %{$$x{a}} <+fetch> [variable] ok 1417 - our $x; local $x; use strict; values %{$$x{a}} <+fetch> [exception] ok 1418 - our $x; local $x; use strict; values %{$$x{a}} <+fetch> [return] ok 1419 - our $x; local $x; use strict; values %{$$x{a}} <+fetch> [variable] ok 1420 - our $x; local $x; no strict; values %{$$x{a}} <+fetch> [exception] ok 1421 - our $x; local $x; no strict; values %{$$x{a}} <+fetch> [return] ok 1422 - our $x; local $x; no strict; values %{$$x{a}} <+fetch> [variable] ok 1423 - my %x; values %{$x{a}} <+fetch> [exception] ok 1424 - my %x; values %{$x{a}} <+fetch> [return] ok 1425 - my %x; values %{$x{a}} <+fetch> [variable] ok 1426 - our %x; local %x; use strict; values %{$x{a}} <+fetch> [exception] ok 1427 - our %x; local %x; use strict; values %{$x{a}} <+fetch> [return] ok 1428 - our %x; local %x; use strict; values %{$x{a}} <+fetch> [variable] ok 1429 - our %x; local %x; no strict; values %{$x{a}} <+fetch> [exception] ok 1430 - our %x; local %x; no strict; values %{$x{a}} <+fetch> [return] ok 1431 - our %x; local %x; no strict; values %{$x{a}} <+fetch> [variable] ok 1432 - my $x; values %{$x->{a}} <+exists> [exception] ok 1433 - my $x; values %{$x->{a}} <+exists> [return] ok 1434 - my $x; values %{$x->{a}} <+exists> [variable] ok 1435 - our $x; local $x; use strict; values %{$x->{a}} <+exists> [exception] ok 1436 - our $x; local $x; use strict; values %{$x->{a}} <+exists> [return] ok 1437 - our $x; local $x; use strict; values %{$x->{a}} <+exists> [variable] ok 1438 - our $x; local $x; no strict; values %{$x->{a}} <+exists> [exception] ok 1439 - our $x; local $x; no strict; values %{$x->{a}} <+exists> [return] ok 1440 - our $x; local $x; no strict; values %{$x->{a}} <+exists> [variable] ok 1441 - my $x; values %{$$x{a}} <+exists> [exception] ok 1442 - my $x; values %{$$x{a}} <+exists> [return] ok 1443 - my $x; values %{$$x{a}} <+exists> [variable] ok 1444 - our $x; local $x; use strict; values %{$$x{a}} <+exists> [exception] ok 1445 - our $x; local $x; use strict; values %{$$x{a}} <+exists> [return] ok 1446 - our $x; local $x; use strict; values %{$$x{a}} <+exists> [variable] ok 1447 - our $x; local $x; no strict; values %{$$x{a}} <+exists> [exception] ok 1448 - our $x; local $x; no strict; values %{$$x{a}} <+exists> [return] ok 1449 - our $x; local $x; no strict; values %{$$x{a}} <+exists> [variable] ok 1450 - my %x; values %{$x{a}} <+exists> [exception] ok 1451 - my %x; values %{$x{a}} <+exists> [return] ok 1452 - my %x; values %{$x{a}} <+exists> [variable] ok 1453 - our %x; local %x; use strict; values %{$x{a}} <+exists> [exception] ok 1454 - our %x; local %x; use strict; values %{$x{a}} <+exists> [return] ok 1455 - our %x; local %x; use strict; values %{$x{a}} <+exists> [variable] ok 1456 - our %x; local %x; no strict; values %{$x{a}} <+exists> [exception] ok 1457 - our %x; local %x; no strict; values %{$x{a}} <+exists> [return] ok 1458 - our %x; local %x; no strict; values %{$x{a}} <+exists> [variable] ok 1459 - my $x; values %{$x->{a}} <+delete> [exception] ok 1460 - my $x; values %{$x->{a}} <+delete> [return] ok 1461 - my $x; values %{$x->{a}} <+delete> [variable] ok 1462 - our $x; local $x; use strict; values %{$x->{a}} <+delete> [exception] ok 1463 - our $x; local $x; use strict; values %{$x->{a}} <+delete> [return] ok 1464 - our $x; local $x; use strict; values %{$x->{a}} <+delete> [variable] ok 1465 - our $x; local $x; no strict; values %{$x->{a}} <+delete> [exception] ok 1466 - our $x; local $x; no strict; values %{$x->{a}} <+delete> [return] ok 1467 - our $x; local $x; no strict; values %{$x->{a}} <+delete> [variable] ok 1468 - my $x; values %{$$x{a}} <+delete> [exception] ok 1469 - my $x; values %{$$x{a}} <+delete> [return] ok 1470 - my $x; values %{$$x{a}} <+delete> [variable] ok 1471 - our $x; local $x; use strict; values %{$$x{a}} <+delete> [exception] ok 1472 - our $x; local $x; use strict; values %{$$x{a}} <+delete> [return] ok 1473 - our $x; local $x; use strict; values %{$$x{a}} <+delete> [variable] ok 1474 - our $x; local $x; no strict; values %{$$x{a}} <+delete> [exception] ok 1475 - our $x; local $x; no strict; values %{$$x{a}} <+delete> [return] ok 1476 - our $x; local $x; no strict; values %{$$x{a}} <+delete> [variable] ok 1477 - my %x; values %{$x{a}} <+delete> [exception] ok 1478 - my %x; values %{$x{a}} <+delete> [return] ok 1479 - my %x; values %{$x{a}} <+delete> [variable] ok 1480 - our %x; local %x; use strict; values %{$x{a}} <+delete> [exception] ok 1481 - our %x; local %x; use strict; values %{$x{a}} <+delete> [return] ok 1482 - our %x; local %x; use strict; values %{$x{a}} <+delete> [variable] ok 1483 - our %x; local %x; no strict; values %{$x{a}} <+delete> [exception] ok 1484 - our %x; local %x; no strict; values %{$x{a}} <+delete> [return] ok 1485 - our %x; local %x; no strict; values %{$x{a}} <+delete> [variable] ok 1486 - my $x; values %{$x->{a}} <+store> [exception] ok 1487 - my $x; values %{$x->{a}} <+store> [return] ok 1488 - my $x; values %{$x->{a}} <+store> [variable] ok 1489 - our $x; local $x; use strict; values %{$x->{a}} <+store> [exception] ok 1490 - our $x; local $x; use strict; values %{$x->{a}} <+store> [return] ok 1491 - our $x; local $x; use strict; values %{$x->{a}} <+store> [variable] ok 1492 - our $x; local $x; no strict; values %{$x->{a}} <+store> [exception] ok 1493 - our $x; local $x; no strict; values %{$x->{a}} <+store> [return] ok 1494 - our $x; local $x; no strict; values %{$x->{a}} <+store> [variable] ok 1495 - my $x; values %{$$x{a}} <+store> [exception] ok 1496 - my $x; values %{$$x{a}} <+store> [return] ok 1497 - my $x; values %{$$x{a}} <+store> [variable] ok 1498 - our $x; local $x; use strict; values %{$$x{a}} <+store> [exception] ok 1499 - our $x; local $x; use strict; values %{$$x{a}} <+store> [return] ok 1500 - our $x; local $x; use strict; values %{$$x{a}} <+store> [variable] ok 1501 - our $x; local $x; no strict; values %{$$x{a}} <+store> [exception] ok 1502 - our $x; local $x; no strict; values %{$$x{a}} <+store> [return] ok 1503 - our $x; local $x; no strict; values %{$$x{a}} <+store> [variable] ok 1504 - my %x; values %{$x{a}} <+store> [exception] ok 1505 - my %x; values %{$x{a}} <+store> [return] ok 1506 - my %x; values %{$x{a}} <+store> [variable] ok 1507 - our %x; local %x; use strict; values %{$x{a}} <+store> [exception] ok 1508 - our %x; local %x; use strict; values %{$x{a}} <+store> [return] ok 1509 - our %x; local %x; use strict; values %{$x{a}} <+store> [variable] ok 1510 - our %x; local %x; no strict; values %{$x{a}} <+store> [exception] ok 1511 - our %x; local %x; no strict; values %{$x{a}} <+store> [return] ok 1512 - our %x; local %x; no strict; values %{$x{a}} <+store> [variable] ok 1513 - my $x; values %{$x->{a}} <+strict +fetch> [exception] ok 1514 - my $x; values %{$x->{a}} <+strict +fetch> [return] ok 1515 - my $x; values %{$x->{a}} <+strict +fetch> [variable] ok 1516 - our $x; local $x; use strict; values %{$x->{a}} <+strict +fetch> [exception] ok 1517 - our $x; local $x; use strict; values %{$x->{a}} <+strict +fetch> [return] ok 1518 - our $x; local $x; use strict; values %{$x->{a}} <+strict +fetch> [variable] ok 1519 - our $x; local $x; no strict; values %{$x->{a}} <+strict +fetch> [exception] ok 1520 - our $x; local $x; no strict; values %{$x->{a}} <+strict +fetch> [return] ok 1521 - our $x; local $x; no strict; values %{$x->{a}} <+strict +fetch> [variable] ok 1522 - my $x; values %{$$x{a}} <+strict +fetch> [exception] ok 1523 - my $x; values %{$$x{a}} <+strict +fetch> [return] ok 1524 - my $x; values %{$$x{a}} <+strict +fetch> [variable] ok 1525 - our $x; local $x; use strict; values %{$$x{a}} <+strict +fetch> [exception] ok 1526 - our $x; local $x; use strict; values %{$$x{a}} <+strict +fetch> [return] ok 1527 - our $x; local $x; use strict; values %{$$x{a}} <+strict +fetch> [variable] ok 1528 - our $x; local $x; no strict; values %{$$x{a}} <+strict +fetch> [exception] ok 1529 - our $x; local $x; no strict; values %{$$x{a}} <+strict +fetch> [return] ok 1530 - our $x; local $x; no strict; values %{$$x{a}} <+strict +fetch> [variable] ok 1531 - my %x; 1 <+strict +fetch> [exception] ok 1532 - my %x; 1 <+strict +fetch> [return] ok 1533 - my %x; 1 <+strict +fetch> [variable] ok 1534 - our %x; local %x; use strict; 1 <+strict +fetch> [exception] ok 1535 - our %x; local %x; use strict; 1 <+strict +fetch> [return] ok 1536 - our %x; local %x; use strict; 1 <+strict +fetch> [variable] ok 1537 - our %x; local %x; no strict; 1 <+strict +fetch> [exception] ok 1538 - our %x; local %x; no strict; 1 <+strict +fetch> [return] ok 1539 - our %x; local %x; no strict; 1 <+strict +fetch> [variable] ok 1540 - my $x; values %{$x->{a}} <+strict +exists> [exception] ok 1541 - my $x; values %{$x->{a}} <+strict +exists> [return] ok 1542 - my $x; values %{$x->{a}} <+strict +exists> [variable] ok 1543 - our $x; local $x; use strict; values %{$x->{a}} <+strict +exists> [exception] ok 1544 - our $x; local $x; use strict; values %{$x->{a}} <+strict +exists> [return] ok 1545 - our $x; local $x; use strict; values %{$x->{a}} <+strict +exists> [variable] ok 1546 - our $x; local $x; no strict; values %{$x->{a}} <+strict +exists> [exception] ok 1547 - our $x; local $x; no strict; values %{$x->{a}} <+strict +exists> [return] ok 1548 - our $x; local $x; no strict; values %{$x->{a}} <+strict +exists> [variable] ok 1549 - my $x; values %{$$x{a}} <+strict +exists> [exception] ok 1550 - my $x; values %{$$x{a}} <+strict +exists> [return] ok 1551 - my $x; values %{$$x{a}} <+strict +exists> [variable] ok 1552 - our $x; local $x; use strict; values %{$$x{a}} <+strict +exists> [exception] ok 1553 - our $x; local $x; use strict; values %{$$x{a}} <+strict +exists> [return] ok 1554 - our $x; local $x; use strict; values %{$$x{a}} <+strict +exists> [variable] ok 1555 - our $x; local $x; no strict; values %{$$x{a}} <+strict +exists> [exception] ok 1556 - our $x; local $x; no strict; values %{$$x{a}} <+strict +exists> [return] ok 1557 - our $x; local $x; no strict; values %{$$x{a}} <+strict +exists> [variable] ok 1558 - my %x; values %{$x{a}} <+strict +exists> [exception] ok 1559 - my %x; values %{$x{a}} <+strict +exists> [return] ok 1560 - my %x; values %{$x{a}} <+strict +exists> [variable] ok 1561 - our %x; local %x; use strict; values %{$x{a}} <+strict +exists> [exception] ok 1562 - our %x; local %x; use strict; values %{$x{a}} <+strict +exists> [return] ok 1563 - our %x; local %x; use strict; values %{$x{a}} <+strict +exists> [variable] ok 1564 - our %x; local %x; no strict; values %{$x{a}} <+strict +exists> [exception] ok 1565 - our %x; local %x; no strict; values %{$x{a}} <+strict +exists> [return] ok 1566 - our %x; local %x; no strict; values %{$x{a}} <+strict +exists> [variable] ok 1567 - my $x; values %{$x->{a}} <+strict +delete> [exception] ok 1568 - my $x; values %{$x->{a}} <+strict +delete> [return] ok 1569 - my $x; values %{$x->{a}} <+strict +delete> [variable] ok 1570 - our $x; local $x; use strict; values %{$x->{a}} <+strict +delete> [exception] ok 1571 - our $x; local $x; use strict; values %{$x->{a}} <+strict +delete> [return] ok 1572 - our $x; local $x; use strict; values %{$x->{a}} <+strict +delete> [variable] ok 1573 - our $x; local $x; no strict; values %{$x->{a}} <+strict +delete> [exception] ok 1574 - our $x; local $x; no strict; values %{$x->{a}} <+strict +delete> [return] ok 1575 - our $x; local $x; no strict; values %{$x->{a}} <+strict +delete> [variable] ok 1576 - my $x; values %{$$x{a}} <+strict +delete> [exception] ok 1577 - my $x; values %{$$x{a}} <+strict +delete> [return] ok 1578 - my $x; values %{$$x{a}} <+strict +delete> [variable] ok 1579 - our $x; local $x; use strict; values %{$$x{a}} <+strict +delete> [exception] ok 1580 - our $x; local $x; use strict; values %{$$x{a}} <+strict +delete> [return] ok 1581 - our $x; local $x; use strict; values %{$$x{a}} <+strict +delete> [variable] ok 1582 - our $x; local $x; no strict; values %{$$x{a}} <+strict +delete> [exception] ok 1583 - our $x; local $x; no strict; values %{$$x{a}} <+strict +delete> [return] ok 1584 - our $x; local $x; no strict; values %{$$x{a}} <+strict +delete> [variable] ok 1585 - my %x; values %{$x{a}} <+strict +delete> [exception] ok 1586 - my %x; values %{$x{a}} <+strict +delete> [return] ok 1587 - my %x; values %{$x{a}} <+strict +delete> [variable] ok 1588 - our %x; local %x; use strict; values %{$x{a}} <+strict +delete> [exception] ok 1589 - our %x; local %x; use strict; values %{$x{a}} <+strict +delete> [return] ok 1590 - our %x; local %x; use strict; values %{$x{a}} <+strict +delete> [variable] ok 1591 - our %x; local %x; no strict; values %{$x{a}} <+strict +delete> [exception] ok 1592 - our %x; local %x; no strict; values %{$x{a}} <+strict +delete> [return] ok 1593 - our %x; local %x; no strict; values %{$x{a}} <+strict +delete> [variable] ok 1594 - my $x; values %{$x->{a}} <+strict +store> [exception] ok 1595 - my $x; values %{$x->{a}} <+strict +store> [return] ok 1596 - my $x; values %{$x->{a}} <+strict +store> [variable] ok 1597 - our $x; local $x; use strict; values %{$x->{a}} <+strict +store> [exception] ok 1598 - our $x; local $x; use strict; values %{$x->{a}} <+strict +store> [return] ok 1599 - our $x; local $x; use strict; values %{$x->{a}} <+strict +store> [variable] ok 1600 - our $x; local $x; no strict; values %{$x->{a}} <+strict +store> [exception] ok 1601 - our $x; local $x; no strict; values %{$x->{a}} <+strict +store> [return] ok 1602 - our $x; local $x; no strict; values %{$x->{a}} <+strict +store> [variable] ok 1603 - my $x; values %{$$x{a}} <+strict +store> [exception] ok 1604 - my $x; values %{$$x{a}} <+strict +store> [return] ok 1605 - my $x; values %{$$x{a}} <+strict +store> [variable] ok 1606 - our $x; local $x; use strict; values %{$$x{a}} <+strict +store> [exception] ok 1607 - our $x; local $x; use strict; values %{$$x{a}} <+strict +store> [return] ok 1608 - our $x; local $x; use strict; values %{$$x{a}} <+strict +store> [variable] ok 1609 - our $x; local $x; no strict; values %{$$x{a}} <+strict +store> [exception] ok 1610 - our $x; local $x; no strict; values %{$$x{a}} <+strict +store> [return] ok 1611 - our $x; local $x; no strict; values %{$$x{a}} <+strict +store> [variable] ok 1612 - my %x; values %{$x{a}} <+strict +store> [exception] ok 1613 - my %x; values %{$x{a}} <+strict +store> [return] ok 1614 - my %x; values %{$x{a}} <+strict +store> [variable] ok 1615 - our %x; local %x; use strict; values %{$x{a}} <+strict +store> [exception] ok 1616 - our %x; local %x; use strict; values %{$x{a}} <+strict +store> [return] ok 1617 - our %x; local %x; use strict; values %{$x{a}} <+strict +store> [variable] ok 1618 - our %x; local %x; no strict; values %{$x{a}} <+strict +store> [exception] ok 1619 - our %x; local %x; no strict; values %{$x{a}} <+strict +store> [return] ok 1620 - our %x; local %x; no strict; values %{$x{a}} <+strict +store> [variable] ok 1621 - my $x; [ values %{$x->{a}} ] [exception] ok 1622 - my $x; [ values %{$x->{a}} ] [return] ok 1623 - my $x; [ values %{$x->{a}} ] [variable] ok 1624 - our $x; local $x; use strict; [ values %{$x->{a}} ] [exception] ok 1625 - our $x; local $x; use strict; [ values %{$x->{a}} ] [return] ok 1626 - our $x; local $x; use strict; [ values %{$x->{a}} ] [variable] ok 1627 - our $x; local $x; no strict; [ values %{$x->{a}} ] [exception] ok 1628 - our $x; local $x; no strict; [ values %{$x->{a}} ] [return] ok 1629 - our $x; local $x; no strict; [ values %{$x->{a}} ] [variable] ok 1630 - my $x; [ values %{$$x{a}} ] [exception] ok 1631 - my $x; [ values %{$$x{a}} ] [return] ok 1632 - my $x; [ values %{$$x{a}} ] [variable] ok 1633 - our $x; local $x; use strict; [ values %{$$x{a}} ] [exception] ok 1634 - our $x; local $x; use strict; [ values %{$$x{a}} ] [return] ok 1635 - our $x; local $x; use strict; [ values %{$$x{a}} ] [variable] ok 1636 - our $x; local $x; no strict; [ values %{$$x{a}} ] [exception] ok 1637 - our $x; local $x; no strict; [ values %{$$x{a}} ] [return] ok 1638 - our $x; local $x; no strict; [ values %{$$x{a}} ] [variable] ok 1639 - my %x; [ values %{$x{a}} ] [exception] ok 1640 - my %x; [ values %{$x{a}} ] [return] ok 1641 - my %x; [ values %{$x{a}} ] [variable] ok 1642 - our %x; local %x; use strict; [ values %{$x{a}} ] [exception] ok 1643 - our %x; local %x; use strict; [ values %{$x{a}} ] [return] ok 1644 - our %x; local %x; use strict; [ values %{$x{a}} ] [variable] ok 1645 - our %x; local %x; no strict; [ values %{$x{a}} ] [exception] ok 1646 - our %x; local %x; no strict; [ values %{$x{a}} ] [return] ok 1647 - our %x; local %x; no strict; [ values %{$x{a}} ] [variable] ok 1648 - my $x; [ values %{$x->{a}} ] [exception] ok 1649 - my $x; [ values %{$x->{a}} ] [return] ok 1650 - my $x; [ values %{$x->{a}} ] [variable] ok 1651 - our $x; local $x; use strict; [ values %{$x->{a}} ] [exception] ok 1652 - our $x; local $x; use strict; [ values %{$x->{a}} ] [return] ok 1653 - our $x; local $x; use strict; [ values %{$x->{a}} ] [variable] ok 1654 - our $x; local $x; no strict; [ values %{$x->{a}} ] [exception] ok 1655 - our $x; local $x; no strict; [ values %{$x->{a}} ] [return] ok 1656 - our $x; local $x; no strict; [ values %{$x->{a}} ] [variable] ok 1657 - my $x; [ values %{$$x{a}} ] [exception] ok 1658 - my $x; [ values %{$$x{a}} ] [return] ok 1659 - my $x; [ values %{$$x{a}} ] [variable] ok 1660 - our $x; local $x; use strict; [ values %{$$x{a}} ] [exception] ok 1661 - our $x; local $x; use strict; [ values %{$$x{a}} ] [return] ok 1662 - our $x; local $x; use strict; [ values %{$$x{a}} ] [variable] ok 1663 - our $x; local $x; no strict; [ values %{$$x{a}} ] [exception] ok 1664 - our $x; local $x; no strict; [ values %{$$x{a}} ] [return] ok 1665 - our $x; local $x; no strict; [ values %{$$x{a}} ] [variable] ok 1666 - my %x; [ values %{$x{a}} ] [exception] ok 1667 - my %x; [ values %{$x{a}} ] [return] ok 1668 - my %x; [ values %{$x{a}} ] [variable] ok 1669 - our %x; local %x; use strict; [ values %{$x{a}} ] [exception] ok 1670 - our %x; local %x; use strict; [ values %{$x{a}} ] [return] ok 1671 - our %x; local %x; use strict; [ values %{$x{a}} ] [variable] ok 1672 - our %x; local %x; no strict; [ values %{$x{a}} ] [exception] ok 1673 - our %x; local %x; no strict; [ values %{$x{a}} ] [return] ok 1674 - our %x; local %x; no strict; [ values %{$x{a}} ] [variable] ok 1675 - my $x; [ values %{$x->{a}} ] <+fetch> [exception] ok 1676 - my $x; [ values %{$x->{a}} ] <+fetch> [return] ok 1677 - my $x; [ values %{$x->{a}} ] <+fetch> [variable] ok 1678 - our $x; local $x; use strict; [ values %{$x->{a}} ] <+fetch> [exception] ok 1679 - our $x; local $x; use strict; [ values %{$x->{a}} ] <+fetch> [return] ok 1680 - our $x; local $x; use strict; [ values %{$x->{a}} ] <+fetch> [variable] ok 1681 - our $x; local $x; no strict; [ values %{$x->{a}} ] <+fetch> [exception] ok 1682 - our $x; local $x; no strict; [ values %{$x->{a}} ] <+fetch> [return] ok 1683 - our $x; local $x; no strict; [ values %{$x->{a}} ] <+fetch> [variable] ok 1684 - my $x; [ values %{$$x{a}} ] <+fetch> [exception] ok 1685 - my $x; [ values %{$$x{a}} ] <+fetch> [return] ok 1686 - my $x; [ values %{$$x{a}} ] <+fetch> [variable] ok 1687 - our $x; local $x; use strict; [ values %{$$x{a}} ] <+fetch> [exception] ok 1688 - our $x; local $x; use strict; [ values %{$$x{a}} ] <+fetch> [return] ok 1689 - our $x; local $x; use strict; [ values %{$$x{a}} ] <+fetch> [variable] ok 1690 - our $x; local $x; no strict; [ values %{$$x{a}} ] <+fetch> [exception] ok 1691 - our $x; local $x; no strict; [ values %{$$x{a}} ] <+fetch> [return] ok 1692 - our $x; local $x; no strict; [ values %{$$x{a}} ] <+fetch> [variable] ok 1693 - my %x; [ values %{$x{a}} ] <+fetch> [exception] ok 1694 - my %x; [ values %{$x{a}} ] <+fetch> [return] ok 1695 - my %x; [ values %{$x{a}} ] <+fetch> [variable] ok 1696 - our %x; local %x; use strict; [ values %{$x{a}} ] <+fetch> [exception] ok 1697 - our %x; local %x; use strict; [ values %{$x{a}} ] <+fetch> [return] ok 1698 - our %x; local %x; use strict; [ values %{$x{a}} ] <+fetch> [variable] ok 1699 - our %x; local %x; no strict; [ values %{$x{a}} ] <+fetch> [exception] ok 1700 - our %x; local %x; no strict; [ values %{$x{a}} ] <+fetch> [return] ok 1701 - our %x; local %x; no strict; [ values %{$x{a}} ] <+fetch> [variable] ok 1702 - my $x; [ values %{$x->{a}} ] <+exists +delete +store> [exception] ok 1703 - my $x; [ values %{$x->{a}} ] <+exists +delete +store> [return] ok 1704 - my $x; [ values %{$x->{a}} ] <+exists +delete +store> [variable] ok 1705 - our $x; local $x; use strict; [ values %{$x->{a}} ] <+exists +delete +store> [exception] ok 1706 - our $x; local $x; use strict; [ values %{$x->{a}} ] <+exists +delete +store> [return] ok 1707 - our $x; local $x; use strict; [ values %{$x->{a}} ] <+exists +delete +store> [variable] ok 1708 - our $x; local $x; no strict; [ values %{$x->{a}} ] <+exists +delete +store> [exception] ok 1709 - our $x; local $x; no strict; [ values %{$x->{a}} ] <+exists +delete +store> [return] ok 1710 - our $x; local $x; no strict; [ values %{$x->{a}} ] <+exists +delete +store> [variable] ok 1711 - my $x; [ values %{$$x{a}} ] <+exists +delete +store> [exception] ok 1712 - my $x; [ values %{$$x{a}} ] <+exists +delete +store> [return] ok 1713 - my $x; [ values %{$$x{a}} ] <+exists +delete +store> [variable] ok 1714 - our $x; local $x; use strict; [ values %{$$x{a}} ] <+exists +delete +store> [exception] ok 1715 - our $x; local $x; use strict; [ values %{$$x{a}} ] <+exists +delete +store> [return] ok 1716 - our $x; local $x; use strict; [ values %{$$x{a}} ] <+exists +delete +store> [variable] ok 1717 - our $x; local $x; no strict; [ values %{$$x{a}} ] <+exists +delete +store> [exception] ok 1718 - our $x; local $x; no strict; [ values %{$$x{a}} ] <+exists +delete +store> [return] ok 1719 - our $x; local $x; no strict; [ values %{$$x{a}} ] <+exists +delete +store> [variable] ok 1720 - my %x; [ values %{$x{a}} ] <+exists +delete +store> [exception] ok 1721 - my %x; [ values %{$x{a}} ] <+exists +delete +store> [return] ok 1722 - my %x; [ values %{$x{a}} ] <+exists +delete +store> [variable] ok 1723 - our %x; local %x; use strict; [ values %{$x{a}} ] <+exists +delete +store> [exception] ok 1724 - our %x; local %x; use strict; [ values %{$x{a}} ] <+exists +delete +store> [return] ok 1725 - our %x; local %x; use strict; [ values %{$x{a}} ] <+exists +delete +store> [variable] ok 1726 - our %x; local %x; no strict; [ values %{$x{a}} ] <+exists +delete +store> [exception] ok 1727 - our %x; local %x; no strict; [ values %{$x{a}} ] <+exists +delete +store> [return] ok 1728 - our %x; local %x; no strict; [ values %{$x{a}} ] <+exists +delete +store> [variable] ok # Using Tie::StdHash 1.06 t/23-hash-tied.t ......... 1..1 ok 1 - nested tied hashes ok t/24-hash-numerous.t ..... 1..16 ok 1 - numerous fetches from an undef lexical ok 2 - numerous fetches from a 1-level hashref lexical ok 3 - numerous fetches from an undef global ok 4 - numerous fetches from a 1-level hashref global ok 5 - numerous slices from an undef lexical ok 6 - numerous slices from a 1-level hashref lexical ok 7 - numerous slices from an undef global ok 8 - numerous slices from a 1-level hashref global ok 9 - numerous exists from an undef lexical ok 10 - numerous exists from a 1-level hashref lexical ok 11 - numerous exists from an undef global ok 12 - numerous exists from a 1-level hashref global ok 13 - numerous deletes from an undef lexical ok 14 - numerous deletes from a 1-level hashref lexical ok 15 - numerous deletes from an undef global ok 16 - numerous deletes from a 1-level hashref global ok t/30-array.t ............. 1..8154 ok 1 - my $x; $x->[$N[0]] [exception] ok 2 - my $x; $x->[$N[0]] [return] ok 3 - my $x; $x->[$N[0]] [variable] ok 4 - our $x; local $x; use strict; $x->[$N[0]] [exception] ok 5 - our $x; local $x; use strict; $x->[$N[0]] [return] ok 6 - our $x; local $x; use strict; $x->[$N[0]] [variable] ok 7 - our $x; local $x; no strict; $x->[$N[0]] [exception] ok 8 - our $x; local $x; no strict; $x->[$N[0]] [return] ok 9 - our $x; local $x; no strict; $x->[$N[0]] [variable] ok 10 - my $x; $$x[$N[0]] [exception] ok 11 - my $x; $$x[$N[0]] [return] ok 12 - my $x; $$x[$N[0]] [variable] ok 13 - our $x; local $x; use strict; $$x[$N[0]] [exception] ok 14 - our $x; local $x; use strict; $$x[$N[0]] [return] ok 15 - our $x; local $x; use strict; $$x[$N[0]] [variable] ok 16 - our $x; local $x; no strict; $$x[$N[0]] [exception] ok 17 - our $x; local $x; no strict; $$x[$N[0]] [return] ok 18 - our $x; local $x; no strict; $$x[$N[0]] [variable] ok 19 - my @x; $x[$N[0]] [exception] ok 20 - my @x; $x[$N[0]] [return] ok 21 - my @x; $x[$N[0]] [variable] ok 22 - our @x; local @x; use strict; $x[$N[0]] [exception] ok 23 - our @x; local @x; use strict; $x[$N[0]] [return] ok 24 - our @x; local @x; use strict; $x[$N[0]] [variable] ok 25 - our @x; local @x; no strict; $x[$N[0]] [exception] ok 26 - our @x; local @x; no strict; $x[$N[0]] [return] ok 27 - our @x; local @x; no strict; $x[$N[0]] [variable] ok 28 - my $x; $x->[$N[0]] [exception] ok 29 - my $x; $x->[$N[0]] [return] ok 30 - my $x; $x->[$N[0]] [variable] ok 31 - our $x; local $x; use strict; $x->[$N[0]] [exception] ok 32 - our $x; local $x; use strict; $x->[$N[0]] [return] ok 33 - our $x; local $x; use strict; $x->[$N[0]] [variable] ok 34 - our $x; local $x; no strict; $x->[$N[0]] [exception] ok 35 - our $x; local $x; no strict; $x->[$N[0]] [return] ok 36 - our $x; local $x; no strict; $x->[$N[0]] [variable] ok 37 - my $x; $$x[$N[0]] [exception] ok 38 - my $x; $$x[$N[0]] [return] ok 39 - my $x; $$x[$N[0]] [variable] ok 40 - our $x; local $x; use strict; $$x[$N[0]] [exception] ok 41 - our $x; local $x; use strict; $$x[$N[0]] [return] ok 42 - our $x; local $x; use strict; $$x[$N[0]] [variable] ok 43 - our $x; local $x; no strict; $$x[$N[0]] [exception] ok 44 - our $x; local $x; no strict; $$x[$N[0]] [return] ok 45 - our $x; local $x; no strict; $$x[$N[0]] [variable] ok 46 - my @x; $x[$N[0]] [exception] ok 47 - my @x; $x[$N[0]] [return] ok 48 - my @x; $x[$N[0]] [variable] ok 49 - our @x; local @x; use strict; $x[$N[0]] [exception] ok 50 - our @x; local @x; use strict; $x[$N[0]] [return] ok 51 - our @x; local @x; use strict; $x[$N[0]] [variable] ok 52 - our @x; local @x; no strict; $x[$N[0]] [exception] ok 53 - our @x; local @x; no strict; $x[$N[0]] [return] ok 54 - our @x; local @x; no strict; $x[$N[0]] [variable] ok 55 - my $x; $x->[$N[0]] <+fetch> [exception] ok 56 - my $x; $x->[$N[0]] <+fetch> [return] ok 57 - my $x; $x->[$N[0]] <+fetch> [variable] ok 58 - our $x; local $x; use strict; $x->[$N[0]] <+fetch> [exception] ok 59 - our $x; local $x; use strict; $x->[$N[0]] <+fetch> [return] ok 60 - our $x; local $x; use strict; $x->[$N[0]] <+fetch> [variable] ok 61 - our $x; local $x; no strict; $x->[$N[0]] <+fetch> [exception] ok 62 - our $x; local $x; no strict; $x->[$N[0]] <+fetch> [return] ok 63 - our $x; local $x; no strict; $x->[$N[0]] <+fetch> [variable] ok 64 - my $x; $$x[$N[0]] <+fetch> [exception] ok 65 - my $x; $$x[$N[0]] <+fetch> [return] ok 66 - my $x; $$x[$N[0]] <+fetch> [variable] ok 67 - our $x; local $x; use strict; $$x[$N[0]] <+fetch> [exception] ok 68 - our $x; local $x; use strict; $$x[$N[0]] <+fetch> [return] ok 69 - our $x; local $x; use strict; $$x[$N[0]] <+fetch> [variable] ok 70 - our $x; local $x; no strict; $$x[$N[0]] <+fetch> [exception] ok 71 - our $x; local $x; no strict; $$x[$N[0]] <+fetch> [return] ok 72 - our $x; local $x; no strict; $$x[$N[0]] <+fetch> [variable] ok 73 - my @x; $x[$N[0]] <+fetch> [exception] ok 74 - my @x; $x[$N[0]] <+fetch> [return] ok 75 - my @x; $x[$N[0]] <+fetch> [variable] ok 76 - our @x; local @x; use strict; $x[$N[0]] <+fetch> [exception] ok 77 - our @x; local @x; use strict; $x[$N[0]] <+fetch> [return] ok 78 - our @x; local @x; use strict; $x[$N[0]] <+fetch> [variable] ok 79 - our @x; local @x; no strict; $x[$N[0]] <+fetch> [exception] ok 80 - our @x; local @x; no strict; $x[$N[0]] <+fetch> [return] ok 81 - our @x; local @x; no strict; $x[$N[0]] <+fetch> [variable] ok 82 - my $x; $x->[$N[0]] <+exists> [exception] ok 83 - my $x; $x->[$N[0]] <+exists> [return] ok 84 - my $x; $x->[$N[0]] <+exists> [variable] ok 85 - our $x; local $x; use strict; $x->[$N[0]] <+exists> [exception] ok 86 - our $x; local $x; use strict; $x->[$N[0]] <+exists> [return] ok 87 - our $x; local $x; use strict; $x->[$N[0]] <+exists> [variable] ok 88 - our $x; local $x; no strict; $x->[$N[0]] <+exists> [exception] ok 89 - our $x; local $x; no strict; $x->[$N[0]] <+exists> [return] ok 90 - our $x; local $x; no strict; $x->[$N[0]] <+exists> [variable] ok 91 - my $x; $$x[$N[0]] <+exists> [exception] ok 92 - my $x; $$x[$N[0]] <+exists> [return] ok 93 - my $x; $$x[$N[0]] <+exists> [variable] ok 94 - our $x; local $x; use strict; $$x[$N[0]] <+exists> [exception] ok 95 - our $x; local $x; use strict; $$x[$N[0]] <+exists> [return] ok 96 - our $x; local $x; use strict; $$x[$N[0]] <+exists> [variable] ok 97 - our $x; local $x; no strict; $$x[$N[0]] <+exists> [exception] ok 98 - our $x; local $x; no strict; $$x[$N[0]] <+exists> [return] ok 99 - our $x; local $x; no strict; $$x[$N[0]] <+exists> [variable] ok 100 - my @x; $x[$N[0]] <+exists> [exception] ok 101 - my @x; $x[$N[0]] <+exists> [return] ok 102 - my @x; $x[$N[0]] <+exists> [variable] ok 103 - our @x; local @x; use strict; $x[$N[0]] <+exists> [exception] ok 104 - our @x; local @x; use strict; $x[$N[0]] <+exists> [return] ok 105 - our @x; local @x; use strict; $x[$N[0]] <+exists> [variable] ok 106 - our @x; local @x; no strict; $x[$N[0]] <+exists> [exception] ok 107 - our @x; local @x; no strict; $x[$N[0]] <+exists> [return] ok 108 - our @x; local @x; no strict; $x[$N[0]] <+exists> [variable] ok 109 - my $x; $x->[$N[0]] <+delete> [exception] ok 110 - my $x; $x->[$N[0]] <+delete> [return] ok 111 - my $x; $x->[$N[0]] <+delete> [variable] ok 112 - our $x; local $x; use strict; $x->[$N[0]] <+delete> [exception] ok 113 - our $x; local $x; use strict; $x->[$N[0]] <+delete> [return] ok 114 - our $x; local $x; use strict; $x->[$N[0]] <+delete> [variable] ok 115 - our $x; local $x; no strict; $x->[$N[0]] <+delete> [exception] ok 116 - our $x; local $x; no strict; $x->[$N[0]] <+delete> [return] ok 117 - our $x; local $x; no strict; $x->[$N[0]] <+delete> [variable] ok 118 - my $x; $$x[$N[0]] <+delete> [exception] ok 119 - my $x; $$x[$N[0]] <+delete> [return] ok 120 - my $x; $$x[$N[0]] <+delete> [variable] ok 121 - our $x; local $x; use strict; $$x[$N[0]] <+delete> [exception] ok 122 - our $x; local $x; use strict; $$x[$N[0]] <+delete> [return] ok 123 - our $x; local $x; use strict; $$x[$N[0]] <+delete> [variable] ok 124 - our $x; local $x; no strict; $$x[$N[0]] <+delete> [exception] ok 125 - our $x; local $x; no strict; $$x[$N[0]] <+delete> [return] ok 126 - our $x; local $x; no strict; $$x[$N[0]] <+delete> [variable] ok 127 - my @x; $x[$N[0]] <+delete> [exception] ok 128 - my @x; $x[$N[0]] <+delete> [return] ok 129 - my @x; $x[$N[0]] <+delete> [variable] ok 130 - our @x; local @x; use strict; $x[$N[0]] <+delete> [exception] ok 131 - our @x; local @x; use strict; $x[$N[0]] <+delete> [return] ok 132 - our @x; local @x; use strict; $x[$N[0]] <+delete> [variable] ok 133 - our @x; local @x; no strict; $x[$N[0]] <+delete> [exception] ok 134 - our @x; local @x; no strict; $x[$N[0]] <+delete> [return] ok 135 - our @x; local @x; no strict; $x[$N[0]] <+delete> [variable] ok 136 - my $x; $x->[$N[0]] <+store> [exception] ok 137 - my $x; $x->[$N[0]] <+store> [return] ok 138 - my $x; $x->[$N[0]] <+store> [variable] ok 139 - our $x; local $x; use strict; $x->[$N[0]] <+store> [exception] ok 140 - our $x; local $x; use strict; $x->[$N[0]] <+store> [return] ok 141 - our $x; local $x; use strict; $x->[$N[0]] <+store> [variable] ok 142 - our $x; local $x; no strict; $x->[$N[0]] <+store> [exception] ok 143 - our $x; local $x; no strict; $x->[$N[0]] <+store> [return] ok 144 - our $x; local $x; no strict; $x->[$N[0]] <+store> [variable] ok 145 - my $x; $$x[$N[0]] <+store> [exception] ok 146 - my $x; $$x[$N[0]] <+store> [return] ok 147 - my $x; $$x[$N[0]] <+store> [variable] ok 148 - our $x; local $x; use strict; $$x[$N[0]] <+store> [exception] ok 149 - our $x; local $x; use strict; $$x[$N[0]] <+store> [return] ok 150 - our $x; local $x; use strict; $$x[$N[0]] <+store> [variable] ok 151 - our $x; local $x; no strict; $$x[$N[0]] <+store> [exception] ok 152 - our $x; local $x; no strict; $$x[$N[0]] <+store> [return] ok 153 - our $x; local $x; no strict; $$x[$N[0]] <+store> [variable] ok 154 - my @x; $x[$N[0]] <+store> [exception] ok 155 - my @x; $x[$N[0]] <+store> [return] ok 156 - my @x; $x[$N[0]] <+store> [variable] ok 157 - our @x; local @x; use strict; $x[$N[0]] <+store> [exception] ok 158 - our @x; local @x; use strict; $x[$N[0]] <+store> [return] ok 159 - our @x; local @x; use strict; $x[$N[0]] <+store> [variable] ok 160 - our @x; local @x; no strict; $x[$N[0]] <+store> [exception] ok 161 - our @x; local @x; no strict; $x[$N[0]] <+store> [return] ok 162 - our @x; local @x; no strict; $x[$N[0]] <+store> [variable] ok 163 - my $x; $x->[$N[0]] <-fetch> [exception] ok 164 - my $x; $x->[$N[0]] <-fetch> [return] ok 165 - my $x; $x->[$N[0]] <-fetch> [variable] ok 166 - our $x; local $x; use strict; $x->[$N[0]] <-fetch> [exception] ok 167 - our $x; local $x; use strict; $x->[$N[0]] <-fetch> [return] ok 168 - our $x; local $x; use strict; $x->[$N[0]] <-fetch> [variable] ok 169 - our $x; local $x; no strict; $x->[$N[0]] <-fetch> [exception] ok 170 - our $x; local $x; no strict; $x->[$N[0]] <-fetch> [return] ok 171 - our $x; local $x; no strict; $x->[$N[0]] <-fetch> [variable] ok 172 - my $x; $$x[$N[0]] <-fetch> [exception] ok 173 - my $x; $$x[$N[0]] <-fetch> [return] ok 174 - my $x; $$x[$N[0]] <-fetch> [variable] ok 175 - our $x; local $x; use strict; $$x[$N[0]] <-fetch> [exception] ok 176 - our $x; local $x; use strict; $$x[$N[0]] <-fetch> [return] ok 177 - our $x; local $x; use strict; $$x[$N[0]] <-fetch> [variable] ok 178 - our $x; local $x; no strict; $$x[$N[0]] <-fetch> [exception] ok 179 - our $x; local $x; no strict; $$x[$N[0]] <-fetch> [return] ok 180 - our $x; local $x; no strict; $$x[$N[0]] <-fetch> [variable] ok 181 - my @x; $x[$N[0]] <-fetch> [exception] ok 182 - my @x; $x[$N[0]] <-fetch> [return] ok 183 - my @x; $x[$N[0]] <-fetch> [variable] ok 184 - our @x; local @x; use strict; $x[$N[0]] <-fetch> [exception] ok 185 - our @x; local @x; use strict; $x[$N[0]] <-fetch> [return] ok 186 - our @x; local @x; use strict; $x[$N[0]] <-fetch> [variable] ok 187 - our @x; local @x; no strict; $x[$N[0]] <-fetch> [exception] ok 188 - our @x; local @x; no strict; $x[$N[0]] <-fetch> [return] ok 189 - our @x; local @x; no strict; $x[$N[0]] <-fetch> [variable] ok 190 - my $x; $x->[$N[0]] <+fetch -fetch> [exception] ok 191 - my $x; $x->[$N[0]] <+fetch -fetch> [return] ok 192 - my $x; $x->[$N[0]] <+fetch -fetch> [variable] ok 193 - our $x; local $x; use strict; $x->[$N[0]] <+fetch -fetch> [exception] ok 194 - our $x; local $x; use strict; $x->[$N[0]] <+fetch -fetch> [return] ok 195 - our $x; local $x; use strict; $x->[$N[0]] <+fetch -fetch> [variable] ok 196 - our $x; local $x; no strict; $x->[$N[0]] <+fetch -fetch> [exception] ok 197 - our $x; local $x; no strict; $x->[$N[0]] <+fetch -fetch> [return] ok 198 - our $x; local $x; no strict; $x->[$N[0]] <+fetch -fetch> [variable] ok 199 - my $x; $$x[$N[0]] <+fetch -fetch> [exception] ok 200 - my $x; $$x[$N[0]] <+fetch -fetch> [return] ok 201 - my $x; $$x[$N[0]] <+fetch -fetch> [variable] ok 202 - our $x; local $x; use strict; $$x[$N[0]] <+fetch -fetch> [exception] ok 203 - our $x; local $x; use strict; $$x[$N[0]] <+fetch -fetch> [return] ok 204 - our $x; local $x; use strict; $$x[$N[0]] <+fetch -fetch> [variable] ok 205 - our $x; local $x; no strict; $$x[$N[0]] <+fetch -fetch> [exception] ok 206 - our $x; local $x; no strict; $$x[$N[0]] <+fetch -fetch> [return] ok 207 - our $x; local $x; no strict; $$x[$N[0]] <+fetch -fetch> [variable] ok 208 - my @x; $x[$N[0]] <+fetch -fetch> [exception] ok 209 - my @x; $x[$N[0]] <+fetch -fetch> [return] ok 210 - my @x; $x[$N[0]] <+fetch -fetch> [variable] ok 211 - our @x; local @x; use strict; $x[$N[0]] <+fetch -fetch> [exception] ok 212 - our @x; local @x; use strict; $x[$N[0]] <+fetch -fetch> [return] ok 213 - our @x; local @x; use strict; $x[$N[0]] <+fetch -fetch> [variable] ok 214 - our @x; local @x; no strict; $x[$N[0]] <+fetch -fetch> [exception] ok 215 - our @x; local @x; no strict; $x[$N[0]] <+fetch -fetch> [return] ok 216 - our @x; local @x; no strict; $x[$N[0]] <+fetch -fetch> [variable] ok 217 - my $x; $x->[$N[0]] <-fetch +fetch> [exception] ok 218 - my $x; $x->[$N[0]] <-fetch +fetch> [return] ok 219 - my $x; $x->[$N[0]] <-fetch +fetch> [variable] ok 220 - our $x; local $x; use strict; $x->[$N[0]] <-fetch +fetch> [exception] ok 221 - our $x; local $x; use strict; $x->[$N[0]] <-fetch +fetch> [return] ok 222 - our $x; local $x; use strict; $x->[$N[0]] <-fetch +fetch> [variable] ok 223 - our $x; local $x; no strict; $x->[$N[0]] <-fetch +fetch> [exception] ok 224 - our $x; local $x; no strict; $x->[$N[0]] <-fetch +fetch> [return] ok 225 - our $x; local $x; no strict; $x->[$N[0]] <-fetch +fetch> [variable] ok 226 - my $x; $$x[$N[0]] <-fetch +fetch> [exception] ok 227 - my $x; $$x[$N[0]] <-fetch +fetch> [return] ok 228 - my $x; $$x[$N[0]] <-fetch +fetch> [variable] ok 229 - our $x; local $x; use strict; $$x[$N[0]] <-fetch +fetch> [exception] ok 230 - our $x; local $x; use strict; $$x[$N[0]] <-fetch +fetch> [return] ok 231 - our $x; local $x; use strict; $$x[$N[0]] <-fetch +fetch> [variable] ok 232 - our $x; local $x; no strict; $$x[$N[0]] <-fetch +fetch> [exception] ok 233 - our $x; local $x; no strict; $$x[$N[0]] <-fetch +fetch> [return] ok 234 - our $x; local $x; no strict; $$x[$N[0]] <-fetch +fetch> [variable] ok 235 - my @x; $x[$N[0]] <-fetch +fetch> [exception] ok 236 - my @x; $x[$N[0]] <-fetch +fetch> [return] ok 237 - my @x; $x[$N[0]] <-fetch +fetch> [variable] ok 238 - our @x; local @x; use strict; $x[$N[0]] <-fetch +fetch> [exception] ok 239 - our @x; local @x; use strict; $x[$N[0]] <-fetch +fetch> [return] ok 240 - our @x; local @x; use strict; $x[$N[0]] <-fetch +fetch> [variable] ok 241 - our @x; local @x; no strict; $x[$N[0]] <-fetch +fetch> [exception] ok 242 - our @x; local @x; no strict; $x[$N[0]] <-fetch +fetch> [return] ok 243 - our @x; local @x; no strict; $x[$N[0]] <-fetch +fetch> [variable] ok 244 - my $x; $x->[$N[0]] <+fetch -exists> [exception] ok 245 - my $x; $x->[$N[0]] <+fetch -exists> [return] ok 246 - my $x; $x->[$N[0]] <+fetch -exists> [variable] ok 247 - our $x; local $x; use strict; $x->[$N[0]] <+fetch -exists> [exception] ok 248 - our $x; local $x; use strict; $x->[$N[0]] <+fetch -exists> [return] ok 249 - our $x; local $x; use strict; $x->[$N[0]] <+fetch -exists> [variable] ok 250 - our $x; local $x; no strict; $x->[$N[0]] <+fetch -exists> [exception] ok 251 - our $x; local $x; no strict; $x->[$N[0]] <+fetch -exists> [return] ok 252 - our $x; local $x; no strict; $x->[$N[0]] <+fetch -exists> [variable] ok 253 - my $x; $$x[$N[0]] <+fetch -exists> [exception] ok 254 - my $x; $$x[$N[0]] <+fetch -exists> [return] ok 255 - my $x; $$x[$N[0]] <+fetch -exists> [variable] ok 256 - our $x; local $x; use strict; $$x[$N[0]] <+fetch -exists> [exception] ok 257 - our $x; local $x; use strict; $$x[$N[0]] <+fetch -exists> [return] ok 258 - our $x; local $x; use strict; $$x[$N[0]] <+fetch -exists> [variable] ok 259 - our $x; local $x; no strict; $$x[$N[0]] <+fetch -exists> [exception] ok 260 - our $x; local $x; no strict; $$x[$N[0]] <+fetch -exists> [return] ok 261 - our $x; local $x; no strict; $$x[$N[0]] <+fetch -exists> [variable] ok 262 - my @x; $x[$N[0]] <+fetch -exists> [exception] ok 263 - my @x; $x[$N[0]] <+fetch -exists> [return] ok 264 - my @x; $x[$N[0]] <+fetch -exists> [variable] ok 265 - our @x; local @x; use strict; $x[$N[0]] <+fetch -exists> [exception] ok 266 - our @x; local @x; use strict; $x[$N[0]] <+fetch -exists> [return] ok 267 - our @x; local @x; use strict; $x[$N[0]] <+fetch -exists> [variable] ok 268 - our @x; local @x; no strict; $x[$N[0]] <+fetch -exists> [exception] ok 269 - our @x; local @x; no strict; $x[$N[0]] <+fetch -exists> [return] ok 270 - our @x; local @x; no strict; $x[$N[0]] <+fetch -exists> [variable] ok 271 - my $x; $x->[$N[0]] <+strict +fetch> [exception] ok 272 - my $x; $x->[$N[0]] <+strict +fetch> [return] ok 273 - my $x; $x->[$N[0]] <+strict +fetch> [variable] ok 274 - our $x; local $x; use strict; $x->[$N[0]] <+strict +fetch> [exception] ok 275 - our $x; local $x; use strict; $x->[$N[0]] <+strict +fetch> [return] ok 276 - our $x; local $x; use strict; $x->[$N[0]] <+strict +fetch> [variable] ok 277 - our $x; local $x; no strict; $x->[$N[0]] <+strict +fetch> [exception] ok 278 - our $x; local $x; no strict; $x->[$N[0]] <+strict +fetch> [return] ok 279 - our $x; local $x; no strict; $x->[$N[0]] <+strict +fetch> [variable] ok 280 - my $x; $$x[$N[0]] <+strict +fetch> [exception] ok 281 - my $x; $$x[$N[0]] <+strict +fetch> [return] ok 282 - my $x; $$x[$N[0]] <+strict +fetch> [variable] ok 283 - our $x; local $x; use strict; $$x[$N[0]] <+strict +fetch> [exception] ok 284 - our $x; local $x; use strict; $$x[$N[0]] <+strict +fetch> [return] ok 285 - our $x; local $x; use strict; $$x[$N[0]] <+strict +fetch> [variable] ok 286 - our $x; local $x; no strict; $$x[$N[0]] <+strict +fetch> [exception] ok 287 - our $x; local $x; no strict; $$x[$N[0]] <+strict +fetch> [return] ok 288 - our $x; local $x; no strict; $$x[$N[0]] <+strict +fetch> [variable] ok 289 - my @x; 1 <+strict +fetch> [exception] ok 290 - my @x; 1 <+strict +fetch> [return] ok 291 - my @x; 1 <+strict +fetch> [variable] ok 292 - our @x; local @x; use strict; 1 <+strict +fetch> [exception] ok 293 - our @x; local @x; use strict; 1 <+strict +fetch> [return] ok 294 - our @x; local @x; use strict; 1 <+strict +fetch> [variable] ok 295 - our @x; local @x; no strict; 1 <+strict +fetch> [exception] ok 296 - our @x; local @x; no strict; 1 <+strict +fetch> [return] ok 297 - our @x; local @x; no strict; 1 <+strict +fetch> [variable] ok 298 - my $x; $x->[$N[0]] <+strict +exists> [exception] ok 299 - my $x; $x->[$N[0]] <+strict +exists> [return] ok 300 - my $x; $x->[$N[0]] <+strict +exists> [variable] ok 301 - our $x; local $x; use strict; $x->[$N[0]] <+strict +exists> [exception] ok 302 - our $x; local $x; use strict; $x->[$N[0]] <+strict +exists> [return] ok 303 - our $x; local $x; use strict; $x->[$N[0]] <+strict +exists> [variable] ok 304 - our $x; local $x; no strict; $x->[$N[0]] <+strict +exists> [exception] ok 305 - our $x; local $x; no strict; $x->[$N[0]] <+strict +exists> [return] ok 306 - our $x; local $x; no strict; $x->[$N[0]] <+strict +exists> [variable] ok 307 - my $x; $$x[$N[0]] <+strict +exists> [exception] ok 308 - my $x; $$x[$N[0]] <+strict +exists> [return] ok 309 - my $x; $$x[$N[0]] <+strict +exists> [variable] ok 310 - our $x; local $x; use strict; $$x[$N[0]] <+strict +exists> [exception] ok 311 - our $x; local $x; use strict; $$x[$N[0]] <+strict +exists> [return] ok 312 - our $x; local $x; use strict; $$x[$N[0]] <+strict +exists> [variable] ok 313 - our $x; local $x; no strict; $$x[$N[0]] <+strict +exists> [exception] ok 314 - our $x; local $x; no strict; $$x[$N[0]] <+strict +exists> [return] ok 315 - our $x; local $x; no strict; $$x[$N[0]] <+strict +exists> [variable] ok 316 - my @x; $x[$N[0]] <+strict +exists> [exception] ok 317 - my @x; $x[$N[0]] <+strict +exists> [return] ok 318 - my @x; $x[$N[0]] <+strict +exists> [variable] ok 319 - our @x; local @x; use strict; $x[$N[0]] <+strict +exists> [exception] ok 320 - our @x; local @x; use strict; $x[$N[0]] <+strict +exists> [return] ok 321 - our @x; local @x; use strict; $x[$N[0]] <+strict +exists> [variable] ok 322 - our @x; local @x; no strict; $x[$N[0]] <+strict +exists> [exception] ok 323 - our @x; local @x; no strict; $x[$N[0]] <+strict +exists> [return] ok 324 - our @x; local @x; no strict; $x[$N[0]] <+strict +exists> [variable] ok 325 - my $x; $x->[$N[0]] <+strict +delete> [exception] ok 326 - my $x; $x->[$N[0]] <+strict +delete> [return] ok 327 - my $x; $x->[$N[0]] <+strict +delete> [variable] ok 328 - our $x; local $x; use strict; $x->[$N[0]] <+strict +delete> [exception] ok 329 - our $x; local $x; use strict; $x->[$N[0]] <+strict +delete> [return] ok 330 - our $x; local $x; use strict; $x->[$N[0]] <+strict +delete> [variable] ok 331 - our $x; local $x; no strict; $x->[$N[0]] <+strict +delete> [exception] ok 332 - our $x; local $x; no strict; $x->[$N[0]] <+strict +delete> [return] ok 333 - our $x; local $x; no strict; $x->[$N[0]] <+strict +delete> [variable] ok 334 - my $x; $$x[$N[0]] <+strict +delete> [exception] ok 335 - my $x; $$x[$N[0]] <+strict +delete> [return] ok 336 - my $x; $$x[$N[0]] <+strict +delete> [variable] ok 337 - our $x; local $x; use strict; $$x[$N[0]] <+strict +delete> [exception] ok 338 - our $x; local $x; use strict; $$x[$N[0]] <+strict +delete> [return] ok 339 - our $x; local $x; use strict; $$x[$N[0]] <+strict +delete> [variable] ok 340 - our $x; local $x; no strict; $$x[$N[0]] <+strict +delete> [exception] ok 341 - our $x; local $x; no strict; $$x[$N[0]] <+strict +delete> [return] ok 342 - our $x; local $x; no strict; $$x[$N[0]] <+strict +delete> [variable] ok 343 - my @x; $x[$N[0]] <+strict +delete> [exception] ok 344 - my @x; $x[$N[0]] <+strict +delete> [return] ok 345 - my @x; $x[$N[0]] <+strict +delete> [variable] ok 346 - our @x; local @x; use strict; $x[$N[0]] <+strict +delete> [exception] ok 347 - our @x; local @x; use strict; $x[$N[0]] <+strict +delete> [return] ok 348 - our @x; local @x; use strict; $x[$N[0]] <+strict +delete> [variable] ok 349 - our @x; local @x; no strict; $x[$N[0]] <+strict +delete> [exception] ok 350 - our @x; local @x; no strict; $x[$N[0]] <+strict +delete> [return] ok 351 - our @x; local @x; no strict; $x[$N[0]] <+strict +delete> [variable] ok 352 - my $x; $x->[$N[0]] <+strict +store> [exception] ok 353 - my $x; $x->[$N[0]] <+strict +store> [return] ok 354 - my $x; $x->[$N[0]] <+strict +store> [variable] ok 355 - our $x; local $x; use strict; $x->[$N[0]] <+strict +store> [exception] ok 356 - our $x; local $x; use strict; $x->[$N[0]] <+strict +store> [return] ok 357 - our $x; local $x; use strict; $x->[$N[0]] <+strict +store> [variable] ok 358 - our $x; local $x; no strict; $x->[$N[0]] <+strict +store> [exception] ok 359 - our $x; local $x; no strict; $x->[$N[0]] <+strict +store> [return] ok 360 - our $x; local $x; no strict; $x->[$N[0]] <+strict +store> [variable] ok 361 - my $x; $$x[$N[0]] <+strict +store> [exception] ok 362 - my $x; $$x[$N[0]] <+strict +store> [return] ok 363 - my $x; $$x[$N[0]] <+strict +store> [variable] ok 364 - our $x; local $x; use strict; $$x[$N[0]] <+strict +store> [exception] ok 365 - our $x; local $x; use strict; $$x[$N[0]] <+strict +store> [return] ok 366 - our $x; local $x; use strict; $$x[$N[0]] <+strict +store> [variable] ok 367 - our $x; local $x; no strict; $$x[$N[0]] <+strict +store> [exception] ok 368 - our $x; local $x; no strict; $$x[$N[0]] <+strict +store> [return] ok 369 - our $x; local $x; no strict; $$x[$N[0]] <+strict +store> [variable] ok 370 - my @x; $x[$N[0]] <+strict +store> [exception] ok 371 - my @x; $x[$N[0]] <+strict +store> [return] ok 372 - my @x; $x[$N[0]] <+strict +store> [variable] ok 373 - our @x; local @x; use strict; $x[$N[0]] <+strict +store> [exception] ok 374 - our @x; local @x; use strict; $x[$N[0]] <+strict +store> [return] ok 375 - our @x; local @x; use strict; $x[$N[0]] <+strict +store> [variable] ok 376 - our @x; local @x; no strict; $x[$N[0]] <+strict +store> [exception] ok 377 - our @x; local @x; no strict; $x[$N[0]] <+strict +store> [return] ok 378 - our @x; local @x; no strict; $x[$N[0]] <+strict +store> [variable] ok 379 - my $x; $x->[$N[0]]->[$N[1]] [exception] ok 380 - my $x; $x->[$N[0]]->[$N[1]] [return] ok 381 - my $x; $x->[$N[0]]->[$N[1]] [variable] ok 382 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] [exception] ok 383 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] [return] ok 384 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] [variable] ok 385 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] [exception] ok 386 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] [return] ok 387 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] [variable] ok 388 - my $x; $$x[$N[0]]->[$N[1]] [exception] ok 389 - my $x; $$x[$N[0]]->[$N[1]] [return] ok 390 - my $x; $$x[$N[0]]->[$N[1]] [variable] ok 391 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] [exception] ok 392 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] [return] ok 393 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] [variable] ok 394 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] [exception] ok 395 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] [return] ok 396 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] [variable] ok 397 - my @x; $x[$N[0]]->[$N[1]] [exception] ok 398 - my @x; $x[$N[0]]->[$N[1]] [return] ok 399 - my @x; $x[$N[0]]->[$N[1]] [variable] ok 400 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] [exception] ok 401 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] [return] ok 402 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] [variable] ok 403 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] [exception] ok 404 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] [return] ok 405 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] [variable] ok 406 - my $x; $x->[$N[0]]->[$N[1]] [exception] ok 407 - my $x; $x->[$N[0]]->[$N[1]] [return] ok 408 - my $x; $x->[$N[0]]->[$N[1]] [variable] ok 409 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] [exception] ok 410 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] [return] ok 411 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] [variable] ok 412 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] [exception] ok 413 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] [return] ok 414 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] [variable] ok 415 - my $x; $$x[$N[0]]->[$N[1]] [exception] ok 416 - my $x; $$x[$N[0]]->[$N[1]] [return] ok 417 - my $x; $$x[$N[0]]->[$N[1]] [variable] ok 418 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] [exception] ok 419 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] [return] ok 420 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] [variable] ok 421 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] [exception] ok 422 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] [return] ok 423 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] [variable] ok 424 - my @x; $x[$N[0]]->[$N[1]] [exception] ok 425 - my @x; $x[$N[0]]->[$N[1]] [return] ok 426 - my @x; $x[$N[0]]->[$N[1]] [variable] ok 427 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] [exception] ok 428 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] [return] ok 429 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] [variable] ok 430 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] [exception] ok 431 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] [return] ok 432 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] [variable] ok 433 - my $x; $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 434 - my $x; $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 435 - my $x; $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 436 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 437 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 438 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 439 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 440 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 441 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 442 - my $x; $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 443 - my $x; $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 444 - my $x; $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 445 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 446 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 447 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 448 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 449 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 450 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 451 - my @x; $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 452 - my @x; $x[$N[0]]->[$N[1]] <+fetch> [return] ok 453 - my @x; $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 454 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 455 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+fetch> [return] ok 456 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 457 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 458 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+fetch> [return] ok 459 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 460 - my $x; $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 461 - my $x; $x->[$N[0]]->[$N[1]] <+exists> [return] ok 462 - my $x; $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 463 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 464 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+exists> [return] ok 465 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 466 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 467 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+exists> [return] ok 468 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 469 - my $x; $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 470 - my $x; $$x[$N[0]]->[$N[1]] <+exists> [return] ok 471 - my $x; $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 472 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 473 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+exists> [return] ok 474 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 475 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 476 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+exists> [return] ok 477 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 478 - my @x; $x[$N[0]]->[$N[1]] <+exists> [exception] ok 479 - my @x; $x[$N[0]]->[$N[1]] <+exists> [return] ok 480 - my @x; $x[$N[0]]->[$N[1]] <+exists> [variable] ok 481 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+exists> [exception] ok 482 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+exists> [return] ok 483 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+exists> [variable] ok 484 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+exists> [exception] ok 485 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+exists> [return] ok 486 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+exists> [variable] ok 487 - my $x; $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 488 - my $x; $x->[$N[0]]->[$N[1]] <+delete> [return] ok 489 - my $x; $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 490 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 491 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+delete> [return] ok 492 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 493 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 494 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+delete> [return] ok 495 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 496 - my $x; $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 497 - my $x; $$x[$N[0]]->[$N[1]] <+delete> [return] ok 498 - my $x; $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 499 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 500 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+delete> [return] ok 501 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 502 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 503 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+delete> [return] ok 504 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 505 - my @x; $x[$N[0]]->[$N[1]] <+delete> [exception] ok 506 - my @x; $x[$N[0]]->[$N[1]] <+delete> [return] ok 507 - my @x; $x[$N[0]]->[$N[1]] <+delete> [variable] ok 508 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+delete> [exception] ok 509 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+delete> [return] ok 510 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+delete> [variable] ok 511 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+delete> [exception] ok 512 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+delete> [return] ok 513 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+delete> [variable] ok 514 - my $x; $x->[$N[0]]->[$N[1]] <+store> [exception] ok 515 - my $x; $x->[$N[0]]->[$N[1]] <+store> [return] ok 516 - my $x; $x->[$N[0]]->[$N[1]] <+store> [variable] ok 517 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+store> [exception] ok 518 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+store> [return] ok 519 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+store> [variable] ok 520 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+store> [exception] ok 521 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+store> [return] ok 522 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+store> [variable] ok 523 - my $x; $$x[$N[0]]->[$N[1]] <+store> [exception] ok 524 - my $x; $$x[$N[0]]->[$N[1]] <+store> [return] ok 525 - my $x; $$x[$N[0]]->[$N[1]] <+store> [variable] ok 526 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+store> [exception] ok 527 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+store> [return] ok 528 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+store> [variable] ok 529 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+store> [exception] ok 530 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+store> [return] ok 531 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+store> [variable] ok 532 - my @x; $x[$N[0]]->[$N[1]] <+store> [exception] ok 533 - my @x; $x[$N[0]]->[$N[1]] <+store> [return] ok 534 - my @x; $x[$N[0]]->[$N[1]] <+store> [variable] ok 535 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+store> [exception] ok 536 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+store> [return] ok 537 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+store> [variable] ok 538 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+store> [exception] ok 539 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+store> [return] ok 540 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+store> [variable] ok 541 - my $x; $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 542 - my $x; $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 543 - my $x; $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 544 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 545 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 546 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 547 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 548 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 549 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 550 - my $x; $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 551 - my $x; $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 552 - my $x; $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 553 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 554 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 555 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 556 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 557 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 558 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 559 - my @x; $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 560 - my @x; $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 561 - my @x; $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 562 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 563 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 564 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 565 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 566 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 567 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 568 - my $x; $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 569 - my $x; $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 570 - my $x; $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 571 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 572 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 573 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 574 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 575 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 576 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 577 - my $x; $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 578 - my $x; $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 579 - my $x; $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 580 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 581 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 582 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 583 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 584 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 585 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 586 - my @x; $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 587 - my @x; $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 588 - my @x; $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 589 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 590 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 591 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 592 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 593 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 594 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 595 - my $x; $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 596 - my $x; $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 597 - my $x; $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 598 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 599 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 600 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 601 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 602 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 603 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 604 - my $x; $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 605 - my $x; $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 606 - my $x; $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 607 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 608 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 609 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 610 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 611 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 612 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 613 - my @x; $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 614 - my @x; $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 615 - my @x; $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 616 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 617 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 618 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 619 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 620 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 621 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 622 - my $x; $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 623 - my $x; $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 624 - my $x; $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 625 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 626 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 627 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 628 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 629 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 630 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 631 - my $x; $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 632 - my $x; $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 633 - my $x; $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 634 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 635 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 636 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 637 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 638 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 639 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 640 - my @x; $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 641 - my @x; $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 642 - my @x; $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 643 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 644 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 645 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 646 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 647 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 648 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 649 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [exception] ok 650 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [return] ok 651 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [variable] ok 652 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [exception] ok 653 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [return] ok 654 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [variable] ok 655 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [exception] ok 656 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [return] ok 657 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [variable] ok 658 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [exception] ok 659 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [return] ok 660 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [variable] ok 661 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [exception] ok 662 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [return] ok 663 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [variable] ok 664 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [exception] ok 665 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [return] ok 666 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [variable] ok 667 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [exception] ok 668 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [return] ok 669 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [variable] ok 670 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [exception] ok 671 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [return] ok 672 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [variable] ok 673 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [exception] ok 674 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [return] ok 675 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [variable] ok 676 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [exception] ok 677 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [return] ok 678 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [variable] ok 679 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [exception] ok 680 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [return] ok 681 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [variable] ok 682 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [exception] ok 683 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [return] ok 684 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [variable] ok 685 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [exception] ok 686 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [return] ok 687 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [variable] ok 688 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [exception] ok 689 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [return] ok 690 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [variable] ok 691 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [exception] ok 692 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [return] ok 693 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [variable] ok 694 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [exception] ok 695 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [return] ok 696 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [variable] ok 697 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [exception] ok 698 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [return] ok 699 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [variable] ok 700 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [exception] ok 701 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [return] ok 702 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [variable] ok 703 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [exception] ok 704 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [return] ok 705 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [variable] ok 706 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [exception] ok 707 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [return] ok 708 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [variable] ok 709 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [exception] ok 710 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [return] ok 711 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [variable] ok 712 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [exception] ok 713 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [return] ok 714 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [variable] ok 715 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [exception] ok 716 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [return] ok 717 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [variable] ok 718 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [exception] ok 719 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [return] ok 720 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [variable] ok 721 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+exists> [exception] ok 722 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+exists> [return] ok 723 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+exists> [variable] ok 724 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+exists> [exception] ok 725 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+exists> [return] ok 726 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+exists> [variable] ok 727 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+exists> [exception] ok 728 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+exists> [return] ok 729 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+exists> [variable] ok 730 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [exception] ok 731 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [return] ok 732 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [variable] ok 733 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [exception] ok 734 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [return] ok 735 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [variable] ok 736 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [exception] ok 737 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [return] ok 738 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [variable] ok 739 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [exception] ok 740 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [return] ok 741 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [variable] ok 742 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [exception] ok 743 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [return] ok 744 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [variable] ok 745 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [exception] ok 746 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [return] ok 747 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [variable] ok 748 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+exists> [exception] ok 749 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+exists> [return] ok 750 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+exists> [variable] ok 751 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+exists> [exception] ok 752 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+exists> [return] ok 753 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+exists> [variable] ok 754 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+exists> [exception] ok 755 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+exists> [return] ok 756 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+exists> [variable] ok 757 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [exception] ok 758 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [return] ok 759 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [variable] ok 760 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [exception] ok 761 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [return] ok 762 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [variable] ok 763 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [exception] ok 764 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [return] ok 765 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [variable] ok 766 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [exception] ok 767 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [return] ok 768 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [variable] ok 769 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [exception] ok 770 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [return] ok 771 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [variable] ok 772 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [exception] ok 773 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [return] ok 774 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [variable] ok 775 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+delete> [exception] ok 776 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+delete> [return] ok 777 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+delete> [variable] ok 778 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+delete> [exception] ok 779 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+delete> [return] ok 780 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+delete> [variable] ok 781 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+delete> [exception] ok 782 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+delete> [return] ok 783 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+delete> [variable] ok 784 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [exception] ok 785 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [return] ok 786 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [variable] ok 787 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [exception] ok 788 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [return] ok 789 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [variable] ok 790 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [exception] ok 791 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [return] ok 792 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [variable] ok 793 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [exception] ok 794 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [return] ok 795 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [variable] ok 796 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [exception] ok 797 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [return] ok 798 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [variable] ok 799 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [exception] ok 800 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [return] ok 801 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [variable] ok 802 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+delete> [exception] ok 803 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+delete> [return] ok 804 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+delete> [variable] ok 805 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+delete> [exception] ok 806 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+delete> [return] ok 807 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+delete> [variable] ok 808 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+delete> [exception] ok 809 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+delete> [return] ok 810 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+delete> [variable] ok 811 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [exception] ok 812 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [return] ok 813 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [variable] ok 814 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [exception] ok 815 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [return] ok 816 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [variable] ok 817 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [exception] ok 818 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [return] ok 819 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [variable] ok 820 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [exception] ok 821 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [return] ok 822 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [variable] ok 823 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [exception] ok 824 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [return] ok 825 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [variable] ok 826 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [exception] ok 827 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [return] ok 828 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [variable] ok 829 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+store> [exception] ok 830 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+store> [return] ok 831 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+store> [variable] ok 832 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+store> [exception] ok 833 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+store> [return] ok 834 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+store> [variable] ok 835 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+store> [exception] ok 836 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+store> [return] ok 837 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+store> [variable] ok 838 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [exception] ok 839 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [return] ok 840 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [variable] ok 841 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [exception] ok 842 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [return] ok 843 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [variable] ok 844 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [exception] ok 845 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [return] ok 846 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [variable] ok 847 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [exception] ok 848 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [return] ok 849 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [variable] ok 850 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [exception] ok 851 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [return] ok 852 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [variable] ok 853 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [exception] ok 854 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [return] ok 855 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [variable] ok 856 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+store> [exception] ok 857 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+store> [return] ok 858 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+store> [variable] ok 859 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+store> [exception] ok 860 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+store> [return] ok 861 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+store> [variable] ok 862 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+store> [exception] ok 863 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+store> [return] ok 864 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+store> [variable] ok 865 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [exception] ok 866 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [return] ok 867 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [variable] ok 868 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [exception] ok 869 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [return] ok 870 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [variable] ok 871 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [exception] ok 872 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [return] ok 873 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [variable] ok 874 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [exception] ok 875 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [return] ok 876 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [variable] ok 877 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [exception] ok 878 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [return] ok 879 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [variable] ok 880 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [exception] ok 881 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [return] ok 882 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [variable] ok 883 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [exception] ok 884 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [return] ok 885 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [variable] ok 886 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [exception] ok 887 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [return] ok 888 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [variable] ok 889 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [exception] ok 890 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [return] ok 891 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [variable] ok 892 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [exception] ok 893 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [return] ok 894 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [variable] ok 895 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [exception] ok 896 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [return] ok 897 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [variable] ok 898 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [exception] ok 899 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [return] ok 900 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [variable] ok 901 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [exception] ok 902 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [return] ok 903 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [variable] ok 904 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [exception] ok 905 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [return] ok 906 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [variable] ok 907 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [exception] ok 908 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [return] ok 909 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [variable] ok 910 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [exception] ok 911 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [return] ok 912 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [variable] ok 913 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [exception] ok 914 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [return] ok 915 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [variable] ok 916 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [exception] ok 917 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [return] ok 918 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [variable] ok 919 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [exception] ok 920 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [return] ok 921 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [variable] ok 922 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [exception] ok 923 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [return] ok 924 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [variable] ok 925 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [exception] ok 926 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [return] ok 927 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [variable] ok 928 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [exception] ok 929 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [return] ok 930 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [variable] ok 931 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [exception] ok 932 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [return] ok 933 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [variable] ok 934 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [exception] ok 935 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [return] ok 936 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [variable] ok 937 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [exception] ok 938 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [return] ok 939 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [variable] ok 940 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [exception] ok 941 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [return] ok 942 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [variable] ok 943 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [exception] ok 944 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [return] ok 945 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [variable] ok 946 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [exception] ok 947 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [return] ok 948 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [variable] ok 949 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [exception] ok 950 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [return] ok 951 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [variable] ok 952 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [exception] ok 953 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [return] ok 954 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [variable] ok 955 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [exception] ok 956 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [return] ok 957 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [variable] ok 958 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [exception] ok 959 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [return] ok 960 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [variable] ok 961 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [exception] ok 962 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [return] ok 963 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [variable] ok 964 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [exception] ok 965 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [return] ok 966 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [variable] ok 967 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [exception] ok 968 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [return] ok 969 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [variable] ok 970 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [exception] ok 971 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [return] ok 972 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [variable] ok 973 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [exception] ok 974 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [return] ok 975 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [variable] ok 976 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [exception] ok 977 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [return] ok 978 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [variable] ok 979 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [exception] ok 980 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [return] ok 981 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [variable] ok 982 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [exception] ok 983 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [return] ok 984 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [variable] ok 985 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [exception] ok 986 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [return] ok 987 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [variable] ok 988 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [exception] ok 989 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [return] ok 990 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [variable] ok 991 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [exception] ok 992 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [return] ok 993 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [variable] ok 994 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [exception] ok 995 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [return] ok 996 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [variable] ok 997 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [exception] ok 998 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [return] ok 999 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [variable] ok 1000 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [exception] ok 1001 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [return] ok 1002 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [variable] ok 1003 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [exception] ok 1004 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [return] ok 1005 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [variable] ok 1006 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [exception] ok 1007 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [return] ok 1008 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [variable] ok 1009 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [exception] ok 1010 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [return] ok 1011 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [variable] ok 1012 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [exception] ok 1013 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [return] ok 1014 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [variable] ok 1015 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [exception] ok 1016 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [return] ok 1017 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [variable] ok 1018 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [exception] ok 1019 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [return] ok 1020 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [variable] ok 1021 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [exception] ok 1022 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [return] ok 1023 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [variable] ok 1024 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [exception] ok 1025 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [return] ok 1026 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [variable] ok 1027 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [exception] ok 1028 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [return] ok 1029 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [variable] ok 1030 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [exception] ok 1031 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [return] ok 1032 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [variable] ok 1033 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [exception] ok 1034 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [return] ok 1035 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [variable] ok 1036 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [exception] ok 1037 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [return] ok 1038 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [variable] ok 1039 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [exception] ok 1040 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [return] ok 1041 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [variable] ok 1042 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [exception] ok 1043 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [return] ok 1044 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [variable] ok 1045 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [exception] ok 1046 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [return] ok 1047 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [variable] ok 1048 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [exception] ok 1049 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [return] ok 1050 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [variable] ok 1051 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [exception] ok 1052 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [return] ok 1053 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [variable] ok 1054 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [exception] ok 1055 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [return] ok 1056 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [variable] ok 1057 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [exception] ok 1058 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [return] ok 1059 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [variable] ok 1060 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [exception] ok 1061 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [return] ok 1062 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [variable] ok 1063 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [exception] ok 1064 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [return] ok 1065 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [variable] ok 1066 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [exception] ok 1067 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [return] ok 1068 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [variable] ok 1069 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [exception] ok 1070 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [return] ok 1071 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [variable] ok 1072 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [exception] ok 1073 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [return] ok 1074 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [variable] ok 1075 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [exception] ok 1076 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [return] ok 1077 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [variable] ok 1078 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [exception] ok 1079 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [return] ok 1080 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [variable] ok 1081 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 1082 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 1083 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 1084 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 1085 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 1086 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 1087 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 1088 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 1089 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 1090 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 1091 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 1092 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 1093 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 1094 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 1095 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 1096 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 1097 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 1098 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 1099 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 1100 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [return] ok 1101 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 1102 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 1103 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [return] ok 1104 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 1105 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 1106 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [return] ok 1107 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 1108 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 1109 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 1110 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 1111 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 1112 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 1113 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 1114 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 1115 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 1116 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 1117 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 1118 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 1119 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 1120 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 1121 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 1122 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 1123 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 1124 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 1125 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 1126 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 1127 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [return] ok 1128 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 1129 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 1130 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [return] ok 1131 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 1132 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 1133 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [return] ok 1134 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 1135 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 1136 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 1137 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 1138 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 1139 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 1140 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 1141 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 1142 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 1143 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 1144 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 1145 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 1146 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 1147 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 1148 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 1149 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 1150 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 1151 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 1152 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 1153 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 1154 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [return] ok 1155 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 1156 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 1157 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [return] ok 1158 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 1159 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 1160 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [return] ok 1161 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 1162 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 1163 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [return] ok 1164 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 1165 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 1166 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [return] ok 1167 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 1168 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 1169 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [return] ok 1170 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 1171 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 1172 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [return] ok 1173 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 1174 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 1175 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [return] ok 1176 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 1177 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 1178 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [return] ok 1179 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 1180 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [exception] ok 1181 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [return] ok 1182 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [variable] ok 1183 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [exception] ok 1184 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [return] ok 1185 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [variable] ok 1186 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [exception] ok 1187 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [return] ok 1188 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [variable] ok 1189 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 1190 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [return] ok 1191 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 1192 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 1193 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [return] ok 1194 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 1195 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 1196 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [return] ok 1197 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 1198 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 1199 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [return] ok 1200 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 1201 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 1202 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [return] ok 1203 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 1204 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 1205 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [return] ok 1206 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 1207 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [exception] ok 1208 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [return] ok 1209 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [variable] ok 1210 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [exception] ok 1211 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [return] ok 1212 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [variable] ok 1213 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [exception] ok 1214 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [return] ok 1215 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [variable] ok 1216 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 1217 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [return] ok 1218 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 1219 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 1220 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [return] ok 1221 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 1222 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 1223 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [return] ok 1224 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 1225 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 1226 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [return] ok 1227 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 1228 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 1229 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [return] ok 1230 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 1231 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 1232 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [return] ok 1233 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 1234 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [exception] ok 1235 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [return] ok 1236 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [variable] ok 1237 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [exception] ok 1238 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [return] ok 1239 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [variable] ok 1240 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [exception] ok 1241 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [return] ok 1242 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [variable] ok 1243 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 1244 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [return] ok 1245 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 1246 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 1247 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [return] ok 1248 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 1249 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 1250 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [return] ok 1251 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 1252 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 1253 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [return] ok 1254 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 1255 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 1256 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [return] ok 1257 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 1258 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 1259 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [return] ok 1260 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 1261 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [exception] ok 1262 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [return] ok 1263 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [variable] ok 1264 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [exception] ok 1265 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [return] ok 1266 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [variable] ok 1267 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [exception] ok 1268 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [return] ok 1269 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [variable] ok 1270 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 1271 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [return] ok 1272 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 1273 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 1274 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [return] ok 1275 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 1276 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 1277 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [return] ok 1278 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 1279 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 1280 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [return] ok 1281 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 1282 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 1283 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [return] ok 1284 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 1285 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 1286 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [return] ok 1287 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 1288 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [exception] ok 1289 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [return] ok 1290 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [variable] ok 1291 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [exception] ok 1292 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [return] ok 1293 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [variable] ok 1294 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [exception] ok 1295 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [return] ok 1296 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [variable] ok 1297 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 1298 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [return] ok 1299 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 1300 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 1301 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [return] ok 1302 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 1303 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 1304 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [return] ok 1305 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 1306 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 1307 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [return] ok 1308 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 1309 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 1310 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [return] ok 1311 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 1312 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 1313 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [return] ok 1314 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 1315 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [exception] ok 1316 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [return] ok 1317 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [variable] ok 1318 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [exception] ok 1319 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [return] ok 1320 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [variable] ok 1321 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [exception] ok 1322 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [return] ok 1323 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [variable] ok 1324 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [exception] ok 1325 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [return] ok 1326 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [variable] ok 1327 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [exception] ok 1328 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [return] ok 1329 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [variable] ok 1330 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [exception] ok 1331 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [return] ok 1332 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [variable] ok 1333 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [exception] ok 1334 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [return] ok 1335 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [variable] ok 1336 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [exception] ok 1337 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [return] ok 1338 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [variable] ok 1339 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [exception] ok 1340 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [return] ok 1341 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [variable] ok 1342 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [exception] ok 1343 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [return] ok 1344 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [variable] ok 1345 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [exception] ok 1346 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [return] ok 1347 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [variable] ok 1348 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [exception] ok 1349 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [return] ok 1350 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [variable] ok 1351 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [exception] ok 1352 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [return] ok 1353 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [variable] ok 1354 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [exception] ok 1355 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [return] ok 1356 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [variable] ok 1357 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [exception] ok 1358 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [return] ok 1359 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [variable] ok 1360 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [exception] ok 1361 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [return] ok 1362 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [variable] ok 1363 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [exception] ok 1364 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [return] ok 1365 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [variable] ok 1366 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [exception] ok 1367 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [return] ok 1368 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [variable] ok 1369 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [exception] ok 1370 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [return] ok 1371 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [variable] ok 1372 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [exception] ok 1373 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [return] ok 1374 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [variable] ok 1375 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [exception] ok 1376 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [return] ok 1377 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [variable] ok 1378 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [exception] ok 1379 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [return] ok 1380 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [variable] ok 1381 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [exception] ok 1382 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [return] ok 1383 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [variable] ok 1384 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [exception] ok 1385 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [return] ok 1386 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [variable] ok 1387 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [exception] ok 1388 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [return] ok 1389 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [variable] ok 1390 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [exception] ok 1391 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [return] ok 1392 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [variable] ok 1393 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [exception] ok 1394 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [return] ok 1395 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [variable] ok 1396 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [exception] ok 1397 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [return] ok 1398 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [variable] ok 1399 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [exception] ok 1400 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [return] ok 1401 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [variable] ok 1402 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [exception] ok 1403 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [return] ok 1404 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [variable] ok 1405 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1406 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1407 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1408 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1409 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1410 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1411 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1412 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1413 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1414 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1415 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1416 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1417 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1418 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1419 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1420 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1421 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1422 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1423 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1424 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1425 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1426 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1427 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1428 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1429 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1430 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1431 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1432 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1433 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1434 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1435 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1436 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1437 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1438 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1439 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1440 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1441 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1442 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1443 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1444 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1445 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1446 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1447 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1448 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1449 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1450 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1451 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1452 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1453 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1454 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1455 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1456 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1457 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1458 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1459 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1460 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1461 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1462 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1463 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1464 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1465 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1466 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1467 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1468 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1469 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1470 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1471 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1472 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1473 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1474 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1475 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1476 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1477 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1478 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1479 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1480 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1481 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1482 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1483 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1484 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1485 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1486 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1487 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1488 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1489 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1490 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1491 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1492 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1493 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1494 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1495 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1496 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1497 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1498 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1499 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1500 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1501 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1502 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1503 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1504 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1505 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1506 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1507 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1508 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1509 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1510 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1511 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1512 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1513 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1514 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1515 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1516 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1517 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1518 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1519 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1520 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1521 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1522 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1523 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1524 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1525 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1526 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1527 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1528 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1529 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1530 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1531 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1532 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1533 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1534 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1535 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1536 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1537 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1538 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1539 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1540 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1541 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1542 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1543 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1544 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1545 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1546 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1547 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1548 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1549 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1550 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1551 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1552 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1553 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1554 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1555 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1556 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1557 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1558 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1559 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1560 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1561 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1562 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1563 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1564 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1565 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1566 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1567 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1568 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1569 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1570 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1571 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1572 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1573 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1574 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1575 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1576 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1577 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1578 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1579 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1580 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1581 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1582 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1583 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1584 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1585 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1586 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1587 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1588 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1589 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1590 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1591 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1592 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1593 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1594 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1595 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1596 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1597 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1598 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1599 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1600 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1601 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1602 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1603 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1604 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1605 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1606 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1607 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1608 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1609 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1610 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1611 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1612 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1613 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1614 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1615 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1616 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1617 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1618 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1619 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1620 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1621 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1622 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1623 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1624 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1625 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1626 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1627 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1628 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1629 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1630 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1631 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1632 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1633 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1634 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1635 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1636 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1637 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1638 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1639 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1640 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1641 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1642 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1643 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1644 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1645 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1646 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1647 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1648 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1649 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 1650 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1651 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1652 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 1653 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1654 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1655 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 1656 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1657 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1658 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 1659 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1660 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1661 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 1662 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1663 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1664 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 1665 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1666 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1667 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 1668 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1669 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1670 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 1671 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1672 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1673 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 1674 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1675 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1676 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 1677 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1678 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1679 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 1680 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1681 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1682 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 1683 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1684 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1685 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 1686 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1687 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1688 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 1689 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1690 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1691 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 1692 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1693 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1694 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 1695 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1696 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1697 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 1698 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1699 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1700 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 1701 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1702 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1703 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 1704 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1705 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1706 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 1707 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1708 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1709 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 1710 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1711 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1712 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 1713 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1714 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1715 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 1716 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1717 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1718 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 1719 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1720 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1721 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 1722 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1723 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1724 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 1725 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1726 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1727 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 1728 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1729 - my $x; 1 for $x->[$N[0]]; () [exception] ok 1730 - my $x; 1 for $x->[$N[0]]; () [return] ok 1731 - my $x; 1 for $x->[$N[0]]; () [variable] ok 1732 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () [exception] ok 1733 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () [return] ok 1734 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () [variable] ok 1735 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () [exception] ok 1736 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () [return] ok 1737 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () [variable] ok 1738 - my $x; 1 for $$x[$N[0]]; () [exception] ok 1739 - my $x; 1 for $$x[$N[0]]; () [return] ok 1740 - my $x; 1 for $$x[$N[0]]; () [variable] ok 1741 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () [exception] ok 1742 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () [return] ok 1743 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () [variable] ok 1744 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () [exception] ok 1745 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () [return] ok 1746 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () [variable] ok 1747 - my @x; 1 for $x[$N[0]]; () [exception] ok 1748 - my @x; 1 for $x[$N[0]]; () [return] ok 1749 - my @x; 1 for $x[$N[0]]; () [variable] ok 1750 - our @x; local @x; use strict; 1 for $x[$N[0]]; () [exception] ok 1751 - our @x; local @x; use strict; 1 for $x[$N[0]]; () [return] ok 1752 - our @x; local @x; use strict; 1 for $x[$N[0]]; () [variable] ok 1753 - our @x; local @x; no strict; 1 for $x[$N[0]]; () [exception] ok 1754 - our @x; local @x; no strict; 1 for $x[$N[0]]; () [return] ok 1755 - our @x; local @x; no strict; 1 for $x[$N[0]]; () [variable] ok 1756 - my $x; 1 for $x->[$N[0]]; () [exception] ok 1757 - my $x; 1 for $x->[$N[0]]; () [return] ok 1758 - my $x; 1 for $x->[$N[0]]; () [variable] ok 1759 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () [exception] ok 1760 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () [return] ok 1761 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () [variable] ok 1762 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () [exception] ok 1763 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () [return] ok 1764 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () [variable] ok 1765 - my $x; 1 for $$x[$N[0]]; () [exception] ok 1766 - my $x; 1 for $$x[$N[0]]; () [return] ok 1767 - my $x; 1 for $$x[$N[0]]; () [variable] ok 1768 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () [exception] ok 1769 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () [return] ok 1770 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () [variable] ok 1771 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () [exception] ok 1772 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () [return] ok 1773 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () [variable] ok 1774 - my @x; 1 for $x[$N[0]]; () [exception] ok 1775 - my @x; 1 for $x[$N[0]]; () [return] ok 1776 - my @x; 1 for $x[$N[0]]; () [variable] ok 1777 - our @x; local @x; use strict; 1 for $x[$N[0]]; () [exception] ok 1778 - our @x; local @x; use strict; 1 for $x[$N[0]]; () [return] ok 1779 - our @x; local @x; use strict; 1 for $x[$N[0]]; () [variable] ok 1780 - our @x; local @x; no strict; 1 for $x[$N[0]]; () [exception] ok 1781 - our @x; local @x; no strict; 1 for $x[$N[0]]; () [return] ok 1782 - our @x; local @x; no strict; 1 for $x[$N[0]]; () [variable] ok 1783 - my $x; 1 for $x->[$N[0]]; () <+fetch> [exception] ok 1784 - my $x; 1 for $x->[$N[0]]; () <+fetch> [return] ok 1785 - my $x; 1 for $x->[$N[0]]; () <+fetch> [variable] ok 1786 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+fetch> [exception] ok 1787 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+fetch> [return] ok 1788 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+fetch> [variable] ok 1789 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+fetch> [exception] ok 1790 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+fetch> [return] ok 1791 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+fetch> [variable] ok 1792 - my $x; 1 for $$x[$N[0]]; () <+fetch> [exception] ok 1793 - my $x; 1 for $$x[$N[0]]; () <+fetch> [return] ok 1794 - my $x; 1 for $$x[$N[0]]; () <+fetch> [variable] ok 1795 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+fetch> [exception] ok 1796 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+fetch> [return] ok 1797 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+fetch> [variable] ok 1798 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+fetch> [exception] ok 1799 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+fetch> [return] ok 1800 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+fetch> [variable] ok 1801 - my @x; 1 for $x[$N[0]]; () <+fetch> [exception] ok 1802 - my @x; 1 for $x[$N[0]]; () <+fetch> [return] ok 1803 - my @x; 1 for $x[$N[0]]; () <+fetch> [variable] ok 1804 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+fetch> [exception] ok 1805 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+fetch> [return] ok 1806 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+fetch> [variable] ok 1807 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+fetch> [exception] ok 1808 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+fetch> [return] ok 1809 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+fetch> [variable] ok 1810 - my $x; 1 for $x->[$N[0]]; () <+exists> [exception] ok 1811 - my $x; 1 for $x->[$N[0]]; () <+exists> [return] ok 1812 - my $x; 1 for $x->[$N[0]]; () <+exists> [variable] ok 1813 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+exists> [exception] ok 1814 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+exists> [return] ok 1815 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+exists> [variable] ok 1816 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+exists> [exception] ok 1817 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+exists> [return] ok 1818 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+exists> [variable] ok 1819 - my $x; 1 for $$x[$N[0]]; () <+exists> [exception] ok 1820 - my $x; 1 for $$x[$N[0]]; () <+exists> [return] ok 1821 - my $x; 1 for $$x[$N[0]]; () <+exists> [variable] ok 1822 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+exists> [exception] ok 1823 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+exists> [return] ok 1824 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+exists> [variable] ok 1825 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+exists> [exception] ok 1826 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+exists> [return] ok 1827 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+exists> [variable] ok 1828 - my @x; 1 for $x[$N[0]]; () <+exists> [exception] ok 1829 - my @x; 1 for $x[$N[0]]; () <+exists> [return] ok 1830 - my @x; 1 for $x[$N[0]]; () <+exists> [variable] ok 1831 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+exists> [exception] ok 1832 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+exists> [return] ok 1833 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+exists> [variable] ok 1834 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+exists> [exception] ok 1835 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+exists> [return] ok 1836 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+exists> [variable] ok 1837 - my $x; 1 for $x->[$N[0]]; () <+delete> [exception] ok 1838 - my $x; 1 for $x->[$N[0]]; () <+delete> [return] ok 1839 - my $x; 1 for $x->[$N[0]]; () <+delete> [variable] ok 1840 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+delete> [exception] ok 1841 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+delete> [return] ok 1842 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+delete> [variable] ok 1843 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+delete> [exception] ok 1844 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+delete> [return] ok 1845 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+delete> [variable] ok 1846 - my $x; 1 for $$x[$N[0]]; () <+delete> [exception] ok 1847 - my $x; 1 for $$x[$N[0]]; () <+delete> [return] ok 1848 - my $x; 1 for $$x[$N[0]]; () <+delete> [variable] ok 1849 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+delete> [exception] ok 1850 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+delete> [return] ok 1851 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+delete> [variable] ok 1852 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+delete> [exception] ok 1853 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+delete> [return] ok 1854 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+delete> [variable] ok 1855 - my @x; 1 for $x[$N[0]]; () <+delete> [exception] ok 1856 - my @x; 1 for $x[$N[0]]; () <+delete> [return] ok 1857 - my @x; 1 for $x[$N[0]]; () <+delete> [variable] ok 1858 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+delete> [exception] ok 1859 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+delete> [return] ok 1860 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+delete> [variable] ok 1861 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+delete> [exception] ok 1862 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+delete> [return] ok 1863 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+delete> [variable] ok 1864 - my $x; 1 for $x->[$N[0]]; () <+store> [exception] ok 1865 - my $x; 1 for $x->[$N[0]]; () <+store> [return] ok 1866 - my $x; 1 for $x->[$N[0]]; () <+store> [variable] ok 1867 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+store> [exception] ok 1868 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+store> [return] ok 1869 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+store> [variable] ok 1870 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+store> [exception] ok 1871 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+store> [return] ok 1872 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+store> [variable] ok 1873 - my $x; 1 for $$x[$N[0]]; () <+store> [exception] ok 1874 - my $x; 1 for $$x[$N[0]]; () <+store> [return] ok 1875 - my $x; 1 for $$x[$N[0]]; () <+store> [variable] ok 1876 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+store> [exception] ok 1877 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+store> [return] ok 1878 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+store> [variable] ok 1879 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+store> [exception] ok 1880 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+store> [return] ok 1881 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+store> [variable] ok 1882 - my @x; 1 <+store> [exception] ok 1883 - my @x; 1 <+store> [return] ok 1884 - my @x; 1 <+store> [variable] ok 1885 - our @x; local @x; use strict; 1 <+store> [exception] ok 1886 - our @x; local @x; use strict; 1 <+store> [return] ok 1887 - our @x; local @x; use strict; 1 <+store> [variable] ok 1888 - our @x; local @x; no strict; 1 <+store> [exception] ok 1889 - our @x; local @x; no strict; 1 <+store> [return] ok 1890 - our @x; local @x; no strict; 1 <+store> [variable] ok 1891 - my $x; $_ = 1 for $x->[$N[0]]; () [exception] ok 1892 - my $x; $_ = 1 for $x->[$N[0]]; () [return] ok 1893 - my $x; $_ = 1 for $x->[$N[0]]; () [variable] ok 1894 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () [exception] ok 1895 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () [return] ok 1896 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () [variable] ok 1897 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () [exception] ok 1898 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () [return] ok 1899 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () [variable] ok 1900 - my $x; $_ = 1 for $$x[$N[0]]; () [exception] ok 1901 - my $x; $_ = 1 for $$x[$N[0]]; () [return] ok 1902 - my $x; $_ = 1 for $$x[$N[0]]; () [variable] ok 1903 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () [exception] ok 1904 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () [return] ok 1905 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () [variable] ok 1906 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () [exception] ok 1907 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () [return] ok 1908 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () [variable] ok 1909 - my @x; $_ = 1 for $x[$N[0]]; () [exception] ok 1910 - my @x; $_ = 1 for $x[$N[0]]; () [return] ok 1911 - my @x; $_ = 1 for $x[$N[0]]; () [variable] ok 1912 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () [exception] ok 1913 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () [return] ok 1914 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () [variable] ok 1915 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () [exception] ok 1916 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () [return] ok 1917 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () [variable] ok 1918 - my $x; $_ = 1 for $x->[$N[0]]; () [exception] ok 1919 - my $x; $_ = 1 for $x->[$N[0]]; () [return] ok 1920 - my $x; $_ = 1 for $x->[$N[0]]; () [variable] ok 1921 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () [exception] ok 1922 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () [return] ok 1923 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () [variable] ok 1924 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () [exception] ok 1925 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () [return] ok 1926 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () [variable] ok 1927 - my $x; $_ = 1 for $$x[$N[0]]; () [exception] ok 1928 - my $x; $_ = 1 for $$x[$N[0]]; () [return] ok 1929 - my $x; $_ = 1 for $$x[$N[0]]; () [variable] ok 1930 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () [exception] ok 1931 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () [return] ok 1932 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () [variable] ok 1933 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () [exception] ok 1934 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () [return] ok 1935 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () [variable] ok 1936 - my @x; $_ = 1 for $x[$N[0]]; () [exception] ok 1937 - my @x; $_ = 1 for $x[$N[0]]; () [return] ok 1938 - my @x; $_ = 1 for $x[$N[0]]; () [variable] ok 1939 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () [exception] ok 1940 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () [return] ok 1941 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () [variable] ok 1942 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () [exception] ok 1943 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () [return] ok 1944 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () [variable] ok 1945 - my $x; $_ = 1 for $x->[$N[0]]; () <+fetch> [exception] ok 1946 - my $x; $_ = 1 for $x->[$N[0]]; () <+fetch> [return] ok 1947 - my $x; $_ = 1 for $x->[$N[0]]; () <+fetch> [variable] ok 1948 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+fetch> [exception] ok 1949 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+fetch> [return] ok 1950 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+fetch> [variable] ok 1951 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+fetch> [exception] ok 1952 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+fetch> [return] ok 1953 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+fetch> [variable] ok 1954 - my $x; $_ = 1 for $$x[$N[0]]; () <+fetch> [exception] ok 1955 - my $x; $_ = 1 for $$x[$N[0]]; () <+fetch> [return] ok 1956 - my $x; $_ = 1 for $$x[$N[0]]; () <+fetch> [variable] ok 1957 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+fetch> [exception] ok 1958 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+fetch> [return] ok 1959 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+fetch> [variable] ok 1960 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+fetch> [exception] ok 1961 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+fetch> [return] ok 1962 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+fetch> [variable] ok 1963 - my @x; $_ = 1 for $x[$N[0]]; () <+fetch> [exception] ok 1964 - my @x; $_ = 1 for $x[$N[0]]; () <+fetch> [return] ok 1965 - my @x; $_ = 1 for $x[$N[0]]; () <+fetch> [variable] ok 1966 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+fetch> [exception] ok 1967 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+fetch> [return] ok 1968 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+fetch> [variable] ok 1969 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+fetch> [exception] ok 1970 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+fetch> [return] ok 1971 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+fetch> [variable] ok 1972 - my $x; $_ = 1 for $x->[$N[0]]; () <+exists> [exception] ok 1973 - my $x; $_ = 1 for $x->[$N[0]]; () <+exists> [return] ok 1974 - my $x; $_ = 1 for $x->[$N[0]]; () <+exists> [variable] ok 1975 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+exists> [exception] ok 1976 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+exists> [return] ok 1977 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+exists> [variable] ok 1978 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+exists> [exception] ok 1979 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+exists> [return] ok 1980 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+exists> [variable] ok 1981 - my $x; $_ = 1 for $$x[$N[0]]; () <+exists> [exception] ok 1982 - my $x; $_ = 1 for $$x[$N[0]]; () <+exists> [return] ok 1983 - my $x; $_ = 1 for $$x[$N[0]]; () <+exists> [variable] ok 1984 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+exists> [exception] ok 1985 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+exists> [return] ok 1986 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+exists> [variable] ok 1987 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+exists> [exception] ok 1988 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+exists> [return] ok 1989 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+exists> [variable] ok 1990 - my @x; $_ = 1 for $x[$N[0]]; () <+exists> [exception] ok 1991 - my @x; $_ = 1 for $x[$N[0]]; () <+exists> [return] ok 1992 - my @x; $_ = 1 for $x[$N[0]]; () <+exists> [variable] ok 1993 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+exists> [exception] ok 1994 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+exists> [return] ok 1995 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+exists> [variable] ok 1996 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+exists> [exception] ok 1997 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+exists> [return] ok 1998 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+exists> [variable] ok 1999 - my $x; $_ = 1 for $x->[$N[0]]; () <+delete> [exception] ok 2000 - my $x; $_ = 1 for $x->[$N[0]]; () <+delete> [return] ok 2001 - my $x; $_ = 1 for $x->[$N[0]]; () <+delete> [variable] ok 2002 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+delete> [exception] ok 2003 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+delete> [return] ok 2004 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+delete> [variable] ok 2005 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+delete> [exception] ok 2006 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+delete> [return] ok 2007 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+delete> [variable] ok 2008 - my $x; $_ = 1 for $$x[$N[0]]; () <+delete> [exception] ok 2009 - my $x; $_ = 1 for $$x[$N[0]]; () <+delete> [return] ok 2010 - my $x; $_ = 1 for $$x[$N[0]]; () <+delete> [variable] ok 2011 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+delete> [exception] ok 2012 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+delete> [return] ok 2013 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+delete> [variable] ok 2014 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+delete> [exception] ok 2015 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+delete> [return] ok 2016 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+delete> [variable] ok 2017 - my @x; $_ = 1 for $x[$N[0]]; () <+delete> [exception] ok 2018 - my @x; $_ = 1 for $x[$N[0]]; () <+delete> [return] ok 2019 - my @x; $_ = 1 for $x[$N[0]]; () <+delete> [variable] ok 2020 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+delete> [exception] ok 2021 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+delete> [return] ok 2022 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+delete> [variable] ok 2023 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+delete> [exception] ok 2024 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+delete> [return] ok 2025 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+delete> [variable] ok 2026 - my $x; $_ = 1 for $x->[$N[0]]; () <+store> [exception] ok 2027 - my $x; $_ = 1 for $x->[$N[0]]; () <+store> [return] ok 2028 - my $x; $_ = 1 for $x->[$N[0]]; () <+store> [variable] ok 2029 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+store> [exception] ok 2030 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+store> [return] ok 2031 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+store> [variable] ok 2032 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+store> [exception] ok 2033 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+store> [return] ok 2034 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+store> [variable] ok 2035 - my $x; $_ = 1 for $$x[$N[0]]; () <+store> [exception] ok 2036 - my $x; $_ = 1 for $$x[$N[0]]; () <+store> [return] ok 2037 - my $x; $_ = 1 for $$x[$N[0]]; () <+store> [variable] ok 2038 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+store> [exception] ok 2039 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+store> [return] ok 2040 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+store> [variable] ok 2041 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+store> [exception] ok 2042 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+store> [return] ok 2043 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+store> [variable] ok 2044 - my @x; 1 <+store> [exception] ok 2045 - my @x; 1 <+store> [return] ok 2046 - my @x; 1 <+store> [variable] ok 2047 - our @x; local @x; use strict; 1 <+store> [exception] ok 2048 - our @x; local @x; use strict; 1 <+store> [return] ok 2049 - our @x; local @x; use strict; 1 <+store> [variable] ok 2050 - our @x; local @x; no strict; 1 <+store> [exception] ok 2051 - our @x; local @x; no strict; 1 <+store> [return] ok 2052 - our @x; local @x; no strict; 1 <+store> [variable] ok 2053 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [exception] ok 2054 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [return] ok 2055 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [variable] ok 2056 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [exception] ok 2057 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [return] ok 2058 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [variable] ok 2059 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [exception] ok 2060 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [return] ok 2061 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [variable] ok 2062 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [exception] ok 2063 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [return] ok 2064 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [variable] ok 2065 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [exception] ok 2066 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [return] ok 2067 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [variable] ok 2068 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [exception] ok 2069 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [return] ok 2070 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [variable] ok 2071 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [exception] ok 2072 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [return] ok 2073 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [variable] ok 2074 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [exception] ok 2075 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [return] ok 2076 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [variable] ok 2077 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [exception] ok 2078 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [return] ok 2079 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [variable] ok 2080 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [exception] ok 2081 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [return] ok 2082 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [variable] ok 2083 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [exception] ok 2084 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [return] ok 2085 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [variable] ok 2086 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [exception] ok 2087 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [return] ok 2088 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [variable] ok 2089 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [exception] ok 2090 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [return] ok 2091 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [variable] ok 2092 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [exception] ok 2093 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [return] ok 2094 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [variable] ok 2095 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [exception] ok 2096 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [return] ok 2097 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [variable] ok 2098 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [exception] ok 2099 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [return] ok 2100 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [variable] ok 2101 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [exception] ok 2102 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [return] ok 2103 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [variable] ok 2104 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [exception] ok 2105 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [return] ok 2106 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [variable] ok 2107 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [exception] ok 2108 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [return] ok 2109 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [variable] ok 2110 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [exception] ok 2111 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [return] ok 2112 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [variable] ok 2113 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [exception] ok 2114 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [return] ok 2115 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [variable] ok 2116 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [exception] ok 2117 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [return] ok 2118 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [variable] ok 2119 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [exception] ok 2120 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [return] ok 2121 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [variable] ok 2122 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [exception] ok 2123 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [return] ok 2124 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [variable] ok 2125 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [exception] ok 2126 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [return] ok 2127 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [variable] ok 2128 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [exception] ok 2129 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [return] ok 2130 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [variable] ok 2131 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [exception] ok 2132 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [return] ok 2133 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [variable] ok 2134 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [exception] ok 2135 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [return] ok 2136 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [variable] ok 2137 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [exception] ok 2138 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [return] ok 2139 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [variable] ok 2140 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [exception] ok 2141 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [return] ok 2142 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [variable] ok 2143 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [exception] ok 2144 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [return] ok 2145 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [variable] ok 2146 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [exception] ok 2147 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [return] ok 2148 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [variable] ok 2149 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [exception] ok 2150 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [return] ok 2151 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [variable] ok 2152 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [exception] ok 2153 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [return] ok 2154 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [variable] ok 2155 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [exception] ok 2156 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [return] ok 2157 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [variable] ok 2158 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [exception] ok 2159 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [return] ok 2160 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [variable] ok 2161 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [exception] ok 2162 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [return] ok 2163 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [variable] ok 2164 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [exception] ok 2165 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [return] ok 2166 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [variable] ok 2167 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [exception] ok 2168 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [return] ok 2169 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [variable] ok 2170 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [exception] ok 2171 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [return] ok 2172 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [variable] ok 2173 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [exception] ok 2174 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [return] ok 2175 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [variable] ok 2176 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [exception] ok 2177 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [return] ok 2178 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [variable] ok 2179 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [exception] ok 2180 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [return] ok 2181 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [variable] ok 2182 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [exception] ok 2183 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [return] ok 2184 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [variable] ok 2185 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [exception] ok 2186 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [return] ok 2187 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [variable] ok 2188 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [exception] ok 2189 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [return] ok 2190 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [variable] ok 2191 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [exception] ok 2192 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [return] ok 2193 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [variable] ok 2194 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [exception] ok 2195 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [return] ok 2196 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [variable] ok 2197 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [exception] ok 2198 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [return] ok 2199 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [variable] ok 2200 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [exception] ok 2201 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [return] ok 2202 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [variable] ok 2203 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [exception] ok 2204 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [return] ok 2205 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [variable] ok 2206 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [exception] ok 2207 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [return] ok 2208 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [variable] ok 2209 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [exception] ok 2210 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [return] ok 2211 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [variable] ok 2212 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [exception] ok 2213 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [return] ok 2214 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [variable] ok 2215 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [exception] ok 2216 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [return] ok 2217 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [variable] ok 2218 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [exception] ok 2219 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [return] ok 2220 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [variable] ok 2221 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [exception] ok 2222 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [return] ok 2223 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [variable] ok 2224 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [exception] ok 2225 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [return] ok 2226 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [variable] ok 2227 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [exception] ok 2228 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [return] ok 2229 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [variable] ok 2230 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [exception] ok 2231 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [return] ok 2232 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [variable] ok 2233 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [exception] ok 2234 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [return] ok 2235 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [variable] ok 2236 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [exception] ok 2237 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [return] ok 2238 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [variable] ok 2239 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [exception] ok 2240 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [return] ok 2241 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [variable] ok 2242 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [exception] ok 2243 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [return] ok 2244 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [variable] ok 2245 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [exception] ok 2246 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [return] ok 2247 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [variable] ok 2248 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [exception] ok 2249 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [return] ok 2250 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [variable] ok 2251 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [exception] ok 2252 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [return] ok 2253 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [variable] ok 2254 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [exception] ok 2255 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [return] ok 2256 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [variable] ok 2257 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [exception] ok 2258 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [return] ok 2259 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [variable] ok 2260 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [exception] ok 2261 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [return] ok 2262 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [variable] ok 2263 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [exception] ok 2264 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [return] ok 2265 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [variable] ok 2266 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [exception] ok 2267 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [return] ok 2268 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [variable] ok 2269 - my $x; do_nothing($x->[$N[0]]); () [exception] ok 2270 - my $x; do_nothing($x->[$N[0]]); () [return] ok 2271 - my $x; do_nothing($x->[$N[0]]); () [variable] ok 2272 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () [exception] ok 2273 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () [return] ok 2274 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () [variable] ok 2275 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () [exception] ok 2276 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () [return] ok 2277 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () [variable] ok 2278 - my $x; do_nothing($$x[$N[0]]); () [exception] ok 2279 - my $x; do_nothing($$x[$N[0]]); () [return] ok 2280 - my $x; do_nothing($$x[$N[0]]); () [variable] ok 2281 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () [exception] ok 2282 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () [return] ok 2283 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () [variable] ok 2284 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () [exception] ok 2285 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () [return] ok 2286 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () [variable] ok 2287 - my @x; do_nothing($x[$N[0]]); () [exception] ok 2288 - my @x; do_nothing($x[$N[0]]); () [return] ok 2289 - my @x; do_nothing($x[$N[0]]); () [variable] ok 2290 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () [exception] ok 2291 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () [return] ok 2292 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () [variable] ok 2293 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () [exception] ok 2294 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () [return] ok 2295 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () [variable] ok 2296 - my $x; do_nothing($x->[$N[0]]); () [exception] ok 2297 - my $x; do_nothing($x->[$N[0]]); () [return] ok 2298 - my $x; do_nothing($x->[$N[0]]); () [variable] ok 2299 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () [exception] ok 2300 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () [return] ok 2301 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () [variable] ok 2302 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () [exception] ok 2303 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () [return] ok 2304 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () [variable] ok 2305 - my $x; do_nothing($$x[$N[0]]); () [exception] ok 2306 - my $x; do_nothing($$x[$N[0]]); () [return] ok 2307 - my $x; do_nothing($$x[$N[0]]); () [variable] ok 2308 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () [exception] ok 2309 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () [return] ok 2310 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () [variable] ok 2311 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () [exception] ok 2312 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () [return] ok 2313 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () [variable] ok 2314 - my @x; do_nothing($x[$N[0]]); () [exception] ok 2315 - my @x; do_nothing($x[$N[0]]); () [return] ok 2316 - my @x; do_nothing($x[$N[0]]); () [variable] ok 2317 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () [exception] ok 2318 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () [return] ok 2319 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () [variable] ok 2320 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () [exception] ok 2321 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () [return] ok 2322 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () [variable] ok 2323 - my $x; do_nothing($x->[$N[0]]); () <+fetch> [exception] ok 2324 - my $x; do_nothing($x->[$N[0]]); () <+fetch> [return] ok 2325 - my $x; do_nothing($x->[$N[0]]); () <+fetch> [variable] ok 2326 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+fetch> [exception] ok 2327 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+fetch> [return] ok 2328 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+fetch> [variable] ok 2329 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+fetch> [exception] ok 2330 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+fetch> [return] ok 2331 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+fetch> [variable] ok 2332 - my $x; do_nothing($$x[$N[0]]); () <+fetch> [exception] ok 2333 - my $x; do_nothing($$x[$N[0]]); () <+fetch> [return] ok 2334 - my $x; do_nothing($$x[$N[0]]); () <+fetch> [variable] ok 2335 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+fetch> [exception] ok 2336 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+fetch> [return] ok 2337 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+fetch> [variable] ok 2338 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+fetch> [exception] ok 2339 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+fetch> [return] ok 2340 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+fetch> [variable] ok 2341 - my @x; do_nothing($x[$N[0]]); () <+fetch> [exception] ok 2342 - my @x; do_nothing($x[$N[0]]); () <+fetch> [return] ok 2343 - my @x; do_nothing($x[$N[0]]); () <+fetch> [variable] ok 2344 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+fetch> [exception] ok 2345 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+fetch> [return] ok 2346 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+fetch> [variable] ok 2347 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+fetch> [exception] ok 2348 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+fetch> [return] ok 2349 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+fetch> [variable] ok 2350 - my $x; do_nothing($x->[$N[0]]); () <+exists> [exception] ok 2351 - my $x; do_nothing($x->[$N[0]]); () <+exists> [return] ok 2352 - my $x; do_nothing($x->[$N[0]]); () <+exists> [variable] ok 2353 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+exists> [exception] ok 2354 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+exists> [return] ok 2355 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+exists> [variable] ok 2356 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+exists> [exception] ok 2357 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+exists> [return] ok 2358 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+exists> [variable] ok 2359 - my $x; do_nothing($$x[$N[0]]); () <+exists> [exception] ok 2360 - my $x; do_nothing($$x[$N[0]]); () <+exists> [return] ok 2361 - my $x; do_nothing($$x[$N[0]]); () <+exists> [variable] ok 2362 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+exists> [exception] ok 2363 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+exists> [return] ok 2364 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+exists> [variable] ok 2365 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+exists> [exception] ok 2366 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+exists> [return] ok 2367 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+exists> [variable] ok 2368 - my @x; do_nothing($x[$N[0]]); () <+exists> [exception] ok 2369 - my @x; do_nothing($x[$N[0]]); () <+exists> [return] ok 2370 - my @x; do_nothing($x[$N[0]]); () <+exists> [variable] ok 2371 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+exists> [exception] ok 2372 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+exists> [return] ok 2373 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+exists> [variable] ok 2374 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+exists> [exception] ok 2375 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+exists> [return] ok 2376 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+exists> [variable] ok 2377 - my $x; do_nothing($x->[$N[0]]); () <+delete> [exception] ok 2378 - my $x; do_nothing($x->[$N[0]]); () <+delete> [return] ok 2379 - my $x; do_nothing($x->[$N[0]]); () <+delete> [variable] ok 2380 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+delete> [exception] ok 2381 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+delete> [return] ok 2382 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+delete> [variable] ok 2383 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+delete> [exception] ok 2384 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+delete> [return] ok 2385 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+delete> [variable] ok 2386 - my $x; do_nothing($$x[$N[0]]); () <+delete> [exception] ok 2387 - my $x; do_nothing($$x[$N[0]]); () <+delete> [return] ok 2388 - my $x; do_nothing($$x[$N[0]]); () <+delete> [variable] ok 2389 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+delete> [exception] ok 2390 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+delete> [return] ok 2391 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+delete> [variable] ok 2392 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+delete> [exception] ok 2393 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+delete> [return] ok 2394 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+delete> [variable] ok 2395 - my @x; do_nothing($x[$N[0]]); () <+delete> [exception] ok 2396 - my @x; do_nothing($x[$N[0]]); () <+delete> [return] ok 2397 - my @x; do_nothing($x[$N[0]]); () <+delete> [variable] ok 2398 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+delete> [exception] ok 2399 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+delete> [return] ok 2400 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+delete> [variable] ok 2401 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+delete> [exception] ok 2402 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+delete> [return] ok 2403 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+delete> [variable] ok 2404 - my $x; do_nothing($x->[$N[0]]); () <+store> [exception] ok 2405 - my $x; do_nothing($x->[$N[0]]); () <+store> [return] ok 2406 - my $x; do_nothing($x->[$N[0]]); () <+store> [variable] ok 2407 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+store> [exception] ok 2408 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+store> [return] ok 2409 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+store> [variable] ok 2410 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+store> [exception] ok 2411 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+store> [return] ok 2412 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+store> [variable] ok 2413 - my $x; do_nothing($$x[$N[0]]); () <+store> [exception] ok 2414 - my $x; do_nothing($$x[$N[0]]); () <+store> [return] ok 2415 - my $x; do_nothing($$x[$N[0]]); () <+store> [variable] ok 2416 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+store> [exception] ok 2417 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+store> [return] ok 2418 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+store> [variable] ok 2419 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+store> [exception] ok 2420 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+store> [return] ok 2421 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+store> [variable] ok 2422 - my @x; 1 <+store> [exception] ok 2423 - my @x; 1 <+store> [return] ok 2424 - my @x; 1 <+store> [variable] ok 2425 - our @x; local @x; use strict; 1 <+store> [exception] ok 2426 - our @x; local @x; use strict; 1 <+store> [return] ok 2427 - our @x; local @x; use strict; 1 <+store> [variable] ok 2428 - our @x; local @x; no strict; 1 <+store> [exception] ok 2429 - our @x; local @x; no strict; 1 <+store> [return] ok 2430 - our @x; local @x; no strict; 1 <+store> [variable] ok 2431 - my $x; set_arg($x->[$N[0]]); () [exception] ok 2432 - my $x; set_arg($x->[$N[0]]); () [return] ok 2433 - my $x; set_arg($x->[$N[0]]); () [variable] ok 2434 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () [exception] ok 2435 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () [return] ok 2436 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () [variable] ok 2437 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () [exception] ok 2438 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () [return] ok 2439 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () [variable] ok 2440 - my $x; set_arg($$x[$N[0]]); () [exception] ok 2441 - my $x; set_arg($$x[$N[0]]); () [return] ok 2442 - my $x; set_arg($$x[$N[0]]); () [variable] ok 2443 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () [exception] ok 2444 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () [return] ok 2445 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () [variable] ok 2446 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () [exception] ok 2447 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () [return] ok 2448 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () [variable] ok 2449 - my @x; set_arg($x[$N[0]]); () [exception] ok 2450 - my @x; set_arg($x[$N[0]]); () [return] ok 2451 - my @x; set_arg($x[$N[0]]); () [variable] ok 2452 - our @x; local @x; use strict; set_arg($x[$N[0]]); () [exception] ok 2453 - our @x; local @x; use strict; set_arg($x[$N[0]]); () [return] ok 2454 - our @x; local @x; use strict; set_arg($x[$N[0]]); () [variable] ok 2455 - our @x; local @x; no strict; set_arg($x[$N[0]]); () [exception] ok 2456 - our @x; local @x; no strict; set_arg($x[$N[0]]); () [return] ok 2457 - our @x; local @x; no strict; set_arg($x[$N[0]]); () [variable] ok 2458 - my $x; set_arg($x->[$N[0]]); () [exception] ok 2459 - my $x; set_arg($x->[$N[0]]); () [return] ok 2460 - my $x; set_arg($x->[$N[0]]); () [variable] ok 2461 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () [exception] ok 2462 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () [return] ok 2463 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () [variable] ok 2464 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () [exception] ok 2465 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () [return] ok 2466 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () [variable] ok 2467 - my $x; set_arg($$x[$N[0]]); () [exception] ok 2468 - my $x; set_arg($$x[$N[0]]); () [return] ok 2469 - my $x; set_arg($$x[$N[0]]); () [variable] ok 2470 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () [exception] ok 2471 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () [return] ok 2472 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () [variable] ok 2473 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () [exception] ok 2474 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () [return] ok 2475 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () [variable] ok 2476 - my @x; set_arg($x[$N[0]]); () [exception] ok 2477 - my @x; set_arg($x[$N[0]]); () [return] ok 2478 - my @x; set_arg($x[$N[0]]); () [variable] ok 2479 - our @x; local @x; use strict; set_arg($x[$N[0]]); () [exception] ok 2480 - our @x; local @x; use strict; set_arg($x[$N[0]]); () [return] ok 2481 - our @x; local @x; use strict; set_arg($x[$N[0]]); () [variable] ok 2482 - our @x; local @x; no strict; set_arg($x[$N[0]]); () [exception] ok 2483 - our @x; local @x; no strict; set_arg($x[$N[0]]); () [return] ok 2484 - our @x; local @x; no strict; set_arg($x[$N[0]]); () [variable] ok 2485 - my $x; set_arg($x->[$N[0]]); () <+fetch> [exception] ok 2486 - my $x; set_arg($x->[$N[0]]); () <+fetch> [return] ok 2487 - my $x; set_arg($x->[$N[0]]); () <+fetch> [variable] ok 2488 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+fetch> [exception] ok 2489 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+fetch> [return] ok 2490 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+fetch> [variable] ok 2491 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+fetch> [exception] ok 2492 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+fetch> [return] ok 2493 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+fetch> [variable] ok 2494 - my $x; set_arg($$x[$N[0]]); () <+fetch> [exception] ok 2495 - my $x; set_arg($$x[$N[0]]); () <+fetch> [return] ok 2496 - my $x; set_arg($$x[$N[0]]); () <+fetch> [variable] ok 2497 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+fetch> [exception] ok 2498 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+fetch> [return] ok 2499 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+fetch> [variable] ok 2500 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+fetch> [exception] ok 2501 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+fetch> [return] ok 2502 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+fetch> [variable] ok 2503 - my @x; set_arg($x[$N[0]]); () <+fetch> [exception] ok 2504 - my @x; set_arg($x[$N[0]]); () <+fetch> [return] ok 2505 - my @x; set_arg($x[$N[0]]); () <+fetch> [variable] ok 2506 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+fetch> [exception] ok 2507 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+fetch> [return] ok 2508 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+fetch> [variable] ok 2509 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+fetch> [exception] ok 2510 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+fetch> [return] ok 2511 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+fetch> [variable] ok 2512 - my $x; set_arg($x->[$N[0]]); () <+exists> [exception] ok 2513 - my $x; set_arg($x->[$N[0]]); () <+exists> [return] ok 2514 - my $x; set_arg($x->[$N[0]]); () <+exists> [variable] ok 2515 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+exists> [exception] ok 2516 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+exists> [return] ok 2517 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+exists> [variable] ok 2518 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+exists> [exception] ok 2519 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+exists> [return] ok 2520 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+exists> [variable] ok 2521 - my $x; set_arg($$x[$N[0]]); () <+exists> [exception] ok 2522 - my $x; set_arg($$x[$N[0]]); () <+exists> [return] ok 2523 - my $x; set_arg($$x[$N[0]]); () <+exists> [variable] ok 2524 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+exists> [exception] ok 2525 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+exists> [return] ok 2526 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+exists> [variable] ok 2527 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+exists> [exception] ok 2528 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+exists> [return] ok 2529 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+exists> [variable] ok 2530 - my @x; set_arg($x[$N[0]]); () <+exists> [exception] ok 2531 - my @x; set_arg($x[$N[0]]); () <+exists> [return] ok 2532 - my @x; set_arg($x[$N[0]]); () <+exists> [variable] ok 2533 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+exists> [exception] ok 2534 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+exists> [return] ok 2535 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+exists> [variable] ok 2536 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+exists> [exception] ok 2537 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+exists> [return] ok 2538 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+exists> [variable] ok 2539 - my $x; set_arg($x->[$N[0]]); () <+delete> [exception] ok 2540 - my $x; set_arg($x->[$N[0]]); () <+delete> [return] ok 2541 - my $x; set_arg($x->[$N[0]]); () <+delete> [variable] ok 2542 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+delete> [exception] ok 2543 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+delete> [return] ok 2544 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+delete> [variable] ok 2545 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+delete> [exception] ok 2546 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+delete> [return] ok 2547 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+delete> [variable] ok 2548 - my $x; set_arg($$x[$N[0]]); () <+delete> [exception] ok 2549 - my $x; set_arg($$x[$N[0]]); () <+delete> [return] ok 2550 - my $x; set_arg($$x[$N[0]]); () <+delete> [variable] ok 2551 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+delete> [exception] ok 2552 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+delete> [return] ok 2553 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+delete> [variable] ok 2554 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+delete> [exception] ok 2555 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+delete> [return] ok 2556 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+delete> [variable] ok 2557 - my @x; set_arg($x[$N[0]]); () <+delete> [exception] ok 2558 - my @x; set_arg($x[$N[0]]); () <+delete> [return] ok 2559 - my @x; set_arg($x[$N[0]]); () <+delete> [variable] ok 2560 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+delete> [exception] ok 2561 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+delete> [return] ok 2562 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+delete> [variable] ok 2563 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+delete> [exception] ok 2564 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+delete> [return] ok 2565 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+delete> [variable] ok 2566 - my $x; set_arg($x->[$N[0]]); () <+store> [exception] ok 2567 - my $x; set_arg($x->[$N[0]]); () <+store> [return] ok 2568 - my $x; set_arg($x->[$N[0]]); () <+store> [variable] ok 2569 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+store> [exception] ok 2570 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+store> [return] ok 2571 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+store> [variable] ok 2572 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+store> [exception] ok 2573 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+store> [return] ok 2574 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+store> [variable] ok 2575 - my $x; set_arg($$x[$N[0]]); () <+store> [exception] ok 2576 - my $x; set_arg($$x[$N[0]]); () <+store> [return] ok 2577 - my $x; set_arg($$x[$N[0]]); () <+store> [variable] ok 2578 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+store> [exception] ok 2579 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+store> [return] ok 2580 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+store> [variable] ok 2581 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+store> [exception] ok 2582 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+store> [return] ok 2583 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+store> [variable] ok 2584 - my @x; 1 <+store> [exception] ok 2585 - my @x; 1 <+store> [return] ok 2586 - my @x; 1 <+store> [variable] ok 2587 - our @x; local @x; use strict; 1 <+store> [exception] ok 2588 - our @x; local @x; use strict; 1 <+store> [return] ok 2589 - our @x; local @x; use strict; 1 <+store> [variable] ok 2590 - our @x; local @x; no strict; 1 <+store> [exception] ok 2591 - our @x; local @x; no strict; 1 <+store> [return] ok 2592 - our @x; local @x; no strict; 1 <+store> [variable] ok 2593 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2594 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2595 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2596 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2597 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2598 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2599 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2600 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2601 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2602 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2603 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2604 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2605 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2606 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2607 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2608 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2609 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2610 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2611 - my @x; 1 [exception] ok 2612 - my @x; 1 [return] ok 2613 - my @x; 1 [variable] ok 2614 - our @x; local @x; use strict; 1 [exception] ok 2615 - our @x; local @x; use strict; 1 [return] ok 2616 - our @x; local @x; use strict; 1 [variable] ok 2617 - our @x; local @x; no strict; 1 [exception] ok 2618 - our @x; local @x; no strict; 1 [return] ok 2619 - our @x; local @x; no strict; 1 [variable] ok 2620 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2621 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2622 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2623 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2624 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2625 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2626 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2627 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2628 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2629 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2630 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2631 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2632 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2633 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2634 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2635 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2636 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2637 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2638 - my @x; 1 [exception] ok 2639 - my @x; 1 [return] ok 2640 - my @x; 1 [variable] ok 2641 - our @x; local @x; use strict; 1 [exception] ok 2642 - our @x; local @x; use strict; 1 [return] ok 2643 - our @x; local @x; use strict; 1 [variable] ok 2644 - our @x; local @x; no strict; 1 [exception] ok 2645 - our @x; local @x; no strict; 1 [return] ok 2646 - our @x; local @x; no strict; 1 [variable] ok 2647 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2648 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2649 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2650 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2651 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2652 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2653 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2654 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2655 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2656 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2657 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2658 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2659 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2660 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2661 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2662 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2663 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2664 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2665 - my @x; 1 <+fetch> [exception] ok 2666 - my @x; 1 <+fetch> [return] ok 2667 - my @x; 1 <+fetch> [variable] ok 2668 - our @x; local @x; use strict; 1 <+fetch> [exception] ok 2669 - our @x; local @x; use strict; 1 <+fetch> [return] ok 2670 - our @x; local @x; use strict; 1 <+fetch> [variable] ok 2671 - our @x; local @x; no strict; 1 <+fetch> [exception] ok 2672 - our @x; local @x; no strict; 1 <+fetch> [return] ok 2673 - our @x; local @x; no strict; 1 <+fetch> [variable] ok 2674 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2675 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2676 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2677 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2678 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2679 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2680 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2681 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2682 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2683 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2684 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2685 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2686 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2687 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2688 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2689 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2690 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2691 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2692 - my @x; 1 <+exists> [exception] ok 2693 - my @x; 1 <+exists> [return] ok 2694 - my @x; 1 <+exists> [variable] ok 2695 - our @x; local @x; use strict; 1 <+exists> [exception] ok 2696 - our @x; local @x; use strict; 1 <+exists> [return] ok 2697 - our @x; local @x; use strict; 1 <+exists> [variable] ok 2698 - our @x; local @x; no strict; 1 <+exists> [exception] ok 2699 - our @x; local @x; no strict; 1 <+exists> [return] ok 2700 - our @x; local @x; no strict; 1 <+exists> [variable] ok 2701 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2702 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2703 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2704 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2705 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2706 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2707 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2708 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2709 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2710 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2711 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2712 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2713 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2714 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2715 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2716 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2717 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2718 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2719 - my @x; 1 <+delete> [exception] ok 2720 - my @x; 1 <+delete> [return] ok 2721 - my @x; 1 <+delete> [variable] ok 2722 - our @x; local @x; use strict; 1 <+delete> [exception] ok 2723 - our @x; local @x; use strict; 1 <+delete> [return] ok 2724 - our @x; local @x; use strict; 1 <+delete> [variable] ok 2725 - our @x; local @x; no strict; 1 <+delete> [exception] ok 2726 - our @x; local @x; no strict; 1 <+delete> [return] ok 2727 - our @x; local @x; no strict; 1 <+delete> [variable] ok 2728 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2729 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2730 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2731 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2732 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2733 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2734 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2735 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2736 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2737 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2738 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2739 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2740 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2741 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2742 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2743 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2744 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2745 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2746 - my @x; 1 <+store> [exception] ok 2747 - my @x; 1 <+store> [return] ok 2748 - my @x; 1 <+store> [variable] ok 2749 - our @x; local @x; use strict; 1 <+store> [exception] ok 2750 - our @x; local @x; use strict; 1 <+store> [return] ok 2751 - our @x; local @x; use strict; 1 <+store> [variable] ok 2752 - our @x; local @x; no strict; 1 <+store> [exception] ok 2753 - our @x; local @x; no strict; 1 <+store> [return] ok 2754 - our @x; local @x; no strict; 1 <+store> [variable] ok 2755 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [exception] ok 2756 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [return] ok 2757 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [variable] ok 2758 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [exception] ok 2759 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [return] ok 2760 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [variable] ok 2761 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [exception] ok 2762 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [return] ok 2763 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [variable] ok 2764 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [exception] ok 2765 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [return] ok 2766 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [variable] ok 2767 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [exception] ok 2768 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [return] ok 2769 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [variable] ok 2770 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [exception] ok 2771 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [return] ok 2772 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [variable] ok 2773 - my @x; $x[$N[0]] = 1; my @a = @x; () <+fetch> [exception] ok 2774 - my @x; $x[$N[0]] = 1; my @a = @x; () <+fetch> [return] ok 2775 - my @x; $x[$N[0]] = 1; my @a = @x; () <+fetch> [variable] ok 2776 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+fetch> [exception] ok 2777 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+fetch> [return] ok 2778 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+fetch> [variable] ok 2779 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+fetch> [exception] ok 2780 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+fetch> [return] ok 2781 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+fetch> [variable] ok 2782 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [exception] ok 2783 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [return] ok 2784 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [variable] ok 2785 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [exception] ok 2786 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [return] ok 2787 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [variable] ok 2788 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [exception] ok 2789 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [return] ok 2790 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [variable] ok 2791 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [exception] ok 2792 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [return] ok 2793 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [variable] ok 2794 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [exception] ok 2795 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [return] ok 2796 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [variable] ok 2797 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [exception] ok 2798 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [return] ok 2799 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [variable] ok 2800 - my @x; $x[$N[0]] = 1; my @a = @x; () <+exists> [exception] ok 2801 - my @x; $x[$N[0]] = 1; my @a = @x; () <+exists> [return] ok 2802 - my @x; $x[$N[0]] = 1; my @a = @x; () <+exists> [variable] ok 2803 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+exists> [exception] ok 2804 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+exists> [return] ok 2805 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+exists> [variable] ok 2806 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+exists> [exception] ok 2807 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+exists> [return] ok 2808 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+exists> [variable] ok 2809 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [exception] ok 2810 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [return] ok 2811 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [variable] ok 2812 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [exception] ok 2813 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [return] ok 2814 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [variable] ok 2815 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [exception] ok 2816 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [return] ok 2817 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [variable] ok 2818 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [exception] ok 2819 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [return] ok 2820 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [variable] ok 2821 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [exception] ok 2822 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [return] ok 2823 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [variable] ok 2824 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [exception] ok 2825 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [return] ok 2826 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [variable] ok 2827 - my @x; $x[$N[0]] = 1; my @a = @x; () <+delete> [exception] ok 2828 - my @x; $x[$N[0]] = 1; my @a = @x; () <+delete> [return] ok 2829 - my @x; $x[$N[0]] = 1; my @a = @x; () <+delete> [variable] ok 2830 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+delete> [exception] ok 2831 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+delete> [return] ok 2832 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+delete> [variable] ok 2833 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+delete> [exception] ok 2834 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+delete> [return] ok 2835 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+delete> [variable] ok 2836 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+store> [exception] ok 2837 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+store> [return] ok 2838 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+store> [variable] ok 2839 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [exception] ok 2840 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [return] ok 2841 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [variable] ok 2842 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [exception] ok 2843 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [return] ok 2844 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [variable] ok 2845 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+store> [exception] ok 2846 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+store> [return] ok 2847 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+store> [variable] ok 2848 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [exception] ok 2849 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [return] ok 2850 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [variable] ok 2851 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [exception] ok 2852 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [return] ok 2853 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [variable] ok 2854 - my @x; $x[$N[0]] = 1; my @a = @x; () <+store> [exception] ok 2855 - my @x; $x[$N[0]] = 1; my @a = @x; () <+store> [return] ok 2856 - my @x; $x[$N[0]] = 1; my @a = @x; () <+store> [variable] ok 2857 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+store> [exception] ok 2858 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+store> [return] ok 2859 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+store> [variable] ok 2860 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+store> [exception] ok 2861 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+store> [return] ok 2862 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+store> [variable] ok 2863 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2864 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2865 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2866 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2867 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2868 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2869 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2870 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2871 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2872 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2873 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2874 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2875 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2876 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2877 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2878 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2879 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2880 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2881 - my @x; my @a = @x[$N[0], $N[1]]; \@a [exception] ok 2882 - my @x; my @a = @x[$N[0], $N[1]]; \@a [return] ok 2883 - my @x; my @a = @x[$N[0], $N[1]]; \@a [variable] ok 2884 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a [exception] ok 2885 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a [return] ok 2886 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a [variable] ok 2887 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a [exception] ok 2888 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a [return] ok 2889 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a [variable] ok 2890 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2891 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2892 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2893 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2894 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2895 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2896 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2897 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2898 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2899 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2900 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2901 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2902 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2903 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2904 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2905 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2906 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2907 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2908 - my @x; my @a = @x[$N[0], $N[1]]; \@a [exception] ok 2909 - my @x; my @a = @x[$N[0], $N[1]]; \@a [return] ok 2910 - my @x; my @a = @x[$N[0], $N[1]]; \@a [variable] ok 2911 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a [exception] ok 2912 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a [return] ok 2913 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a [variable] ok 2914 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a [exception] ok 2915 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a [return] ok 2916 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a [variable] ok 2917 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2918 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2919 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2920 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2921 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2922 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2923 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2924 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2925 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2926 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2927 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2928 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2929 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2930 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2931 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2932 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2933 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2934 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2935 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2936 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2937 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2938 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2939 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2940 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2941 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2942 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2943 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2944 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2945 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [return] ok 2946 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2947 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2948 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [return] ok 2949 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2950 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2951 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [return] ok 2952 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2953 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2954 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [return] ok 2955 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2956 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2957 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [return] ok 2958 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2959 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2960 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [return] ok 2961 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2962 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2963 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+exists> [return] ok 2964 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2965 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2966 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+exists> [return] ok 2967 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2968 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2969 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+exists> [return] ok 2970 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2971 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2972 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [return] ok 2973 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2974 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2975 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [return] ok 2976 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2977 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2978 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [return] ok 2979 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2980 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2981 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [return] ok 2982 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2983 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2984 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [return] ok 2985 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2986 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2987 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [return] ok 2988 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2989 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2990 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+delete> [return] ok 2991 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2992 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2993 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+delete> [return] ok 2994 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2995 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2996 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+delete> [return] ok 2997 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2998 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+store> [exception] ok 2999 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+store> [return] ok 3000 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+store> [variable] ok 3001 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [exception] ok 3002 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [return] ok 3003 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [variable] ok 3004 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [exception] ok 3005 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [return] ok 3006 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [variable] ok 3007 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+store> [exception] ok 3008 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+store> [return] ok 3009 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+store> [variable] ok 3010 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [exception] ok 3011 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [return] ok 3012 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [variable] ok 3013 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [exception] ok 3014 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [return] ok 3015 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [variable] ok 3016 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+store> [exception] ok 3017 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+store> [return] ok 3018 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+store> [variable] ok 3019 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+store> [exception] ok 3020 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+store> [return] ok 3021 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+store> [variable] ok 3022 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+store> [exception] ok 3023 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+store> [return] ok 3024 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+store> [variable] ok 3025 - my $x; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3026 - my $x; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3027 - my $x; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3028 - our $x; local $x; use strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3029 - our $x; local $x; use strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3030 - our $x; local $x; use strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3031 - our $x; local $x; no strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3032 - our $x; local $x; no strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3033 - our $x; local $x; no strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3034 - my $x; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3035 - my $x; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3036 - my $x; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3037 - our $x; local $x; use strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3038 - our $x; local $x; use strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3039 - our $x; local $x; use strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3040 - our $x; local $x; no strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3041 - our $x; local $x; no strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3042 - our $x; local $x; no strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3043 - my @x; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3044 - my @x; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3045 - my @x; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3046 - our @x; local @x; use strict; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3047 - our @x; local @x; use strict; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3048 - our @x; local @x; use strict; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3049 - our @x; local @x; no strict; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3050 - our @x; local @x; no strict; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3051 - our @x; local @x; no strict; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3052 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3053 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3054 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3055 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3056 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3057 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3058 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3059 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3060 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3061 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3062 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3063 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3064 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3065 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3066 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3067 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3068 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3069 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3070 - my @x; @x[$N[0], $N[1]] = (1, 2); () [exception] ok 3071 - my @x; @x[$N[0], $N[1]] = (1, 2); () [return] ok 3072 - my @x; @x[$N[0], $N[1]] = (1, 2); () [variable] ok 3073 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () [exception] ok 3074 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () [return] ok 3075 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () [variable] ok 3076 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () [exception] ok 3077 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () [return] ok 3078 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () [variable] ok 3079 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3080 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3081 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3082 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3083 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3084 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3085 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3086 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3087 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3088 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3089 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3090 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3091 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3092 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3093 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3094 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3095 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3096 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3097 - my @x; @x[$N[0], $N[1]] = (1, 2); () [exception] ok 3098 - my @x; @x[$N[0], $N[1]] = (1, 2); () [return] ok 3099 - my @x; @x[$N[0], $N[1]] = (1, 2); () [variable] ok 3100 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () [exception] ok 3101 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () [return] ok 3102 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () [variable] ok 3103 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () [exception] ok 3104 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () [return] ok 3105 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () [variable] ok 3106 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3107 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3108 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3109 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3110 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3111 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3112 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3113 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3114 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3115 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3116 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3117 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3118 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3119 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3120 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3121 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3122 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3123 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3124 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3125 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3126 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3127 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3128 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3129 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3130 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3131 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3132 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3133 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3134 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3135 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3136 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3137 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3138 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3139 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3140 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3141 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3142 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3143 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3144 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3145 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3146 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3147 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3148 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3149 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3150 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3151 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3152 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3153 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3154 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3155 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3156 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3157 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3158 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3159 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3160 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3161 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3162 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3163 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3164 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3165 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3166 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3167 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3168 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3169 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3170 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3171 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3172 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3173 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3174 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3175 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3176 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3177 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3178 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3179 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3180 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3181 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3182 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3183 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3184 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3185 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3186 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3187 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3188 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3189 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3190 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3191 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3192 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3193 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3194 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3195 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3196 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3197 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3198 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3199 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3200 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3201 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3202 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3203 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3204 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3205 - my @x; 1 <+store> [exception] ok 3206 - my @x; 1 <+store> [return] ok 3207 - my @x; 1 <+store> [variable] ok 3208 - our @x; local @x; use strict; 1 <+store> [exception] ok 3209 - our @x; local @x; use strict; 1 <+store> [return] ok 3210 - our @x; local @x; use strict; 1 <+store> [variable] ok 3211 - our @x; local @x; no strict; 1 <+store> [exception] ok 3212 - our @x; local @x; no strict; 1 <+store> [return] ok 3213 - our @x; local @x; no strict; 1 <+store> [variable] ok 3214 - my $x; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3215 - my $x; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3216 - my $x; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3217 - our $x; local $x; use strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3218 - our $x; local $x; use strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3219 - our $x; local $x; use strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3220 - our $x; local $x; no strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3221 - our $x; local $x; no strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3222 - our $x; local $x; no strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3223 - my $x; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3224 - my $x; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3225 - my $x; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3226 - our $x; local $x; use strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3227 - our $x; local $x; use strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3228 - our $x; local $x; use strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3229 - our $x; local $x; no strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3230 - our $x; local $x; no strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3231 - our $x; local $x; no strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3232 - my @x; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3233 - my @x; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3234 - my @x; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3235 - our @x; local @x; use strict; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3236 - our @x; local @x; use strict; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3237 - our @x; local @x; use strict; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3238 - our @x; local @x; no strict; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3239 - our @x; local @x; no strict; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3240 - our @x; local @x; no strict; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3241 - my $x; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3242 - my $x; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3243 - my $x; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3244 - our $x; local $x; use strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3245 - our $x; local $x; use strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3246 - our $x; local $x; use strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3247 - our $x; local $x; no strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3248 - our $x; local $x; no strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3249 - our $x; local $x; no strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3250 - my $x; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3251 - my $x; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3252 - my $x; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3253 - our $x; local $x; use strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3254 - our $x; local $x; use strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3255 - our $x; local $x; use strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3256 - our $x; local $x; no strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3257 - our $x; local $x; no strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3258 - our $x; local $x; no strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3259 - my @x; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3260 - my @x; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3261 - my @x; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3262 - our @x; local @x; use strict; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3263 - our @x; local @x; use strict; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3264 - our @x; local @x; use strict; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3265 - our @x; local @x; no strict; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3266 - our @x; local @x; no strict; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3267 - our @x; local @x; no strict; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3268 - my $x; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3269 - my $x; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3270 - my $x; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3271 - our $x; local $x; use strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3272 - our $x; local $x; use strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3273 - our $x; local $x; use strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3274 - our $x; local $x; no strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3275 - our $x; local $x; no strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3276 - our $x; local $x; no strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3277 - my $x; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3278 - my $x; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3279 - my $x; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3280 - our $x; local $x; use strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3281 - our $x; local $x; use strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3282 - our $x; local $x; use strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3283 - our $x; local $x; no strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3284 - our $x; local $x; no strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3285 - our $x; local $x; no strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3286 - my @x; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3287 - my @x; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3288 - my @x; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3289 - our @x; local @x; use strict; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3290 - our @x; local @x; use strict; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3291 - our @x; local @x; use strict; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3292 - our @x; local @x; no strict; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3293 - our @x; local @x; no strict; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3294 - our @x; local @x; no strict; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3295 - my $x; exists $x->[$N[0]] [exception] ok 3296 - my $x; exists $x->[$N[0]] [return] ok 3297 - my $x; exists $x->[$N[0]] [variable] ok 3298 - our $x; local $x; use strict; exists $x->[$N[0]] [exception] ok 3299 - our $x; local $x; use strict; exists $x->[$N[0]] [return] ok 3300 - our $x; local $x; use strict; exists $x->[$N[0]] [variable] ok 3301 - our $x; local $x; no strict; exists $x->[$N[0]] [exception] ok 3302 - our $x; local $x; no strict; exists $x->[$N[0]] [return] ok 3303 - our $x; local $x; no strict; exists $x->[$N[0]] [variable] ok 3304 - my $x; exists $$x[$N[0]] [exception] ok 3305 - my $x; exists $$x[$N[0]] [return] ok 3306 - my $x; exists $$x[$N[0]] [variable] ok 3307 - our $x; local $x; use strict; exists $$x[$N[0]] [exception] ok 3308 - our $x; local $x; use strict; exists $$x[$N[0]] [return] ok 3309 - our $x; local $x; use strict; exists $$x[$N[0]] [variable] ok 3310 - our $x; local $x; no strict; exists $$x[$N[0]] [exception] ok 3311 - our $x; local $x; no strict; exists $$x[$N[0]] [return] ok 3312 - our $x; local $x; no strict; exists $$x[$N[0]] [variable] ok 3313 - my @x; exists $x[$N[0]] [exception] ok 3314 - my @x; exists $x[$N[0]] [return] ok 3315 - my @x; exists $x[$N[0]] [variable] ok 3316 - our @x; local @x; use strict; exists $x[$N[0]] [exception] ok 3317 - our @x; local @x; use strict; exists $x[$N[0]] [return] ok 3318 - our @x; local @x; use strict; exists $x[$N[0]] [variable] ok 3319 - our @x; local @x; no strict; exists $x[$N[0]] [exception] ok 3320 - our @x; local @x; no strict; exists $x[$N[0]] [return] ok 3321 - our @x; local @x; no strict; exists $x[$N[0]] [variable] ok 3322 - my $x; exists $x->[$N[0]] [exception] ok 3323 - my $x; exists $x->[$N[0]] [return] ok 3324 - my $x; exists $x->[$N[0]] [variable] ok 3325 - our $x; local $x; use strict; exists $x->[$N[0]] [exception] ok 3326 - our $x; local $x; use strict; exists $x->[$N[0]] [return] ok 3327 - our $x; local $x; use strict; exists $x->[$N[0]] [variable] ok 3328 - our $x; local $x; no strict; exists $x->[$N[0]] [exception] ok 3329 - our $x; local $x; no strict; exists $x->[$N[0]] [return] ok 3330 - our $x; local $x; no strict; exists $x->[$N[0]] [variable] ok 3331 - my $x; exists $$x[$N[0]] [exception] ok 3332 - my $x; exists $$x[$N[0]] [return] ok 3333 - my $x; exists $$x[$N[0]] [variable] ok 3334 - our $x; local $x; use strict; exists $$x[$N[0]] [exception] ok 3335 - our $x; local $x; use strict; exists $$x[$N[0]] [return] ok 3336 - our $x; local $x; use strict; exists $$x[$N[0]] [variable] ok 3337 - our $x; local $x; no strict; exists $$x[$N[0]] [exception] ok 3338 - our $x; local $x; no strict; exists $$x[$N[0]] [return] ok 3339 - our $x; local $x; no strict; exists $$x[$N[0]] [variable] ok 3340 - my @x; exists $x[$N[0]] [exception] ok 3341 - my @x; exists $x[$N[0]] [return] ok 3342 - my @x; exists $x[$N[0]] [variable] ok 3343 - our @x; local @x; use strict; exists $x[$N[0]] [exception] ok 3344 - our @x; local @x; use strict; exists $x[$N[0]] [return] ok 3345 - our @x; local @x; use strict; exists $x[$N[0]] [variable] ok 3346 - our @x; local @x; no strict; exists $x[$N[0]] [exception] ok 3347 - our @x; local @x; no strict; exists $x[$N[0]] [return] ok 3348 - our @x; local @x; no strict; exists $x[$N[0]] [variable] ok 3349 - my $x; exists $x->[$N[0]] <+fetch> [exception] ok 3350 - my $x; exists $x->[$N[0]] <+fetch> [return] ok 3351 - my $x; exists $x->[$N[0]] <+fetch> [variable] ok 3352 - our $x; local $x; use strict; exists $x->[$N[0]] <+fetch> [exception] ok 3353 - our $x; local $x; use strict; exists $x->[$N[0]] <+fetch> [return] ok 3354 - our $x; local $x; use strict; exists $x->[$N[0]] <+fetch> [variable] ok 3355 - our $x; local $x; no strict; exists $x->[$N[0]] <+fetch> [exception] ok 3356 - our $x; local $x; no strict; exists $x->[$N[0]] <+fetch> [return] ok 3357 - our $x; local $x; no strict; exists $x->[$N[0]] <+fetch> [variable] ok 3358 - my $x; exists $$x[$N[0]] <+fetch> [exception] ok 3359 - my $x; exists $$x[$N[0]] <+fetch> [return] ok 3360 - my $x; exists $$x[$N[0]] <+fetch> [variable] ok 3361 - our $x; local $x; use strict; exists $$x[$N[0]] <+fetch> [exception] ok 3362 - our $x; local $x; use strict; exists $$x[$N[0]] <+fetch> [return] ok 3363 - our $x; local $x; use strict; exists $$x[$N[0]] <+fetch> [variable] ok 3364 - our $x; local $x; no strict; exists $$x[$N[0]] <+fetch> [exception] ok 3365 - our $x; local $x; no strict; exists $$x[$N[0]] <+fetch> [return] ok 3366 - our $x; local $x; no strict; exists $$x[$N[0]] <+fetch> [variable] ok 3367 - my @x; exists $x[$N[0]] <+fetch> [exception] ok 3368 - my @x; exists $x[$N[0]] <+fetch> [return] ok 3369 - my @x; exists $x[$N[0]] <+fetch> [variable] ok 3370 - our @x; local @x; use strict; exists $x[$N[0]] <+fetch> [exception] ok 3371 - our @x; local @x; use strict; exists $x[$N[0]] <+fetch> [return] ok 3372 - our @x; local @x; use strict; exists $x[$N[0]] <+fetch> [variable] ok 3373 - our @x; local @x; no strict; exists $x[$N[0]] <+fetch> [exception] ok 3374 - our @x; local @x; no strict; exists $x[$N[0]] <+fetch> [return] ok 3375 - our @x; local @x; no strict; exists $x[$N[0]] <+fetch> [variable] ok 3376 - my $x; exists $x->[$N[0]] <+exists> [exception] ok 3377 - my $x; exists $x->[$N[0]] <+exists> [return] ok 3378 - my $x; exists $x->[$N[0]] <+exists> [variable] ok 3379 - our $x; local $x; use strict; exists $x->[$N[0]] <+exists> [exception] ok 3380 - our $x; local $x; use strict; exists $x->[$N[0]] <+exists> [return] ok 3381 - our $x; local $x; use strict; exists $x->[$N[0]] <+exists> [variable] ok 3382 - our $x; local $x; no strict; exists $x->[$N[0]] <+exists> [exception] ok 3383 - our $x; local $x; no strict; exists $x->[$N[0]] <+exists> [return] ok 3384 - our $x; local $x; no strict; exists $x->[$N[0]] <+exists> [variable] ok 3385 - my $x; exists $$x[$N[0]] <+exists> [exception] ok 3386 - my $x; exists $$x[$N[0]] <+exists> [return] ok 3387 - my $x; exists $$x[$N[0]] <+exists> [variable] ok 3388 - our $x; local $x; use strict; exists $$x[$N[0]] <+exists> [exception] ok 3389 - our $x; local $x; use strict; exists $$x[$N[0]] <+exists> [return] ok 3390 - our $x; local $x; use strict; exists $$x[$N[0]] <+exists> [variable] ok 3391 - our $x; local $x; no strict; exists $$x[$N[0]] <+exists> [exception] ok 3392 - our $x; local $x; no strict; exists $$x[$N[0]] <+exists> [return] ok 3393 - our $x; local $x; no strict; exists $$x[$N[0]] <+exists> [variable] ok 3394 - my @x; exists $x[$N[0]] <+exists> [exception] ok 3395 - my @x; exists $x[$N[0]] <+exists> [return] ok 3396 - my @x; exists $x[$N[0]] <+exists> [variable] ok 3397 - our @x; local @x; use strict; exists $x[$N[0]] <+exists> [exception] ok 3398 - our @x; local @x; use strict; exists $x[$N[0]] <+exists> [return] ok 3399 - our @x; local @x; use strict; exists $x[$N[0]] <+exists> [variable] ok 3400 - our @x; local @x; no strict; exists $x[$N[0]] <+exists> [exception] ok 3401 - our @x; local @x; no strict; exists $x[$N[0]] <+exists> [return] ok 3402 - our @x; local @x; no strict; exists $x[$N[0]] <+exists> [variable] ok 3403 - my $x; exists $x->[$N[0]] <+delete> [exception] ok 3404 - my $x; exists $x->[$N[0]] <+delete> [return] ok 3405 - my $x; exists $x->[$N[0]] <+delete> [variable] ok 3406 - our $x; local $x; use strict; exists $x->[$N[0]] <+delete> [exception] ok 3407 - our $x; local $x; use strict; exists $x->[$N[0]] <+delete> [return] ok 3408 - our $x; local $x; use strict; exists $x->[$N[0]] <+delete> [variable] ok 3409 - our $x; local $x; no strict; exists $x->[$N[0]] <+delete> [exception] ok 3410 - our $x; local $x; no strict; exists $x->[$N[0]] <+delete> [return] ok 3411 - our $x; local $x; no strict; exists $x->[$N[0]] <+delete> [variable] ok 3412 - my $x; exists $$x[$N[0]] <+delete> [exception] ok 3413 - my $x; exists $$x[$N[0]] <+delete> [return] ok 3414 - my $x; exists $$x[$N[0]] <+delete> [variable] ok 3415 - our $x; local $x; use strict; exists $$x[$N[0]] <+delete> [exception] ok 3416 - our $x; local $x; use strict; exists $$x[$N[0]] <+delete> [return] ok 3417 - our $x; local $x; use strict; exists $$x[$N[0]] <+delete> [variable] ok 3418 - our $x; local $x; no strict; exists $$x[$N[0]] <+delete> [exception] ok 3419 - our $x; local $x; no strict; exists $$x[$N[0]] <+delete> [return] ok 3420 - our $x; local $x; no strict; exists $$x[$N[0]] <+delete> [variable] ok 3421 - my @x; exists $x[$N[0]] <+delete> [exception] ok 3422 - my @x; exists $x[$N[0]] <+delete> [return] ok 3423 - my @x; exists $x[$N[0]] <+delete> [variable] ok 3424 - our @x; local @x; use strict; exists $x[$N[0]] <+delete> [exception] ok 3425 - our @x; local @x; use strict; exists $x[$N[0]] <+delete> [return] ok 3426 - our @x; local @x; use strict; exists $x[$N[0]] <+delete> [variable] ok 3427 - our @x; local @x; no strict; exists $x[$N[0]] <+delete> [exception] ok 3428 - our @x; local @x; no strict; exists $x[$N[0]] <+delete> [return] ok 3429 - our @x; local @x; no strict; exists $x[$N[0]] <+delete> [variable] ok 3430 - my $x; exists $x->[$N[0]] <+store> [exception] ok 3431 - my $x; exists $x->[$N[0]] <+store> [return] ok 3432 - my $x; exists $x->[$N[0]] <+store> [variable] ok 3433 - our $x; local $x; use strict; exists $x->[$N[0]] <+store> [exception] ok 3434 - our $x; local $x; use strict; exists $x->[$N[0]] <+store> [return] ok 3435 - our $x; local $x; use strict; exists $x->[$N[0]] <+store> [variable] ok 3436 - our $x; local $x; no strict; exists $x->[$N[0]] <+store> [exception] ok 3437 - our $x; local $x; no strict; exists $x->[$N[0]] <+store> [return] ok 3438 - our $x; local $x; no strict; exists $x->[$N[0]] <+store> [variable] ok 3439 - my $x; exists $$x[$N[0]] <+store> [exception] ok 3440 - my $x; exists $$x[$N[0]] <+store> [return] ok 3441 - my $x; exists $$x[$N[0]] <+store> [variable] ok 3442 - our $x; local $x; use strict; exists $$x[$N[0]] <+store> [exception] ok 3443 - our $x; local $x; use strict; exists $$x[$N[0]] <+store> [return] ok 3444 - our $x; local $x; use strict; exists $$x[$N[0]] <+store> [variable] ok 3445 - our $x; local $x; no strict; exists $$x[$N[0]] <+store> [exception] ok 3446 - our $x; local $x; no strict; exists $$x[$N[0]] <+store> [return] ok 3447 - our $x; local $x; no strict; exists $$x[$N[0]] <+store> [variable] ok 3448 - my @x; exists $x[$N[0]] <+store> [exception] ok 3449 - my @x; exists $x[$N[0]] <+store> [return] ok 3450 - my @x; exists $x[$N[0]] <+store> [variable] ok 3451 - our @x; local @x; use strict; exists $x[$N[0]] <+store> [exception] ok 3452 - our @x; local @x; use strict; exists $x[$N[0]] <+store> [return] ok 3453 - our @x; local @x; use strict; exists $x[$N[0]] <+store> [variable] ok 3454 - our @x; local @x; no strict; exists $x[$N[0]] <+store> [exception] ok 3455 - our @x; local @x; no strict; exists $x[$N[0]] <+store> [return] ok 3456 - our @x; local @x; no strict; exists $x[$N[0]] <+store> [variable] ok 3457 - my $x; exists $x->[$N[0]] <+strict +fetch> [exception] ok 3458 - my $x; exists $x->[$N[0]] <+strict +fetch> [return] ok 3459 - my $x; exists $x->[$N[0]] <+strict +fetch> [variable] ok 3460 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +fetch> [exception] ok 3461 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +fetch> [return] ok 3462 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +fetch> [variable] ok 3463 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +fetch> [exception] ok 3464 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +fetch> [return] ok 3465 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +fetch> [variable] ok 3466 - my $x; exists $$x[$N[0]] <+strict +fetch> [exception] ok 3467 - my $x; exists $$x[$N[0]] <+strict +fetch> [return] ok 3468 - my $x; exists $$x[$N[0]] <+strict +fetch> [variable] ok 3469 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +fetch> [exception] ok 3470 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +fetch> [return] ok 3471 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +fetch> [variable] ok 3472 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +fetch> [exception] ok 3473 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +fetch> [return] ok 3474 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +fetch> [variable] ok 3475 - my @x; exists $x[$N[0]] <+strict +fetch> [exception] ok 3476 - my @x; exists $x[$N[0]] <+strict +fetch> [return] ok 3477 - my @x; exists $x[$N[0]] <+strict +fetch> [variable] ok 3478 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +fetch> [exception] ok 3479 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +fetch> [return] ok 3480 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +fetch> [variable] ok 3481 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +fetch> [exception] ok 3482 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +fetch> [return] ok 3483 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +fetch> [variable] ok 3484 - my $x; exists $x->[$N[0]] <+strict +exists> [exception] ok 3485 - my $x; exists $x->[$N[0]] <+strict +exists> [return] ok 3486 - my $x; exists $x->[$N[0]] <+strict +exists> [variable] ok 3487 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +exists> [exception] ok 3488 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +exists> [return] ok 3489 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +exists> [variable] ok 3490 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +exists> [exception] ok 3491 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +exists> [return] ok 3492 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +exists> [variable] ok 3493 - my $x; exists $$x[$N[0]] <+strict +exists> [exception] ok 3494 - my $x; exists $$x[$N[0]] <+strict +exists> [return] ok 3495 - my $x; exists $$x[$N[0]] <+strict +exists> [variable] ok 3496 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +exists> [exception] ok 3497 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +exists> [return] ok 3498 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +exists> [variable] ok 3499 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +exists> [exception] ok 3500 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +exists> [return] ok 3501 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +exists> [variable] ok 3502 - my @x; 1 <+strict +exists> [exception] ok 3503 - my @x; 1 <+strict +exists> [return] ok 3504 - my @x; 1 <+strict +exists> [variable] ok 3505 - our @x; local @x; use strict; 1 <+strict +exists> [exception] ok 3506 - our @x; local @x; use strict; 1 <+strict +exists> [return] ok 3507 - our @x; local @x; use strict; 1 <+strict +exists> [variable] ok 3508 - our @x; local @x; no strict; 1 <+strict +exists> [exception] ok 3509 - our @x; local @x; no strict; 1 <+strict +exists> [return] ok 3510 - our @x; local @x; no strict; 1 <+strict +exists> [variable] ok 3511 - my $x; exists $x->[$N[0]] <+strict +delete> [exception] ok 3512 - my $x; exists $x->[$N[0]] <+strict +delete> [return] ok 3513 - my $x; exists $x->[$N[0]] <+strict +delete> [variable] ok 3514 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +delete> [exception] ok 3515 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +delete> [return] ok 3516 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +delete> [variable] ok 3517 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +delete> [exception] ok 3518 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +delete> [return] ok 3519 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +delete> [variable] ok 3520 - my $x; exists $$x[$N[0]] <+strict +delete> [exception] ok 3521 - my $x; exists $$x[$N[0]] <+strict +delete> [return] ok 3522 - my $x; exists $$x[$N[0]] <+strict +delete> [variable] ok 3523 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +delete> [exception] ok 3524 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +delete> [return] ok 3525 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +delete> [variable] ok 3526 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +delete> [exception] ok 3527 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +delete> [return] ok 3528 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +delete> [variable] ok 3529 - my @x; exists $x[$N[0]] <+strict +delete> [exception] ok 3530 - my @x; exists $x[$N[0]] <+strict +delete> [return] ok 3531 - my @x; exists $x[$N[0]] <+strict +delete> [variable] ok 3532 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +delete> [exception] ok 3533 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +delete> [return] ok 3534 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +delete> [variable] ok 3535 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +delete> [exception] ok 3536 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +delete> [return] ok 3537 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +delete> [variable] ok 3538 - my $x; exists $x->[$N[0]] <+strict +store> [exception] ok 3539 - my $x; exists $x->[$N[0]] <+strict +store> [return] ok 3540 - my $x; exists $x->[$N[0]] <+strict +store> [variable] ok 3541 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +store> [exception] ok 3542 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +store> [return] ok 3543 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +store> [variable] ok 3544 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +store> [exception] ok 3545 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +store> [return] ok 3546 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +store> [variable] ok 3547 - my $x; exists $$x[$N[0]] <+strict +store> [exception] ok 3548 - my $x; exists $$x[$N[0]] <+strict +store> [return] ok 3549 - my $x; exists $$x[$N[0]] <+strict +store> [variable] ok 3550 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +store> [exception] ok 3551 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +store> [return] ok 3552 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +store> [variable] ok 3553 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +store> [exception] ok 3554 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +store> [return] ok 3555 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +store> [variable] ok 3556 - my @x; exists $x[$N[0]] <+strict +store> [exception] ok 3557 - my @x; exists $x[$N[0]] <+strict +store> [return] ok 3558 - my @x; exists $x[$N[0]] <+strict +store> [variable] ok 3559 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +store> [exception] ok 3560 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +store> [return] ok 3561 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +store> [variable] ok 3562 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +store> [exception] ok 3563 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +store> [return] ok 3564 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +store> [variable] ok 3565 - my $x; exists $x->[$N[0]]->[$N[1]] [exception] ok 3566 - my $x; exists $x->[$N[0]]->[$N[1]] [return] ok 3567 - my $x; exists $x->[$N[0]]->[$N[1]] [variable] ok 3568 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] [exception] ok 3569 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] [return] ok 3570 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] [variable] ok 3571 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] [exception] ok 3572 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] [return] ok 3573 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] [variable] ok 3574 - my $x; exists $$x[$N[0]]->[$N[1]] [exception] ok 3575 - my $x; exists $$x[$N[0]]->[$N[1]] [return] ok 3576 - my $x; exists $$x[$N[0]]->[$N[1]] [variable] ok 3577 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] [exception] ok 3578 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] [return] ok 3579 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] [variable] ok 3580 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] [exception] ok 3581 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] [return] ok 3582 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] [variable] ok 3583 - my @x; exists $x[$N[0]]->[$N[1]] [exception] ok 3584 - my @x; exists $x[$N[0]]->[$N[1]] [return] ok 3585 - my @x; exists $x[$N[0]]->[$N[1]] [variable] ok 3586 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] [exception] ok 3587 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] [return] ok 3588 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] [variable] ok 3589 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] [exception] ok 3590 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] [return] ok 3591 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] [variable] ok 3592 - my $x; exists $x->[$N[0]]->[$N[1]] [exception] ok 3593 - my $x; exists $x->[$N[0]]->[$N[1]] [return] ok 3594 - my $x; exists $x->[$N[0]]->[$N[1]] [variable] ok 3595 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] [exception] ok 3596 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] [return] ok 3597 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] [variable] ok 3598 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] [exception] ok 3599 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] [return] ok 3600 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] [variable] ok 3601 - my $x; exists $$x[$N[0]]->[$N[1]] [exception] ok 3602 - my $x; exists $$x[$N[0]]->[$N[1]] [return] ok 3603 - my $x; exists $$x[$N[0]]->[$N[1]] [variable] ok 3604 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] [exception] ok 3605 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] [return] ok 3606 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] [variable] ok 3607 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] [exception] ok 3608 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] [return] ok 3609 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] [variable] ok 3610 - my @x; exists $x[$N[0]]->[$N[1]] [exception] ok 3611 - my @x; exists $x[$N[0]]->[$N[1]] [return] ok 3612 - my @x; exists $x[$N[0]]->[$N[1]] [variable] ok 3613 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] [exception] ok 3614 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] [return] ok 3615 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] [variable] ok 3616 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] [exception] ok 3617 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] [return] ok 3618 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] [variable] ok 3619 - my $x; exists $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 3620 - my $x; exists $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 3621 - my $x; exists $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 3622 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 3623 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 3624 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 3625 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 3626 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 3627 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 3628 - my $x; exists $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 3629 - my $x; exists $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 3630 - my $x; exists $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 3631 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 3632 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 3633 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 3634 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 3635 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 3636 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 3637 - my @x; exists $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 3638 - my @x; exists $x[$N[0]]->[$N[1]] <+fetch> [return] ok 3639 - my @x; exists $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 3640 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 3641 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+fetch> [return] ok 3642 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 3643 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 3644 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+fetch> [return] ok 3645 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 3646 - my $x; exists $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 3647 - my $x; exists $x->[$N[0]]->[$N[1]] <+exists> [return] ok 3648 - my $x; exists $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 3649 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 3650 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+exists> [return] ok 3651 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 3652 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 3653 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+exists> [return] ok 3654 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 3655 - my $x; exists $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 3656 - my $x; exists $$x[$N[0]]->[$N[1]] <+exists> [return] ok 3657 - my $x; exists $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 3658 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 3659 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+exists> [return] ok 3660 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 3661 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 3662 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+exists> [return] ok 3663 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 3664 - my @x; exists $x[$N[0]]->[$N[1]] <+exists> [exception] ok 3665 - my @x; exists $x[$N[0]]->[$N[1]] <+exists> [return] ok 3666 - my @x; exists $x[$N[0]]->[$N[1]] <+exists> [variable] ok 3667 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+exists> [exception] ok 3668 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+exists> [return] ok 3669 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+exists> [variable] ok 3670 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+exists> [exception] ok 3671 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+exists> [return] ok 3672 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+exists> [variable] ok 3673 - my $x; exists $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 3674 - my $x; exists $x->[$N[0]]->[$N[1]] <+delete> [return] ok 3675 - my $x; exists $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 3676 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 3677 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+delete> [return] ok 3678 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 3679 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 3680 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+delete> [return] ok 3681 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 3682 - my $x; exists $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 3683 - my $x; exists $$x[$N[0]]->[$N[1]] <+delete> [return] ok 3684 - my $x; exists $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 3685 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 3686 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+delete> [return] ok 3687 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 3688 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 3689 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+delete> [return] ok 3690 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 3691 - my @x; exists $x[$N[0]]->[$N[1]] <+delete> [exception] ok 3692 - my @x; exists $x[$N[0]]->[$N[1]] <+delete> [return] ok 3693 - my @x; exists $x[$N[0]]->[$N[1]] <+delete> [variable] ok 3694 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+delete> [exception] ok 3695 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+delete> [return] ok 3696 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+delete> [variable] ok 3697 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+delete> [exception] ok 3698 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+delete> [return] ok 3699 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+delete> [variable] ok 3700 - my $x; exists $x->[$N[0]]->[$N[1]] <+store> [exception] ok 3701 - my $x; exists $x->[$N[0]]->[$N[1]] <+store> [return] ok 3702 - my $x; exists $x->[$N[0]]->[$N[1]] <+store> [variable] ok 3703 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+store> [exception] ok 3704 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+store> [return] ok 3705 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+store> [variable] ok 3706 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+store> [exception] ok 3707 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+store> [return] ok 3708 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+store> [variable] ok 3709 - my $x; exists $$x[$N[0]]->[$N[1]] <+store> [exception] ok 3710 - my $x; exists $$x[$N[0]]->[$N[1]] <+store> [return] ok 3711 - my $x; exists $$x[$N[0]]->[$N[1]] <+store> [variable] ok 3712 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+store> [exception] ok 3713 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+store> [return] ok 3714 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+store> [variable] ok 3715 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+store> [exception] ok 3716 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+store> [return] ok 3717 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+store> [variable] ok 3718 - my @x; exists $x[$N[0]]->[$N[1]] <+store> [exception] ok 3719 - my @x; exists $x[$N[0]]->[$N[1]] <+store> [return] ok 3720 - my @x; exists $x[$N[0]]->[$N[1]] <+store> [variable] ok 3721 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+store> [exception] ok 3722 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+store> [return] ok 3723 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+store> [variable] ok 3724 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+store> [exception] ok 3725 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+store> [return] ok 3726 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+store> [variable] ok 3727 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3728 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3729 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3730 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3731 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3732 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3733 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3734 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3735 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3736 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3737 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3738 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3739 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3740 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3741 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3742 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3743 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3744 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3745 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3746 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3747 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3748 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3749 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3750 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3751 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3752 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3753 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3754 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3755 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3756 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3757 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3758 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3759 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3760 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3761 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3762 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3763 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3764 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3765 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3766 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3767 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3768 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3769 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3770 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3771 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3772 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3773 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3774 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3775 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3776 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3777 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3778 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3779 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3780 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3781 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3782 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3783 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3784 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3785 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3786 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3787 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3788 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3789 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3790 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3791 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3792 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3793 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3794 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3795 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3796 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3797 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3798 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3799 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3800 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3801 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3802 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3803 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3804 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3805 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3806 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3807 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3808 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3809 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 3810 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3811 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3812 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 3813 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3814 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3815 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 3816 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3817 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3818 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 3819 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3820 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3821 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 3822 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3823 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3824 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 3825 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3826 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3827 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 3828 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3829 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3830 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 3831 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3832 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3833 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 3834 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3835 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [exception] ok 3836 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [return] ok 3837 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [variable] ok 3838 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [exception] ok 3839 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [return] ok 3840 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [variable] ok 3841 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [exception] ok 3842 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [return] ok 3843 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [variable] ok 3844 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [exception] ok 3845 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [return] ok 3846 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [variable] ok 3847 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [exception] ok 3848 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [return] ok 3849 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [variable] ok 3850 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [exception] ok 3851 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [return] ok 3852 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [variable] ok 3853 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [exception] ok 3854 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [return] ok 3855 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [variable] ok 3856 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [exception] ok 3857 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [return] ok 3858 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [variable] ok 3859 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [exception] ok 3860 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [return] ok 3861 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [variable] ok 3862 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [exception] ok 3863 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [return] ok 3864 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [variable] ok 3865 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [exception] ok 3866 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [return] ok 3867 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [variable] ok 3868 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [exception] ok 3869 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [return] ok 3870 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [variable] ok 3871 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [exception] ok 3872 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [return] ok 3873 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [variable] ok 3874 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [exception] ok 3875 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [return] ok 3876 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [variable] ok 3877 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [exception] ok 3878 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [return] ok 3879 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [variable] ok 3880 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [exception] ok 3881 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [return] ok 3882 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [variable] ok 3883 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [exception] ok 3884 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [return] ok 3885 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [variable] ok 3886 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [exception] ok 3887 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [return] ok 3888 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [variable] ok 3889 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [exception] ok 3890 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [return] ok 3891 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [variable] ok 3892 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [exception] ok 3893 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [return] ok 3894 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [variable] ok 3895 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [exception] ok 3896 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [return] ok 3897 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [variable] ok 3898 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [exception] ok 3899 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [return] ok 3900 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [variable] ok 3901 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [exception] ok 3902 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [return] ok 3903 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [variable] ok 3904 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [exception] ok 3905 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [return] ok 3906 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [variable] ok 3907 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [exception] ok 3908 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [return] ok 3909 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [variable] ok 3910 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [exception] ok 3911 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [return] ok 3912 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [variable] ok 3913 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [exception] ok 3914 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [return] ok 3915 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [variable] ok 3916 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [exception] ok 3917 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [return] ok 3918 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [variable] ok 3919 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [exception] ok 3920 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [return] ok 3921 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [variable] ok 3922 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [exception] ok 3923 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [return] ok 3924 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [variable] ok 3925 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [exception] ok 3926 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [return] ok 3927 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [variable] ok 3928 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [exception] ok 3929 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [return] ok 3930 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [variable] ok 3931 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [exception] ok 3932 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [return] ok 3933 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [variable] ok 3934 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [exception] ok 3935 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [return] ok 3936 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [variable] ok 3937 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [exception] ok 3938 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [return] ok 3939 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [variable] ok 3940 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [exception] ok 3941 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [return] ok 3942 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [variable] ok 3943 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [exception] ok 3944 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [return] ok 3945 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [variable] ok 3946 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [exception] ok 3947 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [return] ok 3948 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [variable] ok 3949 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [exception] ok 3950 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [return] ok 3951 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [variable] ok 3952 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [exception] ok 3953 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [return] ok 3954 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [variable] ok 3955 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [exception] ok 3956 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [return] ok 3957 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [variable] ok 3958 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [exception] ok 3959 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [return] ok 3960 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [variable] ok 3961 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [exception] ok 3962 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [return] ok 3963 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [variable] ok 3964 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [exception] ok 3965 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [return] ok 3966 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [variable] ok 3967 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [exception] ok 3968 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [return] ok 3969 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [variable] ok 3970 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [exception] ok 3971 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [return] ok 3972 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [variable] ok 3973 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [exception] ok 3974 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [return] ok 3975 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [variable] ok 3976 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [exception] ok 3977 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [return] ok 3978 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [variable] ok 3979 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [exception] ok 3980 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [return] ok 3981 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [variable] ok 3982 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [exception] ok 3983 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [return] ok 3984 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [variable] ok 3985 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [exception] ok 3986 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [return] ok 3987 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [variable] ok 3988 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [exception] ok 3989 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [return] ok 3990 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [variable] ok 3991 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [exception] ok 3992 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [return] ok 3993 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [variable] ok 3994 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [exception] ok 3995 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [return] ok 3996 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [variable] ok 3997 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [exception] ok 3998 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [return] ok 3999 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [variable] ok 4000 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [exception] ok 4001 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [return] ok 4002 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [variable] ok 4003 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [exception] ok 4004 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [return] ok 4005 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [variable] ok 4006 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [exception] ok 4007 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [return] ok 4008 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [variable] ok 4009 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [exception] ok 4010 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [return] ok 4011 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [variable] ok 4012 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [exception] ok 4013 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [return] ok 4014 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [variable] ok 4015 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [exception] ok 4016 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [return] ok 4017 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [variable] ok 4018 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [exception] ok 4019 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [return] ok 4020 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [variable] ok 4021 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [exception] ok 4022 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [return] ok 4023 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [variable] ok 4024 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [exception] ok 4025 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [return] ok 4026 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [variable] ok 4027 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [exception] ok 4028 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [return] ok 4029 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [variable] ok 4030 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [exception] ok 4031 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [return] ok 4032 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [variable] ok 4033 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [exception] ok 4034 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [return] ok 4035 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [variable] ok 4036 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [exception] ok 4037 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [return] ok 4038 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [variable] ok 4039 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [exception] ok 4040 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [return] ok 4041 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [variable] ok 4042 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [exception] ok 4043 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [return] ok 4044 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [variable] ok 4045 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [exception] ok 4046 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [return] ok 4047 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [variable] ok 4048 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [exception] ok 4049 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [return] ok 4050 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [variable] ok 4051 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [exception] ok 4052 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [return] ok 4053 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [variable] ok 4054 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [exception] ok 4055 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [return] ok 4056 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [variable] ok 4057 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [exception] ok 4058 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [return] ok 4059 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [variable] ok 4060 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [exception] ok 4061 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [return] ok 4062 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [variable] ok 4063 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [exception] ok 4064 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [return] ok 4065 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [variable] ok 4066 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [exception] ok 4067 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [return] ok 4068 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [variable] ok 4069 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [exception] ok 4070 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [return] ok 4071 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [variable] ok 4072 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [exception] ok 4073 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [return] ok 4074 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [variable] ok 4075 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [exception] ok 4076 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [return] ok 4077 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [variable] ok 4078 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [exception] ok 4079 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [return] ok 4080 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [variable] ok 4081 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [exception] ok 4082 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [return] ok 4083 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [variable] ok 4084 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [exception] ok 4085 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [return] ok 4086 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [variable] ok 4087 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [exception] ok 4088 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [return] ok 4089 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [variable] ok 4090 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [exception] ok 4091 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [return] ok 4092 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [variable] ok 4093 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [exception] ok 4094 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [return] ok 4095 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [variable] ok 4096 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [exception] ok 4097 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [return] ok 4098 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [variable] ok 4099 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [exception] ok 4100 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [return] ok 4101 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [variable] ok 4102 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [exception] ok 4103 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [return] ok 4104 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [variable] ok 4105 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [exception] ok 4106 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [return] ok 4107 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [variable] ok 4108 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [exception] ok 4109 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [return] ok 4110 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [variable] ok 4111 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [exception] ok 4112 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [return] ok 4113 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [variable] ok 4114 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [exception] ok 4115 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [return] ok 4116 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [variable] ok 4117 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [exception] ok 4118 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [return] ok 4119 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [variable] ok 4120 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [exception] ok 4121 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [return] ok 4122 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [variable] ok 4123 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [exception] ok 4124 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [return] ok 4125 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [variable] ok 4126 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [exception] ok 4127 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [return] ok 4128 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [variable] ok 4129 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [exception] ok 4130 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [return] ok 4131 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [variable] ok 4132 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [exception] ok 4133 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [return] ok 4134 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [variable] ok 4135 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [exception] ok 4136 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [return] ok 4137 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [variable] ok 4138 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [exception] ok 4139 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [return] ok 4140 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [variable] ok 4141 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [exception] ok 4142 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [return] ok 4143 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [variable] ok 4144 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [exception] ok 4145 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [return] ok 4146 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [variable] ok 4147 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [exception] ok 4148 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [return] ok 4149 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [variable] ok 4150 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [exception] ok 4151 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [return] ok 4152 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [variable] ok 4153 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [exception] ok 4154 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [return] ok 4155 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [variable] ok 4156 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [exception] ok 4157 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [return] ok 4158 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [variable] ok 4159 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [exception] ok 4160 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [return] ok 4161 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [variable] ok 4162 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [exception] ok 4163 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [return] ok 4164 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [variable] ok 4165 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [exception] ok 4166 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [return] ok 4167 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [variable] ok 4168 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [exception] ok 4169 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [return] ok 4170 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [variable] ok 4171 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [exception] ok 4172 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [return] ok 4173 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [variable] ok 4174 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [exception] ok 4175 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [return] ok 4176 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [variable] ok 4177 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [exception] ok 4178 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [return] ok 4179 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [variable] ok 4180 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [exception] ok 4181 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [return] ok 4182 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [variable] ok 4183 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [exception] ok 4184 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [return] ok 4185 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [variable] ok 4186 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [exception] ok 4187 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [return] ok 4188 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [variable] ok 4189 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [exception] ok 4190 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [return] ok 4191 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [variable] ok 4192 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [exception] ok 4193 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [return] ok 4194 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [variable] ok 4195 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [exception] ok 4196 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [return] ok 4197 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [variable] ok 4198 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [exception] ok 4199 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [return] ok 4200 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [variable] ok 4201 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [exception] ok 4202 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [return] ok 4203 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [variable] ok 4204 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [exception] ok 4205 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [return] ok 4206 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [variable] ok 4207 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [exception] ok 4208 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [return] ok 4209 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [variable] ok 4210 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [exception] ok 4211 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [return] ok 4212 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [variable] ok 4213 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [exception] ok 4214 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [return] ok 4215 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [variable] ok 4216 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [exception] ok 4217 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [return] ok 4218 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [variable] ok 4219 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [exception] ok 4220 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [return] ok 4221 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [variable] ok 4222 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [exception] ok 4223 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [return] ok 4224 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [variable] ok 4225 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [exception] ok 4226 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [return] ok 4227 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [variable] ok 4228 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [exception] ok 4229 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [return] ok 4230 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [variable] ok 4231 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [exception] ok 4232 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [return] ok 4233 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [variable] ok 4234 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [exception] ok 4235 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [return] ok 4236 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [variable] ok 4237 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [exception] ok 4238 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [return] ok 4239 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [variable] ok 4240 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [exception] ok 4241 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [return] ok 4242 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [variable] ok 4243 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [exception] ok 4244 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [return] ok 4245 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [variable] ok 4246 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [exception] ok 4247 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [return] ok 4248 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [variable] ok 4249 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [exception] ok 4250 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [return] ok 4251 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [variable] ok 4252 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [exception] ok 4253 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [return] ok 4254 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [variable] ok 4255 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [exception] ok 4256 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [return] ok 4257 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [variable] ok 4258 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [exception] ok 4259 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [return] ok 4260 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [variable] ok 4261 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [exception] ok 4262 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [return] ok 4263 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [variable] ok 4264 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [exception] ok 4265 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [return] ok 4266 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [variable] ok 4267 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 4268 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 4269 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 4270 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 4271 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 4272 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 4273 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 4274 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 4275 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 4276 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 4277 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 4278 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 4279 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 4280 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 4281 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 4282 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 4283 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 4284 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 4285 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 4286 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [return] ok 4287 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 4288 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 4289 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [return] ok 4290 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 4291 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 4292 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [return] ok 4293 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 4294 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 4295 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 4296 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 4297 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 4298 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 4299 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 4300 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 4301 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 4302 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 4303 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 4304 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 4305 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 4306 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 4307 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 4308 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 4309 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 4310 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 4311 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 4312 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 4313 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [return] ok 4314 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 4315 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 4316 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [return] ok 4317 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 4318 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 4319 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [return] ok 4320 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 4321 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 4322 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 4323 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 4324 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 4325 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 4326 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 4327 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 4328 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 4329 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 4330 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 4331 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 4332 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 4333 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 4334 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 4335 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 4336 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 4337 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 4338 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 4339 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 4340 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [return] ok 4341 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 4342 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 4343 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [return] ok 4344 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 4345 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 4346 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [return] ok 4347 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 4348 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 4349 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [return] ok 4350 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 4351 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 4352 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [return] ok 4353 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 4354 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 4355 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [return] ok 4356 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 4357 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 4358 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [return] ok 4359 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 4360 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 4361 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [return] ok 4362 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 4363 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 4364 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [return] ok 4365 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 4366 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [exception] ok 4367 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [return] ok 4368 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [variable] ok 4369 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [exception] ok 4370 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [return] ok 4371 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [variable] ok 4372 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [exception] ok 4373 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [return] ok 4374 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [variable] ok 4375 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 4376 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [return] ok 4377 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 4378 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 4379 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [return] ok 4380 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 4381 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 4382 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [return] ok 4383 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 4384 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 4385 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [return] ok 4386 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 4387 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 4388 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [return] ok 4389 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 4390 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 4391 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [return] ok 4392 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 4393 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [exception] ok 4394 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [return] ok 4395 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [variable] ok 4396 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [exception] ok 4397 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [return] ok 4398 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [variable] ok 4399 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [exception] ok 4400 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [return] ok 4401 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [variable] ok 4402 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 4403 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [return] ok 4404 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 4405 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 4406 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [return] ok 4407 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 4408 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 4409 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [return] ok 4410 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 4411 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 4412 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [return] ok 4413 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 4414 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 4415 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [return] ok 4416 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 4417 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 4418 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [return] ok 4419 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 4420 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [exception] ok 4421 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [return] ok 4422 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [variable] ok 4423 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [exception] ok 4424 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [return] ok 4425 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [variable] ok 4426 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [exception] ok 4427 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [return] ok 4428 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [variable] ok 4429 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 4430 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [return] ok 4431 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 4432 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 4433 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [return] ok 4434 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 4435 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 4436 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [return] ok 4437 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 4438 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 4439 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [return] ok 4440 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 4441 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 4442 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [return] ok 4443 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 4444 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 4445 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [return] ok 4446 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 4447 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [exception] ok 4448 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [return] ok 4449 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [variable] ok 4450 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [exception] ok 4451 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [return] ok 4452 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [variable] ok 4453 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [exception] ok 4454 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [return] ok 4455 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [variable] ok 4456 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 4457 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [return] ok 4458 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 4459 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 4460 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [return] ok 4461 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 4462 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 4463 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [return] ok 4464 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 4465 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 4466 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [return] ok 4467 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 4468 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 4469 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [return] ok 4470 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 4471 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 4472 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [return] ok 4473 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 4474 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [exception] ok 4475 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [return] ok 4476 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [variable] ok 4477 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [exception] ok 4478 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [return] ok 4479 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [variable] ok 4480 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [exception] ok 4481 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [return] ok 4482 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [variable] ok 4483 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 4484 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [return] ok 4485 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 4486 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 4487 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [return] ok 4488 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 4489 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 4490 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [return] ok 4491 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 4492 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 4493 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [return] ok 4494 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 4495 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 4496 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [return] ok 4497 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 4498 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 4499 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [return] ok 4500 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 4501 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [exception] ok 4502 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [return] ok 4503 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [variable] ok 4504 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [exception] ok 4505 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [return] ok 4506 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [variable] ok 4507 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [exception] ok 4508 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [return] ok 4509 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [variable] ok 4510 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [exception] ok 4511 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [return] ok 4512 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [variable] ok 4513 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [exception] ok 4514 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [return] ok 4515 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [variable] ok 4516 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [exception] ok 4517 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [return] ok 4518 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [variable] ok 4519 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [exception] ok 4520 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [return] ok 4521 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [variable] ok 4522 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [exception] ok 4523 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [return] ok 4524 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [variable] ok 4525 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [exception] ok 4526 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [return] ok 4527 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [variable] ok 4528 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [exception] ok 4529 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [return] ok 4530 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [variable] ok 4531 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [exception] ok 4532 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [return] ok 4533 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [variable] ok 4534 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [exception] ok 4535 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [return] ok 4536 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [variable] ok 4537 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [exception] ok 4538 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [return] ok 4539 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [variable] ok 4540 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [exception] ok 4541 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [return] ok 4542 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [variable] ok 4543 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [exception] ok 4544 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [return] ok 4545 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [variable] ok 4546 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [exception] ok 4547 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [return] ok 4548 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [variable] ok 4549 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [exception] ok 4550 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [return] ok 4551 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [variable] ok 4552 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [exception] ok 4553 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [return] ok 4554 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [variable] ok 4555 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [exception] ok 4556 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [return] ok 4557 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [variable] ok 4558 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [exception] ok 4559 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [return] ok 4560 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [variable] ok 4561 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [exception] ok 4562 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [return] ok 4563 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [variable] ok 4564 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [exception] ok 4565 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [return] ok 4566 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [variable] ok 4567 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [exception] ok 4568 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [return] ok 4569 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [variable] ok 4570 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [exception] ok 4571 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [return] ok 4572 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [variable] ok 4573 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [exception] ok 4574 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [return] ok 4575 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [variable] ok 4576 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [exception] ok 4577 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [return] ok 4578 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [variable] ok 4579 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [exception] ok 4580 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [return] ok 4581 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [variable] ok 4582 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [exception] ok 4583 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [return] ok 4584 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [variable] ok 4585 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [exception] ok 4586 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [return] ok 4587 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [variable] ok 4588 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [exception] ok 4589 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [return] ok 4590 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [variable] ok 4591 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4592 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4593 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4594 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4595 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4596 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4597 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4598 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4599 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4600 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4601 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4602 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4603 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4604 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4605 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4606 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4607 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4608 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4609 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4610 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4611 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4612 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4613 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4614 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4615 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4616 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4617 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4618 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4619 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4620 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4621 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4622 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4623 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4624 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4625 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4626 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4627 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4628 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4629 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4630 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4631 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4632 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4633 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4634 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4635 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4636 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4637 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4638 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4639 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4640 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4641 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4642 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4643 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4644 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4645 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4646 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4647 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4648 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4649 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4650 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4651 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4652 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4653 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4654 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4655 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4656 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4657 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4658 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4659 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4660 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4661 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4662 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4663 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4664 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4665 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4666 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4667 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4668 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4669 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4670 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4671 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4672 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4673 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4674 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4675 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4676 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4677 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4678 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4679 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4680 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4681 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4682 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4683 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4684 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4685 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4686 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4687 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4688 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4689 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4690 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4691 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4692 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4693 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4694 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4695 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4696 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4697 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4698 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4699 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4700 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4701 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4702 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4703 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4704 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4705 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4706 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4707 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4708 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4709 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4710 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4711 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4712 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4713 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4714 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4715 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4716 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4717 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4718 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4719 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4720 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4721 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4722 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4723 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4724 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4725 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4726 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4727 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4728 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4729 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4730 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4731 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4732 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4733 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4734 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4735 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4736 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4737 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4738 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4739 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4740 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4741 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4742 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4743 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4744 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4745 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4746 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4747 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4748 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4749 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4750 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4751 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4752 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4753 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4754 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4755 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4756 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4757 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4758 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4759 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4760 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4761 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4762 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4763 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4764 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4765 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4766 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4767 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4768 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4769 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4770 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4771 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4772 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4773 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4774 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4775 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4776 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4777 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4778 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4779 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4780 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4781 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4782 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4783 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4784 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4785 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4786 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4787 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4788 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4789 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4790 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4791 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4792 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4793 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4794 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4795 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4796 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4797 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4798 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4799 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4800 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4801 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4802 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4803 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4804 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4805 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4806 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4807 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4808 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4809 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4810 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4811 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4812 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4813 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4814 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4815 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4816 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4817 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4818 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4819 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4820 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4821 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4822 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4823 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4824 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4825 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4826 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4827 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4828 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4829 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4830 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4831 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4832 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4833 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4834 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4835 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 4836 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4837 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4838 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 4839 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4840 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4841 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 4842 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4843 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4844 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 4845 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4846 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4847 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 4848 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4849 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4850 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 4851 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4852 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4853 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 4854 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4855 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4856 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 4857 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4858 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4859 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 4860 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4861 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4862 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 4863 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4864 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4865 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 4866 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4867 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4868 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 4869 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4870 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4871 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 4872 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4873 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4874 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 4875 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4876 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4877 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 4878 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4879 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4880 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 4881 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4882 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4883 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 4884 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4885 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4886 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 4887 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4888 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4889 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 4890 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4891 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4892 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 4893 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4894 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4895 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 4896 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4897 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4898 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 4899 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4900 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4901 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 4902 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4903 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4904 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 4905 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4906 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4907 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 4908 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4909 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4910 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 4911 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4912 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4913 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 4914 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4915 - my $x; delete $x->[$N[0]] [exception] ok 4916 - my $x; delete $x->[$N[0]] [return] ok 4917 - my $x; delete $x->[$N[0]] [variable] ok 4918 - our $x; local $x; use strict; delete $x->[$N[0]] [exception] ok 4919 - our $x; local $x; use strict; delete $x->[$N[0]] [return] ok 4920 - our $x; local $x; use strict; delete $x->[$N[0]] [variable] ok 4921 - our $x; local $x; no strict; delete $x->[$N[0]] [exception] ok 4922 - our $x; local $x; no strict; delete $x->[$N[0]] [return] ok 4923 - our $x; local $x; no strict; delete $x->[$N[0]] [variable] ok 4924 - my $x; delete $$x[$N[0]] [exception] ok 4925 - my $x; delete $$x[$N[0]] [return] ok 4926 - my $x; delete $$x[$N[0]] [variable] ok 4927 - our $x; local $x; use strict; delete $$x[$N[0]] [exception] ok 4928 - our $x; local $x; use strict; delete $$x[$N[0]] [return] ok 4929 - our $x; local $x; use strict; delete $$x[$N[0]] [variable] ok 4930 - our $x; local $x; no strict; delete $$x[$N[0]] [exception] ok 4931 - our $x; local $x; no strict; delete $$x[$N[0]] [return] ok 4932 - our $x; local $x; no strict; delete $$x[$N[0]] [variable] ok 4933 - my @x; delete $x[$N[0]] [exception] ok 4934 - my @x; delete $x[$N[0]] [return] ok 4935 - my @x; delete $x[$N[0]] [variable] ok 4936 - our @x; local @x; use strict; delete $x[$N[0]] [exception] ok 4937 - our @x; local @x; use strict; delete $x[$N[0]] [return] ok 4938 - our @x; local @x; use strict; delete $x[$N[0]] [variable] ok 4939 - our @x; local @x; no strict; delete $x[$N[0]] [exception] ok 4940 - our @x; local @x; no strict; delete $x[$N[0]] [return] ok 4941 - our @x; local @x; no strict; delete $x[$N[0]] [variable] ok 4942 - my $x; delete $x->[$N[0]] [exception] ok 4943 - my $x; delete $x->[$N[0]] [return] ok 4944 - my $x; delete $x->[$N[0]] [variable] ok 4945 - our $x; local $x; use strict; delete $x->[$N[0]] [exception] ok 4946 - our $x; local $x; use strict; delete $x->[$N[0]] [return] ok 4947 - our $x; local $x; use strict; delete $x->[$N[0]] [variable] ok 4948 - our $x; local $x; no strict; delete $x->[$N[0]] [exception] ok 4949 - our $x; local $x; no strict; delete $x->[$N[0]] [return] ok 4950 - our $x; local $x; no strict; delete $x->[$N[0]] [variable] ok 4951 - my $x; delete $$x[$N[0]] [exception] ok 4952 - my $x; delete $$x[$N[0]] [return] ok 4953 - my $x; delete $$x[$N[0]] [variable] ok 4954 - our $x; local $x; use strict; delete $$x[$N[0]] [exception] ok 4955 - our $x; local $x; use strict; delete $$x[$N[0]] [return] ok 4956 - our $x; local $x; use strict; delete $$x[$N[0]] [variable] ok 4957 - our $x; local $x; no strict; delete $$x[$N[0]] [exception] ok 4958 - our $x; local $x; no strict; delete $$x[$N[0]] [return] ok 4959 - our $x; local $x; no strict; delete $$x[$N[0]] [variable] ok 4960 - my @x; delete $x[$N[0]] [exception] ok 4961 - my @x; delete $x[$N[0]] [return] ok 4962 - my @x; delete $x[$N[0]] [variable] ok 4963 - our @x; local @x; use strict; delete $x[$N[0]] [exception] ok 4964 - our @x; local @x; use strict; delete $x[$N[0]] [return] ok 4965 - our @x; local @x; use strict; delete $x[$N[0]] [variable] ok 4966 - our @x; local @x; no strict; delete $x[$N[0]] [exception] ok 4967 - our @x; local @x; no strict; delete $x[$N[0]] [return] ok 4968 - our @x; local @x; no strict; delete $x[$N[0]] [variable] ok 4969 - my $x; delete $x->[$N[0]] <+fetch> [exception] ok 4970 - my $x; delete $x->[$N[0]] <+fetch> [return] ok 4971 - my $x; delete $x->[$N[0]] <+fetch> [variable] ok 4972 - our $x; local $x; use strict; delete $x->[$N[0]] <+fetch> [exception] ok 4973 - our $x; local $x; use strict; delete $x->[$N[0]] <+fetch> [return] ok 4974 - our $x; local $x; use strict; delete $x->[$N[0]] <+fetch> [variable] ok 4975 - our $x; local $x; no strict; delete $x->[$N[0]] <+fetch> [exception] ok 4976 - our $x; local $x; no strict; delete $x->[$N[0]] <+fetch> [return] ok 4977 - our $x; local $x; no strict; delete $x->[$N[0]] <+fetch> [variable] ok 4978 - my $x; delete $$x[$N[0]] <+fetch> [exception] ok 4979 - my $x; delete $$x[$N[0]] <+fetch> [return] ok 4980 - my $x; delete $$x[$N[0]] <+fetch> [variable] ok 4981 - our $x; local $x; use strict; delete $$x[$N[0]] <+fetch> [exception] ok 4982 - our $x; local $x; use strict; delete $$x[$N[0]] <+fetch> [return] ok 4983 - our $x; local $x; use strict; delete $$x[$N[0]] <+fetch> [variable] ok 4984 - our $x; local $x; no strict; delete $$x[$N[0]] <+fetch> [exception] ok 4985 - our $x; local $x; no strict; delete $$x[$N[0]] <+fetch> [return] ok 4986 - our $x; local $x; no strict; delete $$x[$N[0]] <+fetch> [variable] ok 4987 - my @x; delete $x[$N[0]] <+fetch> [exception] ok 4988 - my @x; delete $x[$N[0]] <+fetch> [return] ok 4989 - my @x; delete $x[$N[0]] <+fetch> [variable] ok 4990 - our @x; local @x; use strict; delete $x[$N[0]] <+fetch> [exception] ok 4991 - our @x; local @x; use strict; delete $x[$N[0]] <+fetch> [return] ok 4992 - our @x; local @x; use strict; delete $x[$N[0]] <+fetch> [variable] ok 4993 - our @x; local @x; no strict; delete $x[$N[0]] <+fetch> [exception] ok 4994 - our @x; local @x; no strict; delete $x[$N[0]] <+fetch> [return] ok 4995 - our @x; local @x; no strict; delete $x[$N[0]] <+fetch> [variable] ok 4996 - my $x; delete $x->[$N[0]] <+exists> [exception] ok 4997 - my $x; delete $x->[$N[0]] <+exists> [return] ok 4998 - my $x; delete $x->[$N[0]] <+exists> [variable] ok 4999 - our $x; local $x; use strict; delete $x->[$N[0]] <+exists> [exception] ok 5000 - our $x; local $x; use strict; delete $x->[$N[0]] <+exists> [return] ok 5001 - our $x; local $x; use strict; delete $x->[$N[0]] <+exists> [variable] ok 5002 - our $x; local $x; no strict; delete $x->[$N[0]] <+exists> [exception] ok 5003 - our $x; local $x; no strict; delete $x->[$N[0]] <+exists> [return] ok 5004 - our $x; local $x; no strict; delete $x->[$N[0]] <+exists> [variable] ok 5005 - my $x; delete $$x[$N[0]] <+exists> [exception] ok 5006 - my $x; delete $$x[$N[0]] <+exists> [return] ok 5007 - my $x; delete $$x[$N[0]] <+exists> [variable] ok 5008 - our $x; local $x; use strict; delete $$x[$N[0]] <+exists> [exception] ok 5009 - our $x; local $x; use strict; delete $$x[$N[0]] <+exists> [return] ok 5010 - our $x; local $x; use strict; delete $$x[$N[0]] <+exists> [variable] ok 5011 - our $x; local $x; no strict; delete $$x[$N[0]] <+exists> [exception] ok 5012 - our $x; local $x; no strict; delete $$x[$N[0]] <+exists> [return] ok 5013 - our $x; local $x; no strict; delete $$x[$N[0]] <+exists> [variable] ok 5014 - my @x; delete $x[$N[0]] <+exists> [exception] ok 5015 - my @x; delete $x[$N[0]] <+exists> [return] ok 5016 - my @x; delete $x[$N[0]] <+exists> [variable] ok 5017 - our @x; local @x; use strict; delete $x[$N[0]] <+exists> [exception] ok 5018 - our @x; local @x; use strict; delete $x[$N[0]] <+exists> [return] ok 5019 - our @x; local @x; use strict; delete $x[$N[0]] <+exists> [variable] ok 5020 - our @x; local @x; no strict; delete $x[$N[0]] <+exists> [exception] ok 5021 - our @x; local @x; no strict; delete $x[$N[0]] <+exists> [return] ok 5022 - our @x; local @x; no strict; delete $x[$N[0]] <+exists> [variable] ok 5023 - my $x; delete $x->[$N[0]] <+delete> [exception] ok 5024 - my $x; delete $x->[$N[0]] <+delete> [return] ok 5025 - my $x; delete $x->[$N[0]] <+delete> [variable] ok 5026 - our $x; local $x; use strict; delete $x->[$N[0]] <+delete> [exception] ok 5027 - our $x; local $x; use strict; delete $x->[$N[0]] <+delete> [return] ok 5028 - our $x; local $x; use strict; delete $x->[$N[0]] <+delete> [variable] ok 5029 - our $x; local $x; no strict; delete $x->[$N[0]] <+delete> [exception] ok 5030 - our $x; local $x; no strict; delete $x->[$N[0]] <+delete> [return] ok 5031 - our $x; local $x; no strict; delete $x->[$N[0]] <+delete> [variable] ok 5032 - my $x; delete $$x[$N[0]] <+delete> [exception] ok 5033 - my $x; delete $$x[$N[0]] <+delete> [return] ok 5034 - my $x; delete $$x[$N[0]] <+delete> [variable] ok 5035 - our $x; local $x; use strict; delete $$x[$N[0]] <+delete> [exception] ok 5036 - our $x; local $x; use strict; delete $$x[$N[0]] <+delete> [return] ok 5037 - our $x; local $x; use strict; delete $$x[$N[0]] <+delete> [variable] ok 5038 - our $x; local $x; no strict; delete $$x[$N[0]] <+delete> [exception] ok 5039 - our $x; local $x; no strict; delete $$x[$N[0]] <+delete> [return] ok 5040 - our $x; local $x; no strict; delete $$x[$N[0]] <+delete> [variable] ok 5041 - my @x; delete $x[$N[0]] <+delete> [exception] ok 5042 - my @x; delete $x[$N[0]] <+delete> [return] ok 5043 - my @x; delete $x[$N[0]] <+delete> [variable] ok 5044 - our @x; local @x; use strict; delete $x[$N[0]] <+delete> [exception] ok 5045 - our @x; local @x; use strict; delete $x[$N[0]] <+delete> [return] ok 5046 - our @x; local @x; use strict; delete $x[$N[0]] <+delete> [variable] ok 5047 - our @x; local @x; no strict; delete $x[$N[0]] <+delete> [exception] ok 5048 - our @x; local @x; no strict; delete $x[$N[0]] <+delete> [return] ok 5049 - our @x; local @x; no strict; delete $x[$N[0]] <+delete> [variable] ok 5050 - my $x; delete $x->[$N[0]] <+store> [exception] ok 5051 - my $x; delete $x->[$N[0]] <+store> [return] ok 5052 - my $x; delete $x->[$N[0]] <+store> [variable] ok 5053 - our $x; local $x; use strict; delete $x->[$N[0]] <+store> [exception] ok 5054 - our $x; local $x; use strict; delete $x->[$N[0]] <+store> [return] ok 5055 - our $x; local $x; use strict; delete $x->[$N[0]] <+store> [variable] ok 5056 - our $x; local $x; no strict; delete $x->[$N[0]] <+store> [exception] ok 5057 - our $x; local $x; no strict; delete $x->[$N[0]] <+store> [return] ok 5058 - our $x; local $x; no strict; delete $x->[$N[0]] <+store> [variable] ok 5059 - my $x; delete $$x[$N[0]] <+store> [exception] ok 5060 - my $x; delete $$x[$N[0]] <+store> [return] ok 5061 - my $x; delete $$x[$N[0]] <+store> [variable] ok 5062 - our $x; local $x; use strict; delete $$x[$N[0]] <+store> [exception] ok 5063 - our $x; local $x; use strict; delete $$x[$N[0]] <+store> [return] ok 5064 - our $x; local $x; use strict; delete $$x[$N[0]] <+store> [variable] ok 5065 - our $x; local $x; no strict; delete $$x[$N[0]] <+store> [exception] ok 5066 - our $x; local $x; no strict; delete $$x[$N[0]] <+store> [return] ok 5067 - our $x; local $x; no strict; delete $$x[$N[0]] <+store> [variable] ok 5068 - my @x; delete $x[$N[0]] <+store> [exception] ok 5069 - my @x; delete $x[$N[0]] <+store> [return] ok 5070 - my @x; delete $x[$N[0]] <+store> [variable] ok 5071 - our @x; local @x; use strict; delete $x[$N[0]] <+store> [exception] ok 5072 - our @x; local @x; use strict; delete $x[$N[0]] <+store> [return] ok 5073 - our @x; local @x; use strict; delete $x[$N[0]] <+store> [variable] ok 5074 - our @x; local @x; no strict; delete $x[$N[0]] <+store> [exception] ok 5075 - our @x; local @x; no strict; delete $x[$N[0]] <+store> [return] ok 5076 - our @x; local @x; no strict; delete $x[$N[0]] <+store> [variable] ok 5077 - my $x; delete $x->[$N[0]] <+strict +fetch> [exception] ok 5078 - my $x; delete $x->[$N[0]] <+strict +fetch> [return] ok 5079 - my $x; delete $x->[$N[0]] <+strict +fetch> [variable] ok 5080 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +fetch> [exception] ok 5081 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +fetch> [return] ok 5082 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +fetch> [variable] ok 5083 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +fetch> [exception] ok 5084 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +fetch> [return] ok 5085 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +fetch> [variable] ok 5086 - my $x; delete $$x[$N[0]] <+strict +fetch> [exception] ok 5087 - my $x; delete $$x[$N[0]] <+strict +fetch> [return] ok 5088 - my $x; delete $$x[$N[0]] <+strict +fetch> [variable] ok 5089 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +fetch> [exception] ok 5090 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +fetch> [return] ok 5091 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +fetch> [variable] ok 5092 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +fetch> [exception] ok 5093 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +fetch> [return] ok 5094 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +fetch> [variable] ok 5095 - my @x; delete $x[$N[0]] <+strict +fetch> [exception] ok 5096 - my @x; delete $x[$N[0]] <+strict +fetch> [return] ok 5097 - my @x; delete $x[$N[0]] <+strict +fetch> [variable] ok 5098 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +fetch> [exception] ok 5099 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +fetch> [return] ok 5100 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +fetch> [variable] ok 5101 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +fetch> [exception] ok 5102 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +fetch> [return] ok 5103 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +fetch> [variable] ok 5104 - my $x; delete $x->[$N[0]] <+strict +exists> [exception] ok 5105 - my $x; delete $x->[$N[0]] <+strict +exists> [return] ok 5106 - my $x; delete $x->[$N[0]] <+strict +exists> [variable] ok 5107 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +exists> [exception] ok 5108 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +exists> [return] ok 5109 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +exists> [variable] ok 5110 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +exists> [exception] ok 5111 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +exists> [return] ok 5112 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +exists> [variable] ok 5113 - my $x; delete $$x[$N[0]] <+strict +exists> [exception] ok 5114 - my $x; delete $$x[$N[0]] <+strict +exists> [return] ok 5115 - my $x; delete $$x[$N[0]] <+strict +exists> [variable] ok 5116 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +exists> [exception] ok 5117 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +exists> [return] ok 5118 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +exists> [variable] ok 5119 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +exists> [exception] ok 5120 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +exists> [return] ok 5121 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +exists> [variable] ok 5122 - my @x; delete $x[$N[0]] <+strict +exists> [exception] ok 5123 - my @x; delete $x[$N[0]] <+strict +exists> [return] ok 5124 - my @x; delete $x[$N[0]] <+strict +exists> [variable] ok 5125 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +exists> [exception] ok 5126 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +exists> [return] ok 5127 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +exists> [variable] ok 5128 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +exists> [exception] ok 5129 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +exists> [return] ok 5130 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +exists> [variable] ok 5131 - my $x; delete $x->[$N[0]] <+strict +delete> [exception] ok 5132 - my $x; delete $x->[$N[0]] <+strict +delete> [return] ok 5133 - my $x; delete $x->[$N[0]] <+strict +delete> [variable] ok 5134 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +delete> [exception] ok 5135 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +delete> [return] ok 5136 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +delete> [variable] ok 5137 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +delete> [exception] ok 5138 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +delete> [return] ok 5139 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +delete> [variable] ok 5140 - my $x; delete $$x[$N[0]] <+strict +delete> [exception] ok 5141 - my $x; delete $$x[$N[0]] <+strict +delete> [return] ok 5142 - my $x; delete $$x[$N[0]] <+strict +delete> [variable] ok 5143 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +delete> [exception] ok 5144 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +delete> [return] ok 5145 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +delete> [variable] ok 5146 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +delete> [exception] ok 5147 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +delete> [return] ok 5148 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +delete> [variable] ok 5149 - my @x; 1 <+strict +delete> [exception] ok 5150 - my @x; 1 <+strict +delete> [return] ok 5151 - my @x; 1 <+strict +delete> [variable] ok 5152 - our @x; local @x; use strict; 1 <+strict +delete> [exception] ok 5153 - our @x; local @x; use strict; 1 <+strict +delete> [return] ok 5154 - our @x; local @x; use strict; 1 <+strict +delete> [variable] ok 5155 - our @x; local @x; no strict; 1 <+strict +delete> [exception] ok 5156 - our @x; local @x; no strict; 1 <+strict +delete> [return] ok 5157 - our @x; local @x; no strict; 1 <+strict +delete> [variable] ok 5158 - my $x; delete $x->[$N[0]] <+strict +store> [exception] ok 5159 - my $x; delete $x->[$N[0]] <+strict +store> [return] ok 5160 - my $x; delete $x->[$N[0]] <+strict +store> [variable] ok 5161 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +store> [exception] ok 5162 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +store> [return] ok 5163 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +store> [variable] ok 5164 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +store> [exception] ok 5165 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +store> [return] ok 5166 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +store> [variable] ok 5167 - my $x; delete $$x[$N[0]] <+strict +store> [exception] ok 5168 - my $x; delete $$x[$N[0]] <+strict +store> [return] ok 5169 - my $x; delete $$x[$N[0]] <+strict +store> [variable] ok 5170 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +store> [exception] ok 5171 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +store> [return] ok 5172 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +store> [variable] ok 5173 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +store> [exception] ok 5174 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +store> [return] ok 5175 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +store> [variable] ok 5176 - my @x; delete $x[$N[0]] <+strict +store> [exception] ok 5177 - my @x; delete $x[$N[0]] <+strict +store> [return] ok 5178 - my @x; delete $x[$N[0]] <+strict +store> [variable] ok 5179 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +store> [exception] ok 5180 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +store> [return] ok 5181 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +store> [variable] ok 5182 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +store> [exception] ok 5183 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +store> [return] ok 5184 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +store> [variable] ok 5185 - my $x; delete $x->[$N[0]]->[$N[1]] [exception] ok 5186 - my $x; delete $x->[$N[0]]->[$N[1]] [return] ok 5187 - my $x; delete $x->[$N[0]]->[$N[1]] [variable] ok 5188 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] [exception] ok 5189 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] [return] ok 5190 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] [variable] ok 5191 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] [exception] ok 5192 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] [return] ok 5193 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] [variable] ok 5194 - my $x; delete $$x[$N[0]]->[$N[1]] [exception] ok 5195 - my $x; delete $$x[$N[0]]->[$N[1]] [return] ok 5196 - my $x; delete $$x[$N[0]]->[$N[1]] [variable] ok 5197 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] [exception] ok 5198 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] [return] ok 5199 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] [variable] ok 5200 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] [exception] ok 5201 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] [return] ok 5202 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] [variable] ok 5203 - my @x; delete $x[$N[0]]->[$N[1]] [exception] ok 5204 - my @x; delete $x[$N[0]]->[$N[1]] [return] ok 5205 - my @x; delete $x[$N[0]]->[$N[1]] [variable] ok 5206 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] [exception] ok 5207 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] [return] ok 5208 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] [variable] ok 5209 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] [exception] ok 5210 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] [return] ok 5211 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] [variable] ok 5212 - my $x; delete $x->[$N[0]]->[$N[1]] [exception] ok 5213 - my $x; delete $x->[$N[0]]->[$N[1]] [return] ok 5214 - my $x; delete $x->[$N[0]]->[$N[1]] [variable] ok 5215 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] [exception] ok 5216 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] [return] ok 5217 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] [variable] ok 5218 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] [exception] ok 5219 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] [return] ok 5220 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] [variable] ok 5221 - my $x; delete $$x[$N[0]]->[$N[1]] [exception] ok 5222 - my $x; delete $$x[$N[0]]->[$N[1]] [return] ok 5223 - my $x; delete $$x[$N[0]]->[$N[1]] [variable] ok 5224 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] [exception] ok 5225 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] [return] ok 5226 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] [variable] ok 5227 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] [exception] ok 5228 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] [return] ok 5229 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] [variable] ok 5230 - my @x; delete $x[$N[0]]->[$N[1]] [exception] ok 5231 - my @x; delete $x[$N[0]]->[$N[1]] [return] ok 5232 - my @x; delete $x[$N[0]]->[$N[1]] [variable] ok 5233 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] [exception] ok 5234 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] [return] ok 5235 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] [variable] ok 5236 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] [exception] ok 5237 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] [return] ok 5238 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] [variable] ok 5239 - my $x; delete $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 5240 - my $x; delete $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 5241 - my $x; delete $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 5242 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 5243 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 5244 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 5245 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 5246 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 5247 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 5248 - my $x; delete $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5249 - my $x; delete $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 5250 - my $x; delete $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5251 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5252 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 5253 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5254 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5255 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 5256 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5257 - my @x; delete $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5258 - my @x; delete $x[$N[0]]->[$N[1]] <+fetch> [return] ok 5259 - my @x; delete $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5260 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5261 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+fetch> [return] ok 5262 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5263 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5264 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+fetch> [return] ok 5265 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5266 - my $x; delete $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 5267 - my $x; delete $x->[$N[0]]->[$N[1]] <+exists> [return] ok 5268 - my $x; delete $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 5269 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 5270 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+exists> [return] ok 5271 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 5272 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 5273 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+exists> [return] ok 5274 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 5275 - my $x; delete $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 5276 - my $x; delete $$x[$N[0]]->[$N[1]] <+exists> [return] ok 5277 - my $x; delete $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 5278 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 5279 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+exists> [return] ok 5280 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 5281 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 5282 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+exists> [return] ok 5283 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 5284 - my @x; delete $x[$N[0]]->[$N[1]] <+exists> [exception] ok 5285 - my @x; delete $x[$N[0]]->[$N[1]] <+exists> [return] ok 5286 - my @x; delete $x[$N[0]]->[$N[1]] <+exists> [variable] ok 5287 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+exists> [exception] ok 5288 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+exists> [return] ok 5289 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+exists> [variable] ok 5290 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+exists> [exception] ok 5291 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+exists> [return] ok 5292 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+exists> [variable] ok 5293 - my $x; delete $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 5294 - my $x; delete $x->[$N[0]]->[$N[1]] <+delete> [return] ok 5295 - my $x; delete $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 5296 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 5297 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+delete> [return] ok 5298 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 5299 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 5300 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+delete> [return] ok 5301 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 5302 - my $x; delete $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 5303 - my $x; delete $$x[$N[0]]->[$N[1]] <+delete> [return] ok 5304 - my $x; delete $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 5305 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 5306 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+delete> [return] ok 5307 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 5308 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 5309 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+delete> [return] ok 5310 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 5311 - my @x; delete $x[$N[0]]->[$N[1]] <+delete> [exception] ok 5312 - my @x; delete $x[$N[0]]->[$N[1]] <+delete> [return] ok 5313 - my @x; delete $x[$N[0]]->[$N[1]] <+delete> [variable] ok 5314 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+delete> [exception] ok 5315 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+delete> [return] ok 5316 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+delete> [variable] ok 5317 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+delete> [exception] ok 5318 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+delete> [return] ok 5319 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+delete> [variable] ok 5320 - my $x; delete $x->[$N[0]]->[$N[1]] <+store> [exception] ok 5321 - my $x; delete $x->[$N[0]]->[$N[1]] <+store> [return] ok 5322 - my $x; delete $x->[$N[0]]->[$N[1]] <+store> [variable] ok 5323 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+store> [exception] ok 5324 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+store> [return] ok 5325 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+store> [variable] ok 5326 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+store> [exception] ok 5327 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+store> [return] ok 5328 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+store> [variable] ok 5329 - my $x; delete $$x[$N[0]]->[$N[1]] <+store> [exception] ok 5330 - my $x; delete $$x[$N[0]]->[$N[1]] <+store> [return] ok 5331 - my $x; delete $$x[$N[0]]->[$N[1]] <+store> [variable] ok 5332 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+store> [exception] ok 5333 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+store> [return] ok 5334 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+store> [variable] ok 5335 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+store> [exception] ok 5336 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+store> [return] ok 5337 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+store> [variable] ok 5338 - my @x; delete $x[$N[0]]->[$N[1]] <+store> [exception] ok 5339 - my @x; delete $x[$N[0]]->[$N[1]] <+store> [return] ok 5340 - my @x; delete $x[$N[0]]->[$N[1]] <+store> [variable] ok 5341 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+store> [exception] ok 5342 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+store> [return] ok 5343 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+store> [variable] ok 5344 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+store> [exception] ok 5345 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+store> [return] ok 5346 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+store> [variable] ok 5347 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5348 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5349 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5350 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5351 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5352 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5353 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5354 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5355 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5356 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5357 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5358 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5359 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5360 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5361 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5362 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5363 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5364 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5365 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5366 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5367 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5368 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5369 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5370 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5371 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5372 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5373 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5374 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5375 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5376 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5377 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5378 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5379 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5380 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5381 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5382 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5383 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5384 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5385 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5386 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5387 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5388 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5389 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5390 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5391 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5392 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5393 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5394 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5395 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5396 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5397 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5398 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5399 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5400 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5401 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5402 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5403 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5404 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5405 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5406 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5407 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5408 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5409 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5410 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5411 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5412 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5413 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5414 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5415 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5416 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5417 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5418 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5419 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5420 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5421 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5422 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5423 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5424 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5425 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5426 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5427 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5428 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5429 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 5430 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5431 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5432 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 5433 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5434 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5435 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 5436 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5437 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5438 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 5439 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5440 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5441 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 5442 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5443 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5444 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 5445 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5446 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5447 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 5448 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5449 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5450 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 5451 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5452 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5453 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 5454 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5455 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [exception] ok 5456 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [return] ok 5457 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [variable] ok 5458 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [exception] ok 5459 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [return] ok 5460 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [variable] ok 5461 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [exception] ok 5462 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [return] ok 5463 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [variable] ok 5464 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [exception] ok 5465 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [return] ok 5466 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [variable] ok 5467 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [exception] ok 5468 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [return] ok 5469 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [variable] ok 5470 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [exception] ok 5471 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [return] ok 5472 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [variable] ok 5473 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [exception] ok 5474 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [return] ok 5475 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [variable] ok 5476 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [exception] ok 5477 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [return] ok 5478 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [variable] ok 5479 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [exception] ok 5480 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [return] ok 5481 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [variable] ok 5482 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [exception] ok 5483 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [return] ok 5484 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [variable] ok 5485 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [exception] ok 5486 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [return] ok 5487 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [variable] ok 5488 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [exception] ok 5489 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [return] ok 5490 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [variable] ok 5491 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [exception] ok 5492 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [return] ok 5493 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [variable] ok 5494 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [exception] ok 5495 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [return] ok 5496 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [variable] ok 5497 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [exception] ok 5498 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [return] ok 5499 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [variable] ok 5500 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [exception] ok 5501 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [return] ok 5502 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [variable] ok 5503 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [exception] ok 5504 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [return] ok 5505 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [variable] ok 5506 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [exception] ok 5507 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [return] ok 5508 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [variable] ok 5509 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [exception] ok 5510 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [return] ok 5511 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [variable] ok 5512 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [exception] ok 5513 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [return] ok 5514 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [variable] ok 5515 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [exception] ok 5516 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [return] ok 5517 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [variable] ok 5518 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [exception] ok 5519 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [return] ok 5520 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [variable] ok 5521 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [exception] ok 5522 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [return] ok 5523 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [variable] ok 5524 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [exception] ok 5525 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [return] ok 5526 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [variable] ok 5527 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [exception] ok 5528 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [return] ok 5529 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [variable] ok 5530 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [exception] ok 5531 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [return] ok 5532 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [variable] ok 5533 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [exception] ok 5534 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [return] ok 5535 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [variable] ok 5536 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [exception] ok 5537 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [return] ok 5538 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [variable] ok 5539 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [exception] ok 5540 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [return] ok 5541 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [variable] ok 5542 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [exception] ok 5543 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [return] ok 5544 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [variable] ok 5545 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [exception] ok 5546 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [return] ok 5547 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [variable] ok 5548 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [exception] ok 5549 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [return] ok 5550 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [variable] ok 5551 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [exception] ok 5552 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [return] ok 5553 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [variable] ok 5554 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [exception] ok 5555 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [return] ok 5556 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [variable] ok 5557 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [exception] ok 5558 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [return] ok 5559 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [variable] ok 5560 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [exception] ok 5561 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [return] ok 5562 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [variable] ok 5563 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [exception] ok 5564 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [return] ok 5565 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [variable] ok 5566 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [exception] ok 5567 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [return] ok 5568 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [variable] ok 5569 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [exception] ok 5570 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [return] ok 5571 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [variable] ok 5572 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [exception] ok 5573 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [return] ok 5574 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [variable] ok 5575 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [exception] ok 5576 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [return] ok 5577 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [variable] ok 5578 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [exception] ok 5579 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [return] ok 5580 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [variable] ok 5581 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [exception] ok 5582 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [return] ok 5583 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [variable] ok 5584 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [exception] ok 5585 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [return] ok 5586 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [variable] ok 5587 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [exception] ok 5588 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [return] ok 5589 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [variable] ok 5590 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [exception] ok 5591 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [return] ok 5592 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [variable] ok 5593 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [exception] ok 5594 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [return] ok 5595 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [variable] ok 5596 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [exception] ok 5597 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [return] ok 5598 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [variable] ok 5599 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [exception] ok 5600 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [return] ok 5601 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [variable] ok 5602 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [exception] ok 5603 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [return] ok 5604 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [variable] ok 5605 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [exception] ok 5606 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [return] ok 5607 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [variable] ok 5608 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [exception] ok 5609 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [return] ok 5610 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [variable] ok 5611 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [exception] ok 5612 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [return] ok 5613 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [variable] ok 5614 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [exception] ok 5615 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [return] ok 5616 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [variable] ok 5617 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [exception] ok 5618 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [return] ok 5619 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [variable] ok 5620 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [exception] ok 5621 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [return] ok 5622 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [variable] ok 5623 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [exception] ok 5624 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [return] ok 5625 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [variable] ok 5626 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [exception] ok 5627 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [return] ok 5628 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [variable] ok 5629 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [exception] ok 5630 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [return] ok 5631 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [variable] ok 5632 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [exception] ok 5633 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [return] ok 5634 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [variable] ok 5635 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [exception] ok 5636 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [return] ok 5637 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [variable] ok 5638 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [exception] ok 5639 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [return] ok 5640 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [variable] ok 5641 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [exception] ok 5642 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [return] ok 5643 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [variable] ok 5644 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [exception] ok 5645 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [return] ok 5646 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [variable] ok 5647 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [exception] ok 5648 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [return] ok 5649 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [variable] ok 5650 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [exception] ok 5651 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [return] ok 5652 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [variable] ok 5653 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [exception] ok 5654 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [return] ok 5655 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [variable] ok 5656 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [exception] ok 5657 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [return] ok 5658 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [variable] ok 5659 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [exception] ok 5660 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [return] ok 5661 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [variable] ok 5662 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [exception] ok 5663 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [return] ok 5664 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [variable] ok 5665 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [exception] ok 5666 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [return] ok 5667 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [variable] ok 5668 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [exception] ok 5669 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [return] ok 5670 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [variable] ok 5671 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [exception] ok 5672 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [return] ok 5673 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [variable] ok 5674 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [exception] ok 5675 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [return] ok 5676 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [variable] ok 5677 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [exception] ok 5678 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [return] ok 5679 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [variable] ok 5680 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [exception] ok 5681 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [return] ok 5682 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [variable] ok 5683 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [exception] ok 5684 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [return] ok 5685 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [variable] ok 5686 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [exception] ok 5687 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [return] ok 5688 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [variable] ok 5689 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [exception] ok 5690 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [return] ok 5691 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [variable] ok 5692 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [exception] ok 5693 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [return] ok 5694 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [variable] ok 5695 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [exception] ok 5696 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [return] ok 5697 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [variable] ok 5698 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [exception] ok 5699 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [return] ok 5700 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [variable] ok 5701 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [exception] ok 5702 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [return] ok 5703 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [variable] ok 5704 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [exception] ok 5705 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [return] ok 5706 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [variable] ok 5707 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [exception] ok 5708 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [return] ok 5709 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [variable] ok 5710 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [exception] ok 5711 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [return] ok 5712 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [variable] ok 5713 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [exception] ok 5714 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [return] ok 5715 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [variable] ok 5716 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [exception] ok 5717 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [return] ok 5718 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [variable] ok 5719 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [exception] ok 5720 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [return] ok 5721 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [variable] ok 5722 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [exception] ok 5723 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [return] ok 5724 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [variable] ok 5725 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [exception] ok 5726 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [return] ok 5727 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [variable] ok 5728 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [exception] ok 5729 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [return] ok 5730 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [variable] ok 5731 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [exception] ok 5732 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [return] ok 5733 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [variable] ok 5734 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [exception] ok 5735 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [return] ok 5736 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [variable] ok 5737 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [exception] ok 5738 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [return] ok 5739 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [variable] ok 5740 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [exception] ok 5741 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [return] ok 5742 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [variable] ok 5743 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [exception] ok 5744 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [return] ok 5745 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [variable] ok 5746 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [exception] ok 5747 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [return] ok 5748 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [variable] ok 5749 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [exception] ok 5750 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [return] ok 5751 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [variable] ok 5752 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [exception] ok 5753 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [return] ok 5754 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [variable] ok 5755 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [exception] ok 5756 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [return] ok 5757 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [variable] ok 5758 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [exception] ok 5759 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [return] ok 5760 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [variable] ok 5761 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [exception] ok 5762 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [return] ok 5763 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [variable] ok 5764 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [exception] ok 5765 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [return] ok 5766 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [variable] ok 5767 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [exception] ok 5768 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [return] ok 5769 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [variable] ok 5770 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [exception] ok 5771 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [return] ok 5772 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [variable] ok 5773 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [exception] ok 5774 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [return] ok 5775 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [variable] ok 5776 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [exception] ok 5777 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [return] ok 5778 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [variable] ok 5779 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [exception] ok 5780 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [return] ok 5781 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [variable] ok 5782 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [exception] ok 5783 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [return] ok 5784 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [variable] ok 5785 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [exception] ok 5786 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [return] ok 5787 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [variable] ok 5788 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [exception] ok 5789 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [return] ok 5790 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [variable] ok 5791 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [exception] ok 5792 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [return] ok 5793 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [variable] ok 5794 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [exception] ok 5795 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [return] ok 5796 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [variable] ok 5797 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [exception] ok 5798 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [return] ok 5799 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [variable] ok 5800 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [exception] ok 5801 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [return] ok 5802 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [variable] ok 5803 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [exception] ok 5804 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [return] ok 5805 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [variable] ok 5806 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [exception] ok 5807 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [return] ok 5808 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [variable] ok 5809 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [exception] ok 5810 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [return] ok 5811 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [variable] ok 5812 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [exception] ok 5813 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [return] ok 5814 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [variable] ok 5815 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [exception] ok 5816 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [return] ok 5817 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [variable] ok 5818 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [exception] ok 5819 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [return] ok 5820 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [variable] ok 5821 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [exception] ok 5822 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [return] ok 5823 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [variable] ok 5824 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [exception] ok 5825 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [return] ok 5826 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [variable] ok 5827 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [exception] ok 5828 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [return] ok 5829 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [variable] ok 5830 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [exception] ok 5831 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [return] ok 5832 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [variable] ok 5833 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [exception] ok 5834 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [return] ok 5835 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [variable] ok 5836 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [exception] ok 5837 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [return] ok 5838 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [variable] ok 5839 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [exception] ok 5840 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [return] ok 5841 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [variable] ok 5842 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [exception] ok 5843 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [return] ok 5844 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [variable] ok 5845 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [exception] ok 5846 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [return] ok 5847 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [variable] ok 5848 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [exception] ok 5849 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [return] ok 5850 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [variable] ok 5851 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [exception] ok 5852 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [return] ok 5853 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [variable] ok 5854 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [exception] ok 5855 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [return] ok 5856 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [variable] ok 5857 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [exception] ok 5858 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [return] ok 5859 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [variable] ok 5860 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [exception] ok 5861 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [return] ok 5862 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [variable] ok 5863 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [exception] ok 5864 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [return] ok 5865 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [variable] ok 5866 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [exception] ok 5867 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [return] ok 5868 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [variable] ok 5869 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [exception] ok 5870 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [return] ok 5871 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [variable] ok 5872 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [exception] ok 5873 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [return] ok 5874 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [variable] ok 5875 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [exception] ok 5876 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [return] ok 5877 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [variable] ok 5878 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [exception] ok 5879 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [return] ok 5880 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [variable] ok 5881 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [exception] ok 5882 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [return] ok 5883 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [variable] ok 5884 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [exception] ok 5885 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [return] ok 5886 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [variable] ok 5887 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 5888 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 5889 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 5890 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 5891 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 5892 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 5893 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 5894 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 5895 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 5896 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5897 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 5898 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5899 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5900 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 5901 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5902 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5903 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 5904 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5905 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5906 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [return] ok 5907 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5908 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5909 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [return] ok 5910 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5911 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5912 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [return] ok 5913 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5914 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 5915 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 5916 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 5917 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 5918 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 5919 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 5920 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 5921 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 5922 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 5923 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 5924 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 5925 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 5926 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 5927 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 5928 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 5929 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 5930 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 5931 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 5932 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 5933 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [return] ok 5934 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 5935 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 5936 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [return] ok 5937 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 5938 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 5939 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [return] ok 5940 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 5941 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 5942 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 5943 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 5944 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 5945 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 5946 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 5947 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 5948 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 5949 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 5950 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 5951 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 5952 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 5953 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 5954 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 5955 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 5956 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 5957 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 5958 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 5959 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 5960 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [return] ok 5961 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 5962 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 5963 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [return] ok 5964 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 5965 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 5966 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [return] ok 5967 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 5968 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 5969 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [return] ok 5970 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 5971 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 5972 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [return] ok 5973 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 5974 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 5975 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [return] ok 5976 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 5977 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 5978 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [return] ok 5979 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 5980 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 5981 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [return] ok 5982 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 5983 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 5984 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [return] ok 5985 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 5986 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [exception] ok 5987 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [return] ok 5988 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [variable] ok 5989 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [exception] ok 5990 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [return] ok 5991 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [variable] ok 5992 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [exception] ok 5993 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [return] ok 5994 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [variable] ok 5995 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 5996 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [return] ok 5997 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 5998 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 5999 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [return] ok 6000 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 6001 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 6002 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [return] ok 6003 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 6004 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 6005 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [return] ok 6006 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 6007 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 6008 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [return] ok 6009 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 6010 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 6011 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [return] ok 6012 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 6013 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [exception] ok 6014 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [return] ok 6015 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [variable] ok 6016 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [exception] ok 6017 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [return] ok 6018 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [variable] ok 6019 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [exception] ok 6020 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [return] ok 6021 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [variable] ok 6022 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 6023 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [return] ok 6024 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 6025 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 6026 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [return] ok 6027 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 6028 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 6029 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [return] ok 6030 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 6031 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 6032 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [return] ok 6033 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 6034 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 6035 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [return] ok 6036 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 6037 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 6038 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [return] ok 6039 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 6040 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [exception] ok 6041 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [return] ok 6042 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [variable] ok 6043 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [exception] ok 6044 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [return] ok 6045 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [variable] ok 6046 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [exception] ok 6047 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [return] ok 6048 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [variable] ok 6049 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 6050 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [return] ok 6051 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 6052 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 6053 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [return] ok 6054 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 6055 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 6056 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [return] ok 6057 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 6058 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 6059 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [return] ok 6060 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 6061 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 6062 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [return] ok 6063 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 6064 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 6065 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [return] ok 6066 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 6067 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [exception] ok 6068 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [return] ok 6069 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [variable] ok 6070 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [exception] ok 6071 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [return] ok 6072 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [variable] ok 6073 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [exception] ok 6074 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [return] ok 6075 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [variable] ok 6076 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 6077 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [return] ok 6078 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 6079 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 6080 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [return] ok 6081 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 6082 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 6083 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [return] ok 6084 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 6085 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 6086 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [return] ok 6087 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 6088 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 6089 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [return] ok 6090 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 6091 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 6092 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [return] ok 6093 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 6094 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [exception] ok 6095 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [return] ok 6096 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [variable] ok 6097 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [exception] ok 6098 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [return] ok 6099 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [variable] ok 6100 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [exception] ok 6101 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [return] ok 6102 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [variable] ok 6103 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 6104 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [return] ok 6105 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 6106 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 6107 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [return] ok 6108 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 6109 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 6110 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [return] ok 6111 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 6112 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 6113 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [return] ok 6114 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 6115 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 6116 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [return] ok 6117 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 6118 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 6119 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [return] ok 6120 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 6121 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [exception] ok 6122 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [return] ok 6123 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [variable] ok 6124 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [exception] ok 6125 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [return] ok 6126 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [variable] ok 6127 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [exception] ok 6128 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [return] ok 6129 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [variable] ok 6130 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [exception] ok 6131 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [return] ok 6132 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [variable] ok 6133 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [exception] ok 6134 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [return] ok 6135 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [variable] ok 6136 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [exception] ok 6137 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [return] ok 6138 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [variable] ok 6139 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [exception] ok 6140 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [return] ok 6141 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [variable] ok 6142 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [exception] ok 6143 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [return] ok 6144 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [variable] ok 6145 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [exception] ok 6146 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [return] ok 6147 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [variable] ok 6148 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [exception] ok 6149 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [return] ok 6150 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [variable] ok 6151 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [exception] ok 6152 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [return] ok 6153 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [variable] ok 6154 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [exception] ok 6155 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [return] ok 6156 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [variable] ok 6157 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [exception] ok 6158 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [return] ok 6159 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [variable] ok 6160 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [exception] ok 6161 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [return] ok 6162 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [variable] ok 6163 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [exception] ok 6164 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [return] ok 6165 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [variable] ok 6166 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [exception] ok 6167 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [return] ok 6168 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [variable] ok 6169 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [exception] ok 6170 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [return] ok 6171 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [variable] ok 6172 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [exception] ok 6173 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [return] ok 6174 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [variable] ok 6175 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [exception] ok 6176 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [return] ok 6177 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [variable] ok 6178 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [exception] ok 6179 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [return] ok 6180 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [variable] ok 6181 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [exception] ok 6182 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [return] ok 6183 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [variable] ok 6184 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [exception] ok 6185 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [return] ok 6186 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [variable] ok 6187 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [exception] ok 6188 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [return] ok 6189 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [variable] ok 6190 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [exception] ok 6191 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [return] ok 6192 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [variable] ok 6193 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [exception] ok 6194 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [return] ok 6195 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [variable] ok 6196 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [exception] ok 6197 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [return] ok 6198 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [variable] ok 6199 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [exception] ok 6200 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [return] ok 6201 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [variable] ok 6202 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [exception] ok 6203 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [return] ok 6204 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [variable] ok 6205 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [exception] ok 6206 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [return] ok 6207 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [variable] ok 6208 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [exception] ok 6209 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [return] ok 6210 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [variable] ok 6211 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6212 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6213 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6214 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6215 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6216 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6217 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6218 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6219 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6220 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6221 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6222 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6223 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6224 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6225 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6226 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6227 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6228 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6229 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6230 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6231 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6232 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6233 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6234 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6235 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6236 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6237 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6238 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6239 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6240 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6241 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6242 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6243 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6244 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6245 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6246 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6247 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6248 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6249 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6250 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6251 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6252 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6253 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6254 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6255 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6256 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6257 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6258 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6259 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6260 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6261 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6262 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6263 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6264 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6265 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6266 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6267 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6268 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6269 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6270 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6271 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6272 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6273 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6274 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6275 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6276 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6277 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6278 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6279 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6280 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6281 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6282 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6283 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6284 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6285 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6286 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6287 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6288 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6289 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6290 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6291 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6292 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6293 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6294 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6295 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6296 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6297 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6298 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6299 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6300 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6301 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6302 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6303 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6304 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6305 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6306 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6307 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6308 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6309 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6310 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6311 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6312 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6313 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6314 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6315 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6316 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6317 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6318 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6319 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6320 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6321 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6322 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6323 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6324 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6325 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6326 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6327 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6328 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6329 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6330 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6331 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6332 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6333 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6334 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6335 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6336 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6337 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6338 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6339 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6340 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6341 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6342 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6343 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6344 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6345 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6346 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6347 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6348 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6349 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6350 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6351 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6352 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6353 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6354 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6355 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6356 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6357 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6358 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6359 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6360 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6361 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6362 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6363 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6364 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6365 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6366 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6367 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6368 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6369 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6370 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6371 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6372 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6373 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6374 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6375 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6376 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6377 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6378 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6379 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6380 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6381 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6382 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6383 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6384 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6385 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6386 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6387 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6388 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6389 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6390 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6391 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6392 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6393 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6394 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6395 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6396 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6397 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6398 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6399 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6400 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6401 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6402 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6403 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6404 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6405 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6406 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6407 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6408 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6409 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6410 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6411 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6412 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6413 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6414 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6415 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6416 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6417 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6418 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6419 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6420 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6421 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6422 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6423 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6424 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6425 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6426 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6427 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6428 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6429 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6430 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6431 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6432 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6433 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6434 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6435 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6436 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6437 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6438 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6439 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6440 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6441 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6442 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6443 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6444 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6445 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6446 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6447 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6448 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6449 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6450 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6451 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6452 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6453 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6454 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6455 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 6456 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6457 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6458 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 6459 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6460 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6461 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 6462 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6463 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6464 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 6465 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6466 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6467 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 6468 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6469 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6470 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 6471 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6472 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6473 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 6474 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6475 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6476 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 6477 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6478 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6479 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 6480 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6481 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6482 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 6483 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6484 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6485 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 6486 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6487 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6488 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 6489 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6490 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6491 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 6492 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6493 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6494 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 6495 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6496 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6497 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 6498 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6499 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6500 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 6501 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6502 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6503 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 6504 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6505 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6506 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 6507 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6508 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6509 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 6510 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6511 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6512 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 6513 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6514 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6515 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 6516 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6517 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6518 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 6519 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6520 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6521 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 6522 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6523 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6524 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 6525 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6526 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6527 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 6528 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6529 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6530 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 6531 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6532 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6533 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 6534 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6535 - my $x; $x->[$N[0]] = 1 [exception] ok 6536 - my $x; $x->[$N[0]] = 1 [return] ok 6537 - my $x; $x->[$N[0]] = 1 [variable] ok 6538 - our $x; local $x; use strict; $x->[$N[0]] = 1 [exception] ok 6539 - our $x; local $x; use strict; $x->[$N[0]] = 1 [return] ok 6540 - our $x; local $x; use strict; $x->[$N[0]] = 1 [variable] ok 6541 - our $x; local $x; no strict; $x->[$N[0]] = 1 [exception] ok 6542 - our $x; local $x; no strict; $x->[$N[0]] = 1 [return] ok 6543 - our $x; local $x; no strict; $x->[$N[0]] = 1 [variable] ok 6544 - my $x; $$x[$N[0]] = 1 [exception] ok 6545 - my $x; $$x[$N[0]] = 1 [return] ok 6546 - my $x; $$x[$N[0]] = 1 [variable] ok 6547 - our $x; local $x; use strict; $$x[$N[0]] = 1 [exception] ok 6548 - our $x; local $x; use strict; $$x[$N[0]] = 1 [return] ok 6549 - our $x; local $x; use strict; $$x[$N[0]] = 1 [variable] ok 6550 - our $x; local $x; no strict; $$x[$N[0]] = 1 [exception] ok 6551 - our $x; local $x; no strict; $$x[$N[0]] = 1 [return] ok 6552 - our $x; local $x; no strict; $$x[$N[0]] = 1 [variable] ok 6553 - my @x; $x[$N[0]] = 1 [exception] ok 6554 - my @x; $x[$N[0]] = 1 [return] ok 6555 - my @x; $x[$N[0]] = 1 [variable] ok 6556 - our @x; local @x; use strict; $x[$N[0]] = 1 [exception] ok 6557 - our @x; local @x; use strict; $x[$N[0]] = 1 [return] ok 6558 - our @x; local @x; use strict; $x[$N[0]] = 1 [variable] ok 6559 - our @x; local @x; no strict; $x[$N[0]] = 1 [exception] ok 6560 - our @x; local @x; no strict; $x[$N[0]] = 1 [return] ok 6561 - our @x; local @x; no strict; $x[$N[0]] = 1 [variable] ok 6562 - my $x; $x->[$N[0]] = 1 [exception] ok 6563 - my $x; $x->[$N[0]] = 1 [return] ok 6564 - my $x; $x->[$N[0]] = 1 [variable] ok 6565 - our $x; local $x; use strict; $x->[$N[0]] = 1 [exception] ok 6566 - our $x; local $x; use strict; $x->[$N[0]] = 1 [return] ok 6567 - our $x; local $x; use strict; $x->[$N[0]] = 1 [variable] ok 6568 - our $x; local $x; no strict; $x->[$N[0]] = 1 [exception] ok 6569 - our $x; local $x; no strict; $x->[$N[0]] = 1 [return] ok 6570 - our $x; local $x; no strict; $x->[$N[0]] = 1 [variable] ok 6571 - my $x; $$x[$N[0]] = 1 [exception] ok 6572 - my $x; $$x[$N[0]] = 1 [return] ok 6573 - my $x; $$x[$N[0]] = 1 [variable] ok 6574 - our $x; local $x; use strict; $$x[$N[0]] = 1 [exception] ok 6575 - our $x; local $x; use strict; $$x[$N[0]] = 1 [return] ok 6576 - our $x; local $x; use strict; $$x[$N[0]] = 1 [variable] ok 6577 - our $x; local $x; no strict; $$x[$N[0]] = 1 [exception] ok 6578 - our $x; local $x; no strict; $$x[$N[0]] = 1 [return] ok 6579 - our $x; local $x; no strict; $$x[$N[0]] = 1 [variable] ok 6580 - my @x; $x[$N[0]] = 1 [exception] ok 6581 - my @x; $x[$N[0]] = 1 [return] ok 6582 - my @x; $x[$N[0]] = 1 [variable] ok 6583 - our @x; local @x; use strict; $x[$N[0]] = 1 [exception] ok 6584 - our @x; local @x; use strict; $x[$N[0]] = 1 [return] ok 6585 - our @x; local @x; use strict; $x[$N[0]] = 1 [variable] ok 6586 - our @x; local @x; no strict; $x[$N[0]] = 1 [exception] ok 6587 - our @x; local @x; no strict; $x[$N[0]] = 1 [return] ok 6588 - our @x; local @x; no strict; $x[$N[0]] = 1 [variable] ok 6589 - my $x; $x->[$N[0]] = 1 <+fetch> [exception] ok 6590 - my $x; $x->[$N[0]] = 1 <+fetch> [return] ok 6591 - my $x; $x->[$N[0]] = 1 <+fetch> [variable] ok 6592 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+fetch> [exception] ok 6593 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+fetch> [return] ok 6594 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+fetch> [variable] ok 6595 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+fetch> [exception] ok 6596 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+fetch> [return] ok 6597 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+fetch> [variable] ok 6598 - my $x; $$x[$N[0]] = 1 <+fetch> [exception] ok 6599 - my $x; $$x[$N[0]] = 1 <+fetch> [return] ok 6600 - my $x; $$x[$N[0]] = 1 <+fetch> [variable] ok 6601 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+fetch> [exception] ok 6602 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+fetch> [return] ok 6603 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+fetch> [variable] ok 6604 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+fetch> [exception] ok 6605 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+fetch> [return] ok 6606 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+fetch> [variable] ok 6607 - my @x; $x[$N[0]] = 1 <+fetch> [exception] ok 6608 - my @x; $x[$N[0]] = 1 <+fetch> [return] ok 6609 - my @x; $x[$N[0]] = 1 <+fetch> [variable] ok 6610 - our @x; local @x; use strict; $x[$N[0]] = 1 <+fetch> [exception] ok 6611 - our @x; local @x; use strict; $x[$N[0]] = 1 <+fetch> [return] ok 6612 - our @x; local @x; use strict; $x[$N[0]] = 1 <+fetch> [variable] ok 6613 - our @x; local @x; no strict; $x[$N[0]] = 1 <+fetch> [exception] ok 6614 - our @x; local @x; no strict; $x[$N[0]] = 1 <+fetch> [return] ok 6615 - our @x; local @x; no strict; $x[$N[0]] = 1 <+fetch> [variable] ok 6616 - my $x; $x->[$N[0]] = 1 <+exists> [exception] ok 6617 - my $x; $x->[$N[0]] = 1 <+exists> [return] ok 6618 - my $x; $x->[$N[0]] = 1 <+exists> [variable] ok 6619 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+exists> [exception] ok 6620 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+exists> [return] ok 6621 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+exists> [variable] ok 6622 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+exists> [exception] ok 6623 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+exists> [return] ok 6624 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+exists> [variable] ok 6625 - my $x; $$x[$N[0]] = 1 <+exists> [exception] ok 6626 - my $x; $$x[$N[0]] = 1 <+exists> [return] ok 6627 - my $x; $$x[$N[0]] = 1 <+exists> [variable] ok 6628 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+exists> [exception] ok 6629 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+exists> [return] ok 6630 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+exists> [variable] ok 6631 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+exists> [exception] ok 6632 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+exists> [return] ok 6633 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+exists> [variable] ok 6634 - my @x; $x[$N[0]] = 1 <+exists> [exception] ok 6635 - my @x; $x[$N[0]] = 1 <+exists> [return] ok 6636 - my @x; $x[$N[0]] = 1 <+exists> [variable] ok 6637 - our @x; local @x; use strict; $x[$N[0]] = 1 <+exists> [exception] ok 6638 - our @x; local @x; use strict; $x[$N[0]] = 1 <+exists> [return] ok 6639 - our @x; local @x; use strict; $x[$N[0]] = 1 <+exists> [variable] ok 6640 - our @x; local @x; no strict; $x[$N[0]] = 1 <+exists> [exception] ok 6641 - our @x; local @x; no strict; $x[$N[0]] = 1 <+exists> [return] ok 6642 - our @x; local @x; no strict; $x[$N[0]] = 1 <+exists> [variable] ok 6643 - my $x; $x->[$N[0]] = 1 <+delete> [exception] ok 6644 - my $x; $x->[$N[0]] = 1 <+delete> [return] ok 6645 - my $x; $x->[$N[0]] = 1 <+delete> [variable] ok 6646 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+delete> [exception] ok 6647 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+delete> [return] ok 6648 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+delete> [variable] ok 6649 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+delete> [exception] ok 6650 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+delete> [return] ok 6651 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+delete> [variable] ok 6652 - my $x; $$x[$N[0]] = 1 <+delete> [exception] ok 6653 - my $x; $$x[$N[0]] = 1 <+delete> [return] ok 6654 - my $x; $$x[$N[0]] = 1 <+delete> [variable] ok 6655 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+delete> [exception] ok 6656 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+delete> [return] ok 6657 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+delete> [variable] ok 6658 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+delete> [exception] ok 6659 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+delete> [return] ok 6660 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+delete> [variable] ok 6661 - my @x; $x[$N[0]] = 1 <+delete> [exception] ok 6662 - my @x; $x[$N[0]] = 1 <+delete> [return] ok 6663 - my @x; $x[$N[0]] = 1 <+delete> [variable] ok 6664 - our @x; local @x; use strict; $x[$N[0]] = 1 <+delete> [exception] ok 6665 - our @x; local @x; use strict; $x[$N[0]] = 1 <+delete> [return] ok 6666 - our @x; local @x; use strict; $x[$N[0]] = 1 <+delete> [variable] ok 6667 - our @x; local @x; no strict; $x[$N[0]] = 1 <+delete> [exception] ok 6668 - our @x; local @x; no strict; $x[$N[0]] = 1 <+delete> [return] ok 6669 - our @x; local @x; no strict; $x[$N[0]] = 1 <+delete> [variable] ok 6670 - my $x; $x->[$N[0]] = 1 <+store> [exception] ok 6671 - my $x; $x->[$N[0]] = 1 <+store> [return] ok 6672 - my $x; $x->[$N[0]] = 1 <+store> [variable] ok 6673 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+store> [exception] ok 6674 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+store> [return] ok 6675 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+store> [variable] ok 6676 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+store> [exception] ok 6677 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+store> [return] ok 6678 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+store> [variable] ok 6679 - my $x; $$x[$N[0]] = 1 <+store> [exception] ok 6680 - my $x; $$x[$N[0]] = 1 <+store> [return] ok 6681 - my $x; $$x[$N[0]] = 1 <+store> [variable] ok 6682 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+store> [exception] ok 6683 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+store> [return] ok 6684 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+store> [variable] ok 6685 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+store> [exception] ok 6686 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+store> [return] ok 6687 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+store> [variable] ok 6688 - my @x; 1 <+store> [exception] ok 6689 - my @x; 1 <+store> [return] ok 6690 - my @x; 1 <+store> [variable] ok 6691 - our @x; local @x; use strict; 1 <+store> [exception] ok 6692 - our @x; local @x; use strict; 1 <+store> [return] ok 6693 - our @x; local @x; use strict; 1 <+store> [variable] ok 6694 - our @x; local @x; no strict; 1 <+store> [exception] ok 6695 - our @x; local @x; no strict; 1 <+store> [return] ok 6696 - our @x; local @x; no strict; 1 <+store> [variable] ok 6697 - my $x; $x->[$N[0]] = 1 <+strict +fetch> [exception] ok 6698 - my $x; $x->[$N[0]] = 1 <+strict +fetch> [return] ok 6699 - my $x; $x->[$N[0]] = 1 <+strict +fetch> [variable] ok 6700 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +fetch> [exception] ok 6701 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +fetch> [return] ok 6702 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +fetch> [variable] ok 6703 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +fetch> [exception] ok 6704 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +fetch> [return] ok 6705 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +fetch> [variable] ok 6706 - my $x; $$x[$N[0]] = 1 <+strict +fetch> [exception] ok 6707 - my $x; $$x[$N[0]] = 1 <+strict +fetch> [return] ok 6708 - my $x; $$x[$N[0]] = 1 <+strict +fetch> [variable] ok 6709 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +fetch> [exception] ok 6710 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +fetch> [return] ok 6711 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +fetch> [variable] ok 6712 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +fetch> [exception] ok 6713 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +fetch> [return] ok 6714 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +fetch> [variable] ok 6715 - my @x; $x[$N[0]] = 1 <+strict +fetch> [exception] ok 6716 - my @x; $x[$N[0]] = 1 <+strict +fetch> [return] ok 6717 - my @x; $x[$N[0]] = 1 <+strict +fetch> [variable] ok 6718 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +fetch> [exception] ok 6719 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +fetch> [return] ok 6720 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +fetch> [variable] ok 6721 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +fetch> [exception] ok 6722 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +fetch> [return] ok 6723 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +fetch> [variable] ok 6724 - my $x; $x->[$N[0]] = 1 <+strict +exists> [exception] ok 6725 - my $x; $x->[$N[0]] = 1 <+strict +exists> [return] ok 6726 - my $x; $x->[$N[0]] = 1 <+strict +exists> [variable] ok 6727 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +exists> [exception] ok 6728 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +exists> [return] ok 6729 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +exists> [variable] ok 6730 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +exists> [exception] ok 6731 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +exists> [return] ok 6732 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +exists> [variable] ok 6733 - my $x; $$x[$N[0]] = 1 <+strict +exists> [exception] ok 6734 - my $x; $$x[$N[0]] = 1 <+strict +exists> [return] ok 6735 - my $x; $$x[$N[0]] = 1 <+strict +exists> [variable] ok 6736 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +exists> [exception] ok 6737 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +exists> [return] ok 6738 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +exists> [variable] ok 6739 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +exists> [exception] ok 6740 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +exists> [return] ok 6741 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +exists> [variable] ok 6742 - my @x; $x[$N[0]] = 1 <+strict +exists> [exception] ok 6743 - my @x; $x[$N[0]] = 1 <+strict +exists> [return] ok 6744 - my @x; $x[$N[0]] = 1 <+strict +exists> [variable] ok 6745 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +exists> [exception] ok 6746 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +exists> [return] ok 6747 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +exists> [variable] ok 6748 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +exists> [exception] ok 6749 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +exists> [return] ok 6750 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +exists> [variable] ok 6751 - my $x; $x->[$N[0]] = 1 <+strict +delete> [exception] ok 6752 - my $x; $x->[$N[0]] = 1 <+strict +delete> [return] ok 6753 - my $x; $x->[$N[0]] = 1 <+strict +delete> [variable] ok 6754 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +delete> [exception] ok 6755 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +delete> [return] ok 6756 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +delete> [variable] ok 6757 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +delete> [exception] ok 6758 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +delete> [return] ok 6759 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +delete> [variable] ok 6760 - my $x; $$x[$N[0]] = 1 <+strict +delete> [exception] ok 6761 - my $x; $$x[$N[0]] = 1 <+strict +delete> [return] ok 6762 - my $x; $$x[$N[0]] = 1 <+strict +delete> [variable] ok 6763 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +delete> [exception] ok 6764 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +delete> [return] ok 6765 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +delete> [variable] ok 6766 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +delete> [exception] ok 6767 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +delete> [return] ok 6768 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +delete> [variable] ok 6769 - my @x; $x[$N[0]] = 1 <+strict +delete> [exception] ok 6770 - my @x; $x[$N[0]] = 1 <+strict +delete> [return] ok 6771 - my @x; $x[$N[0]] = 1 <+strict +delete> [variable] ok 6772 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +delete> [exception] ok 6773 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +delete> [return] ok 6774 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +delete> [variable] ok 6775 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +delete> [exception] ok 6776 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +delete> [return] ok 6777 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +delete> [variable] ok 6778 - my $x; $x->[$N[0]] = 1 <+strict +store> [exception] ok 6779 - my $x; $x->[$N[0]] = 1 <+strict +store> [return] ok 6780 - my $x; $x->[$N[0]] = 1 <+strict +store> [variable] ok 6781 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +store> [exception] ok 6782 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +store> [return] ok 6783 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +store> [variable] ok 6784 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +store> [exception] ok 6785 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +store> [return] ok 6786 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +store> [variable] ok 6787 - my $x; $$x[$N[0]] = 1 <+strict +store> [exception] ok 6788 - my $x; $$x[$N[0]] = 1 <+strict +store> [return] ok 6789 - my $x; $$x[$N[0]] = 1 <+strict +store> [variable] ok 6790 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +store> [exception] ok 6791 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +store> [return] ok 6792 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +store> [variable] ok 6793 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +store> [exception] ok 6794 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +store> [return] ok 6795 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +store> [variable] ok 6796 - my @x; 1 <+strict +store> [exception] ok 6797 - my @x; 1 <+strict +store> [return] ok 6798 - my @x; 1 <+strict +store> [variable] ok 6799 - our @x; local @x; use strict; 1 <+strict +store> [exception] ok 6800 - our @x; local @x; use strict; 1 <+strict +store> [return] ok 6801 - our @x; local @x; use strict; 1 <+strict +store> [variable] ok 6802 - our @x; local @x; no strict; 1 <+strict +store> [exception] ok 6803 - our @x; local @x; no strict; 1 <+strict +store> [return] ok 6804 - our @x; local @x; no strict; 1 <+strict +store> [variable] ok 6805 - my $x; $x->[$N[0]]->[$N[1]] = 1 [exception] ok 6806 - my $x; $x->[$N[0]]->[$N[1]] = 1 [return] ok 6807 - my $x; $x->[$N[0]]->[$N[1]] = 1 [variable] ok 6808 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 [exception] ok 6809 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 [return] ok 6810 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 [variable] ok 6811 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 [exception] ok 6812 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 [return] ok 6813 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 [variable] ok 6814 - my $x; $$x[$N[0]]->[$N[1]] = 1 [exception] ok 6815 - my $x; $$x[$N[0]]->[$N[1]] = 1 [return] ok 6816 - my $x; $$x[$N[0]]->[$N[1]] = 1 [variable] ok 6817 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 [exception] ok 6818 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 [return] ok 6819 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 [variable] ok 6820 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 [exception] ok 6821 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 [return] ok 6822 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 [variable] ok 6823 - my @x; $x[$N[0]]->[$N[1]] = 1 [exception] ok 6824 - my @x; $x[$N[0]]->[$N[1]] = 1 [return] ok 6825 - my @x; $x[$N[0]]->[$N[1]] = 1 [variable] ok 6826 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 [exception] ok 6827 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 [return] ok 6828 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 [variable] ok 6829 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 [exception] ok 6830 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 [return] ok 6831 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 [variable] ok 6832 - my $x; $x->[$N[0]]->[$N[1]] = 1 [exception] ok 6833 - my $x; $x->[$N[0]]->[$N[1]] = 1 [return] ok 6834 - my $x; $x->[$N[0]]->[$N[1]] = 1 [variable] ok 6835 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 [exception] ok 6836 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 [return] ok 6837 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 [variable] ok 6838 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 [exception] ok 6839 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 [return] ok 6840 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 [variable] ok 6841 - my $x; $$x[$N[0]]->[$N[1]] = 1 [exception] ok 6842 - my $x; $$x[$N[0]]->[$N[1]] = 1 [return] ok 6843 - my $x; $$x[$N[0]]->[$N[1]] = 1 [variable] ok 6844 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 [exception] ok 6845 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 [return] ok 6846 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 [variable] ok 6847 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 [exception] ok 6848 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 [return] ok 6849 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 [variable] ok 6850 - my @x; $x[$N[0]]->[$N[1]] = 1 [exception] ok 6851 - my @x; $x[$N[0]]->[$N[1]] = 1 [return] ok 6852 - my @x; $x[$N[0]]->[$N[1]] = 1 [variable] ok 6853 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 [exception] ok 6854 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 [return] ok 6855 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 [variable] ok 6856 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 [exception] ok 6857 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 [return] ok 6858 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 [variable] ok 6859 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6860 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6861 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6862 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6863 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6864 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6865 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6866 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6867 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6868 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6869 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6870 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6871 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6872 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6873 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6874 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6875 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6876 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6877 - my @x; $x[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6878 - my @x; $x[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6879 - my @x; $x[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6880 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6881 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6882 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6883 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6884 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6885 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6886 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6887 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6888 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6889 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6890 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6891 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6892 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6893 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6894 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6895 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6896 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6897 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6898 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6899 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6900 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6901 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6902 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6903 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6904 - my @x; $x[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6905 - my @x; $x[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6906 - my @x; $x[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6907 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6908 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6909 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6910 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6911 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6912 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6913 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6914 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6915 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6916 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6917 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6918 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6919 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6920 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6921 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6922 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6923 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6924 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6925 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6926 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6927 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6928 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6929 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6930 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6931 - my @x; $x[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6932 - my @x; $x[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6933 - my @x; $x[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6934 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6935 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6936 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6937 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6938 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6939 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6940 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6941 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6942 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6943 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6944 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6945 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6946 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6947 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6948 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6949 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6950 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6951 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6952 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6953 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6954 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6955 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6956 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6957 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6958 - my @x; $x[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6959 - my @x; $x[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6960 - my @x; $x[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6961 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6962 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6963 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6964 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6965 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6966 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6967 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6968 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6969 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6970 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6971 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6972 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6973 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6974 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6975 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6976 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6977 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6978 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6979 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6980 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6981 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6982 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6983 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6984 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6985 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6986 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6987 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6988 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6989 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6990 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6991 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6992 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6993 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6994 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 6995 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 6996 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 6997 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 6998 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 6999 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7000 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7001 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7002 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7003 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7004 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7005 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7006 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7007 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7008 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7009 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7010 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7011 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7012 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7013 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7014 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7015 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7016 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7017 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7018 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7019 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7020 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7021 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7022 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7023 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7024 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7025 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7026 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7027 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7028 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7029 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7030 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7031 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7032 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7033 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7034 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7035 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7036 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7037 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7038 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7039 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7040 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7041 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7042 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7043 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7044 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7045 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7046 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7047 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7048 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7049 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7050 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7051 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7052 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7053 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7054 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7055 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7056 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7057 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7058 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7059 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7060 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7061 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7062 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7063 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7064 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7065 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7066 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7067 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7068 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7069 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7070 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7071 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7072 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7073 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7074 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7075 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [exception] ok 7076 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [return] ok 7077 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [variable] ok 7078 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [exception] ok 7079 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [return] ok 7080 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [variable] ok 7081 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [exception] ok 7082 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [return] ok 7083 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [variable] ok 7084 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [exception] ok 7085 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [return] ok 7086 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [variable] ok 7087 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [exception] ok 7088 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [return] ok 7089 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [variable] ok 7090 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [exception] ok 7091 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [return] ok 7092 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [variable] ok 7093 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [exception] ok 7094 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [return] ok 7095 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [variable] ok 7096 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [exception] ok 7097 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [return] ok 7098 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [variable] ok 7099 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [exception] ok 7100 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [return] ok 7101 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [variable] ok 7102 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [exception] ok 7103 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [return] ok 7104 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [variable] ok 7105 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [exception] ok 7106 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [return] ok 7107 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [variable] ok 7108 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [exception] ok 7109 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [return] ok 7110 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [variable] ok 7111 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [exception] ok 7112 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [return] ok 7113 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [variable] ok 7114 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [exception] ok 7115 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [return] ok 7116 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [variable] ok 7117 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [exception] ok 7118 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [return] ok 7119 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [variable] ok 7120 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [exception] ok 7121 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [return] ok 7122 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [variable] ok 7123 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [exception] ok 7124 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [return] ok 7125 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [variable] ok 7126 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [exception] ok 7127 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [return] ok 7128 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [variable] ok 7129 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [exception] ok 7130 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [return] ok 7131 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [variable] ok 7132 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [exception] ok 7133 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [return] ok 7134 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [variable] ok 7135 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [exception] ok 7136 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [return] ok 7137 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [variable] ok 7138 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [exception] ok 7139 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [return] ok 7140 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [variable] ok 7141 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [exception] ok 7142 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [return] ok 7143 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [variable] ok 7144 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [exception] ok 7145 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [return] ok 7146 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [variable] ok 7147 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [exception] ok 7148 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [return] ok 7149 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [variable] ok 7150 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [exception] ok 7151 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [return] ok 7152 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [variable] ok 7153 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [exception] ok 7154 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [return] ok 7155 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [variable] ok 7156 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [exception] ok 7157 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [return] ok 7158 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [variable] ok 7159 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [exception] ok 7160 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [return] ok 7161 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [variable] ok 7162 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [exception] ok 7163 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [return] ok 7164 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [variable] ok 7165 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [exception] ok 7166 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [return] ok 7167 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [variable] ok 7168 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [exception] ok 7169 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [return] ok 7170 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [variable] ok 7171 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [exception] ok 7172 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [return] ok 7173 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [variable] ok 7174 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [exception] ok 7175 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [return] ok 7176 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [variable] ok 7177 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [exception] ok 7178 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [return] ok 7179 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [variable] ok 7180 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [exception] ok 7181 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [return] ok 7182 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [variable] ok 7183 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [exception] ok 7184 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [return] ok 7185 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [variable] ok 7186 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [exception] ok 7187 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [return] ok 7188 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [variable] ok 7189 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [exception] ok 7190 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [return] ok 7191 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [variable] ok 7192 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [exception] ok 7193 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [return] ok 7194 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [variable] ok 7195 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [exception] ok 7196 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [return] ok 7197 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [variable] ok 7198 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [exception] ok 7199 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [return] ok 7200 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [variable] ok 7201 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [exception] ok 7202 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [return] ok 7203 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [variable] ok 7204 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [exception] ok 7205 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [return] ok 7206 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [variable] ok 7207 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [exception] ok 7208 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [return] ok 7209 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [variable] ok 7210 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [exception] ok 7211 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [return] ok 7212 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [variable] ok 7213 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [exception] ok 7214 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [return] ok 7215 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [variable] ok 7216 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [exception] ok 7217 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [return] ok 7218 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [variable] ok 7219 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [exception] ok 7220 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [return] ok 7221 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [variable] ok 7222 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [exception] ok 7223 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [return] ok 7224 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [variable] ok 7225 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [exception] ok 7226 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [return] ok 7227 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [variable] ok 7228 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [exception] ok 7229 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [return] ok 7230 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [variable] ok 7231 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [exception] ok 7232 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [return] ok 7233 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [variable] ok 7234 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [exception] ok 7235 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [return] ok 7236 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [variable] ok 7237 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [exception] ok 7238 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [return] ok 7239 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [variable] ok 7240 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [exception] ok 7241 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [return] ok 7242 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [variable] ok 7243 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [exception] ok 7244 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [return] ok 7245 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [variable] ok 7246 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [exception] ok 7247 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [return] ok 7248 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [variable] ok 7249 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [exception] ok 7250 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [return] ok 7251 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [variable] ok 7252 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [exception] ok 7253 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [return] ok 7254 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [variable] ok 7255 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [exception] ok 7256 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [return] ok 7257 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [variable] ok 7258 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [exception] ok 7259 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [return] ok 7260 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [variable] ok 7261 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [exception] ok 7262 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [return] ok 7263 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [variable] ok 7264 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [exception] ok 7265 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [return] ok 7266 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [variable] ok 7267 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [exception] ok 7268 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [return] ok 7269 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [variable] ok 7270 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [exception] ok 7271 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [return] ok 7272 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [variable] ok 7273 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [exception] ok 7274 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [return] ok 7275 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [variable] ok 7276 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [exception] ok 7277 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [return] ok 7278 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [variable] ok 7279 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [exception] ok 7280 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [return] ok 7281 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [variable] ok 7282 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [exception] ok 7283 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [return] ok 7284 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [variable] ok 7285 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [exception] ok 7286 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [return] ok 7287 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [variable] ok 7288 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [exception] ok 7289 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [return] ok 7290 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [variable] ok 7291 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [exception] ok 7292 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [return] ok 7293 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [variable] ok 7294 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [exception] ok 7295 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [return] ok 7296 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [variable] ok 7297 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [exception] ok 7298 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [return] ok 7299 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [variable] ok 7300 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [exception] ok 7301 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [return] ok 7302 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [variable] ok 7303 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [exception] ok 7304 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [return] ok 7305 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [variable] ok 7306 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [exception] ok 7307 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [return] ok 7308 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [variable] ok 7309 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [exception] ok 7310 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [return] ok 7311 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [variable] ok 7312 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [exception] ok 7313 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [return] ok 7314 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [variable] ok 7315 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [exception] ok 7316 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [return] ok 7317 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [variable] ok 7318 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [exception] ok 7319 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [return] ok 7320 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [variable] ok 7321 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [exception] ok 7322 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [return] ok 7323 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [variable] ok 7324 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [exception] ok 7325 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [return] ok 7326 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [variable] ok 7327 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [exception] ok 7328 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [return] ok 7329 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [variable] ok 7330 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [exception] ok 7331 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [return] ok 7332 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [variable] ok 7333 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [exception] ok 7334 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [return] ok 7335 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [variable] ok 7336 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [exception] ok 7337 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [return] ok 7338 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [variable] ok 7339 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [exception] ok 7340 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [return] ok 7341 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [variable] ok 7342 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [exception] ok 7343 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [return] ok 7344 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [variable] ok 7345 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [exception] ok 7346 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [return] ok 7347 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [variable] ok 7348 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [exception] ok 7349 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [return] ok 7350 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [variable] ok 7351 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [exception] ok 7352 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [return] ok 7353 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [variable] ok 7354 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [exception] ok 7355 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [return] ok 7356 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [variable] ok 7357 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [exception] ok 7358 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [return] ok 7359 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [variable] ok 7360 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [exception] ok 7361 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [return] ok 7362 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [variable] ok 7363 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [exception] ok 7364 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [return] ok 7365 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [variable] ok 7366 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [exception] ok 7367 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [return] ok 7368 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [variable] ok 7369 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [exception] ok 7370 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [return] ok 7371 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [variable] ok 7372 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [exception] ok 7373 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [return] ok 7374 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [variable] ok 7375 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [exception] ok 7376 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [return] ok 7377 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [variable] ok 7378 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [exception] ok 7379 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [return] ok 7380 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [variable] ok 7381 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [exception] ok 7382 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [return] ok 7383 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [variable] ok 7384 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [exception] ok 7385 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [return] ok 7386 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [variable] ok 7387 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [exception] ok 7388 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [return] ok 7389 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [variable] ok 7390 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [exception] ok 7391 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [return] ok 7392 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [variable] ok 7393 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [exception] ok 7394 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [return] ok 7395 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [variable] ok 7396 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [exception] ok 7397 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [return] ok 7398 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [variable] ok 7399 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [exception] ok 7400 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [return] ok 7401 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [variable] ok 7402 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [exception] ok 7403 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [return] ok 7404 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [variable] ok 7405 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [exception] ok 7406 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [return] ok 7407 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [variable] ok 7408 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [exception] ok 7409 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [return] ok 7410 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [variable] ok 7411 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [exception] ok 7412 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [return] ok 7413 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [variable] ok 7414 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [exception] ok 7415 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [return] ok 7416 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [variable] ok 7417 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [exception] ok 7418 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [return] ok 7419 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [variable] ok 7420 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [exception] ok 7421 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [return] ok 7422 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [variable] ok 7423 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [exception] ok 7424 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [return] ok 7425 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [variable] ok 7426 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [exception] ok 7427 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [return] ok 7428 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [variable] ok 7429 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [exception] ok 7430 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [return] ok 7431 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [variable] ok 7432 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [exception] ok 7433 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [return] ok 7434 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [variable] ok 7435 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [exception] ok 7436 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [return] ok 7437 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [variable] ok 7438 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [exception] ok 7439 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [return] ok 7440 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [variable] ok 7441 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [exception] ok 7442 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [return] ok 7443 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [variable] ok 7444 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [exception] ok 7445 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [return] ok 7446 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [variable] ok 7447 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [exception] ok 7448 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [return] ok 7449 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [variable] ok 7450 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [exception] ok 7451 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [return] ok 7452 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [variable] ok 7453 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [exception] ok 7454 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [return] ok 7455 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [variable] ok 7456 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [exception] ok 7457 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [return] ok 7458 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [variable] ok 7459 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [exception] ok 7460 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [return] ok 7461 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [variable] ok 7462 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [exception] ok 7463 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [return] ok 7464 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [variable] ok 7465 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [exception] ok 7466 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [return] ok 7467 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [variable] ok 7468 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [exception] ok 7469 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [return] ok 7470 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [variable] ok 7471 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [exception] ok 7472 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [return] ok 7473 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [variable] ok 7474 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [exception] ok 7475 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [return] ok 7476 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [variable] ok 7477 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [exception] ok 7478 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [return] ok 7479 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [variable] ok 7480 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [exception] ok 7481 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [return] ok 7482 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [variable] ok 7483 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [exception] ok 7484 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [return] ok 7485 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [variable] ok 7486 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [exception] ok 7487 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [return] ok 7488 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [variable] ok 7489 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [exception] ok 7490 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [return] ok 7491 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [variable] ok 7492 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [exception] ok 7493 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [return] ok 7494 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [variable] ok 7495 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [exception] ok 7496 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [return] ok 7497 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [variable] ok 7498 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [exception] ok 7499 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [return] ok 7500 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [variable] ok 7501 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [exception] ok 7502 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [return] ok 7503 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [variable] ok 7504 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [exception] ok 7505 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [return] ok 7506 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [variable] ok 7507 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7508 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7509 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7510 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7511 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7512 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7513 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7514 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7515 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7516 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7517 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7518 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7519 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7520 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7521 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7522 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7523 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7524 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7525 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7526 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7527 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7528 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7529 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7530 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7531 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7532 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7533 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7534 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7535 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7536 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7537 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7538 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7539 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7540 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7541 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7542 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7543 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7544 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7545 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7546 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7547 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7548 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7549 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7550 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7551 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7552 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7553 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7554 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7555 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7556 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7557 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7558 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7559 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7560 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7561 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7562 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7563 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7564 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7565 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7566 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7567 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7568 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7569 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7570 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7571 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7572 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7573 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7574 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7575 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7576 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7577 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7578 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7579 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7580 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7581 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7582 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7583 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7584 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7585 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7586 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7587 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7588 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7589 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7590 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7591 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7592 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7593 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7594 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7595 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7596 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7597 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7598 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7599 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7600 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7601 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7602 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7603 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7604 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7605 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7606 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7607 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7608 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7609 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7610 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7611 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7612 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7613 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7614 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7615 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7616 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7617 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7618 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7619 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7620 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7621 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7622 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7623 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7624 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7625 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7626 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7627 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7628 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7629 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7630 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7631 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7632 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7633 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7634 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7635 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7636 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7637 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7638 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7639 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7640 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7641 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7642 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7643 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7644 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7645 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7646 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7647 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7648 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7649 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7650 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7651 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7652 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7653 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7654 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7655 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7656 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7657 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7658 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7659 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7660 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7661 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7662 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7663 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7664 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7665 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7666 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7667 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7668 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7669 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7670 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7671 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7672 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7673 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7674 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7675 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7676 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7677 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7678 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7679 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7680 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7681 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7682 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7683 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7684 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7685 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7686 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7687 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7688 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7689 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7690 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7691 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7692 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7693 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7694 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7695 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7696 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7697 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7698 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7699 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7700 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7701 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7702 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7703 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7704 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7705 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7706 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7707 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7708 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7709 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7710 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7711 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7712 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7713 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7714 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7715 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7716 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7717 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7718 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7719 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7720 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7721 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7722 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7723 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7724 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7725 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7726 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7727 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7728 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7729 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7730 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7731 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7732 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7733 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7734 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7735 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7736 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7737 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7738 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7739 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7740 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7741 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7742 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7743 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7744 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7745 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7746 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7747 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7748 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7749 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7750 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7751 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7752 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7753 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7754 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7755 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7756 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7757 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7758 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7759 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7760 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7761 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7762 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7763 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7764 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7765 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7766 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7767 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7768 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7769 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7770 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7771 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7772 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7773 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7774 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7775 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7776 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7777 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7778 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7779 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7780 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7781 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7782 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7783 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7784 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7785 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7786 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7787 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7788 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7789 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7790 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7791 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7792 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7793 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7794 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7795 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7796 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7797 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7798 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7799 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7800 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7801 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7802 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7803 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7804 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7805 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7806 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7807 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7808 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7809 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7810 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7811 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7812 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7813 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7814 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7815 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7816 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7817 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7818 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7819 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7820 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7821 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7822 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7823 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7824 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7825 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7826 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7827 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7828 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7829 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7830 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7831 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7832 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7833 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7834 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7835 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7836 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7837 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7838 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7839 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7840 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7841 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7842 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7843 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7844 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7845 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7846 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7847 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7848 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7849 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7850 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7851 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7852 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7853 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7854 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7855 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7856 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7857 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7858 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7859 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7860 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7861 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7862 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7863 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7864 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7865 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7866 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7867 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7868 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7869 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7870 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7871 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7872 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7873 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7874 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7875 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7876 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7877 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7878 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7879 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7880 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7881 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7882 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7883 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7884 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7885 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7886 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7887 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7888 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7889 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7890 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7891 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7892 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7893 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7894 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7895 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7896 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7897 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7898 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7899 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7900 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7901 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7902 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7903 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7904 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7905 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7906 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7907 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7908 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7909 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7910 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7911 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7912 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7913 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7914 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7915 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7916 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7917 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7918 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7919 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7920 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7921 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7922 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7923 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7924 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7925 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7926 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7927 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7928 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7929 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7930 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7931 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7932 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7933 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7934 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7935 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7936 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7937 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7938 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7939 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7940 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7941 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7942 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7943 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7944 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7945 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7946 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7947 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7948 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7949 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7950 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7951 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7952 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7953 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7954 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7955 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7956 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7957 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7958 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7959 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7960 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7961 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7962 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7963 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7964 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7965 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7966 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7967 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7968 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7969 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7970 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7971 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7972 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7973 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7974 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7975 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7976 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7977 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7978 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7979 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7980 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7981 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7982 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7983 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7984 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7985 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7986 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7987 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7988 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7989 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7990 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7991 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7992 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7993 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 7994 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 7995 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 7996 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 7997 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 7998 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 7999 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8000 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8001 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8002 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8003 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8004 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8005 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8006 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8007 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8008 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8009 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8010 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8011 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8012 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8013 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8014 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8015 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8016 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8017 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8018 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8019 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8020 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8021 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8022 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8023 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8024 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8025 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8026 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8027 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8028 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8029 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8030 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8031 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8032 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8033 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8034 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8035 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8036 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8037 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8038 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8039 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8040 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8041 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8042 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8043 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8044 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8045 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8046 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8047 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8048 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8049 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8050 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8051 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8052 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8053 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8054 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8055 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8056 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8057 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8058 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8059 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8060 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8061 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8062 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8063 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8064 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8065 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8066 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8067 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8068 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8069 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8070 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8071 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8072 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8073 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8074 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8075 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8076 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8077 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8078 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8079 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8080 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8081 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8082 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8083 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8084 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8085 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8086 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8087 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8088 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8089 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8090 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8091 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8092 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8093 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8094 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8095 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8096 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8097 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8098 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8099 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8100 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8101 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8102 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8103 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8104 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8105 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8106 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8107 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8108 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8109 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8110 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8111 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8112 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8113 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8114 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8115 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8116 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8117 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8118 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8119 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8120 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8121 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8122 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8123 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8124 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8125 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8126 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8127 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8128 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8129 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8130 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8131 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8132 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8133 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8134 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8135 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8136 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8137 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8138 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8139 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8140 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8141 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8142 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8143 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8144 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8145 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8146 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8147 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8148 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8149 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8150 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8151 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8152 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8153 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8154 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok t/31-array-fast.t ........ 1..8154 ok 1 - my $x; $x->[0] [exception] ok 2 - my $x; $x->[0] [return] ok 3 - my $x; $x->[0] [variable] ok 4 - our $x; local $x; use strict; $x->[0] [exception] ok 5 - our $x; local $x; use strict; $x->[0] [return] ok 6 - our $x; local $x; use strict; $x->[0] [variable] ok 7 - our $x; local $x; no strict; $x->[0] [exception] ok 8 - our $x; local $x; no strict; $x->[0] [return] ok 9 - our $x; local $x; no strict; $x->[0] [variable] ok 10 - my $x; $$x[0] [exception] ok 11 - my $x; $$x[0] [return] ok 12 - my $x; $$x[0] [variable] ok 13 - our $x; local $x; use strict; $$x[0] [exception] ok 14 - our $x; local $x; use strict; $$x[0] [return] ok 15 - our $x; local $x; use strict; $$x[0] [variable] ok 16 - our $x; local $x; no strict; $$x[0] [exception] ok 17 - our $x; local $x; no strict; $$x[0] [return] ok 18 - our $x; local $x; no strict; $$x[0] [variable] ok 19 - my @x; $x[0] [exception] ok 20 - my @x; $x[0] [return] ok 21 - my @x; $x[0] [variable] ok 22 - our @x; local @x; use strict; $x[0] [exception] ok 23 - our @x; local @x; use strict; $x[0] [return] ok 24 - our @x; local @x; use strict; $x[0] [variable] ok 25 - our @x; local @x; no strict; $x[0] [exception] ok 26 - our @x; local @x; no strict; $x[0] [return] ok 27 - our @x; local @x; no strict; $x[0] [variable] ok 28 - my $x; $x->[0] [exception] ok 29 - my $x; $x->[0] [return] ok 30 - my $x; $x->[0] [variable] ok 31 - our $x; local $x; use strict; $x->[0] [exception] ok 32 - our $x; local $x; use strict; $x->[0] [return] ok 33 - our $x; local $x; use strict; $x->[0] [variable] ok 34 - our $x; local $x; no strict; $x->[0] [exception] ok 35 - our $x; local $x; no strict; $x->[0] [return] ok 36 - our $x; local $x; no strict; $x->[0] [variable] ok 37 - my $x; $$x[0] [exception] ok 38 - my $x; $$x[0] [return] ok 39 - my $x; $$x[0] [variable] ok 40 - our $x; local $x; use strict; $$x[0] [exception] ok 41 - our $x; local $x; use strict; $$x[0] [return] ok 42 - our $x; local $x; use strict; $$x[0] [variable] ok 43 - our $x; local $x; no strict; $$x[0] [exception] ok 44 - our $x; local $x; no strict; $$x[0] [return] ok 45 - our $x; local $x; no strict; $$x[0] [variable] ok 46 - my @x; $x[0] [exception] ok 47 - my @x; $x[0] [return] ok 48 - my @x; $x[0] [variable] ok 49 - our @x; local @x; use strict; $x[0] [exception] ok 50 - our @x; local @x; use strict; $x[0] [return] ok 51 - our @x; local @x; use strict; $x[0] [variable] ok 52 - our @x; local @x; no strict; $x[0] [exception] ok 53 - our @x; local @x; no strict; $x[0] [return] ok 54 - our @x; local @x; no strict; $x[0] [variable] ok 55 - my $x; $x->[0] <+fetch> [exception] ok 56 - my $x; $x->[0] <+fetch> [return] ok 57 - my $x; $x->[0] <+fetch> [variable] ok 58 - our $x; local $x; use strict; $x->[0] <+fetch> [exception] ok 59 - our $x; local $x; use strict; $x->[0] <+fetch> [return] ok 60 - our $x; local $x; use strict; $x->[0] <+fetch> [variable] ok 61 - our $x; local $x; no strict; $x->[0] <+fetch> [exception] ok 62 - our $x; local $x; no strict; $x->[0] <+fetch> [return] ok 63 - our $x; local $x; no strict; $x->[0] <+fetch> [variable] ok 64 - my $x; $$x[0] <+fetch> [exception] ok 65 - my $x; $$x[0] <+fetch> [return] ok 66 - my $x; $$x[0] <+fetch> [variable] ok 67 - our $x; local $x; use strict; $$x[0] <+fetch> [exception] ok 68 - our $x; local $x; use strict; $$x[0] <+fetch> [return] ok 69 - our $x; local $x; use strict; $$x[0] <+fetch> [variable] ok 70 - our $x; local $x; no strict; $$x[0] <+fetch> [exception] ok 71 - our $x; local $x; no strict; $$x[0] <+fetch> [return] ok 72 - our $x; local $x; no strict; $$x[0] <+fetch> [variable] ok 73 - my @x; $x[0] <+fetch> [exception] ok 74 - my @x; $x[0] <+fetch> [return] ok 75 - my @x; $x[0] <+fetch> [variable] ok 76 - our @x; local @x; use strict; $x[0] <+fetch> [exception] ok 77 - our @x; local @x; use strict; $x[0] <+fetch> [return] ok 78 - our @x; local @x; use strict; $x[0] <+fetch> [variable] ok 79 - our @x; local @x; no strict; $x[0] <+fetch> [exception] ok 80 - our @x; local @x; no strict; $x[0] <+fetch> [return] ok 81 - our @x; local @x; no strict; $x[0] <+fetch> [variable] ok 82 - my $x; $x->[0] <+exists> [exception] ok 83 - my $x; $x->[0] <+exists> [return] ok 84 - my $x; $x->[0] <+exists> [variable] ok 85 - our $x; local $x; use strict; $x->[0] <+exists> [exception] ok 86 - our $x; local $x; use strict; $x->[0] <+exists> [return] ok 87 - our $x; local $x; use strict; $x->[0] <+exists> [variable] ok 88 - our $x; local $x; no strict; $x->[0] <+exists> [exception] ok 89 - our $x; local $x; no strict; $x->[0] <+exists> [return] ok 90 - our $x; local $x; no strict; $x->[0] <+exists> [variable] ok 91 - my $x; $$x[0] <+exists> [exception] ok 92 - my $x; $$x[0] <+exists> [return] ok 93 - my $x; $$x[0] <+exists> [variable] ok 94 - our $x; local $x; use strict; $$x[0] <+exists> [exception] ok 95 - our $x; local $x; use strict; $$x[0] <+exists> [return] ok 96 - our $x; local $x; use strict; $$x[0] <+exists> [variable] ok 97 - our $x; local $x; no strict; $$x[0] <+exists> [exception] ok 98 - our $x; local $x; no strict; $$x[0] <+exists> [return] ok 99 - our $x; local $x; no strict; $$x[0] <+exists> [variable] ok 100 - my @x; $x[0] <+exists> [exception] ok 101 - my @x; $x[0] <+exists> [return] ok 102 - my @x; $x[0] <+exists> [variable] ok 103 - our @x; local @x; use strict; $x[0] <+exists> [exception] ok 104 - our @x; local @x; use strict; $x[0] <+exists> [return] ok 105 - our @x; local @x; use strict; $x[0] <+exists> [variable] ok 106 - our @x; local @x; no strict; $x[0] <+exists> [exception] ok 107 - our @x; local @x; no strict; $x[0] <+exists> [return] ok 108 - our @x; local @x; no strict; $x[0] <+exists> [variable] ok 109 - my $x; $x->[0] <+delete> [exception] ok 110 - my $x; $x->[0] <+delete> [return] ok 111 - my $x; $x->[0] <+delete> [variable] ok 112 - our $x; local $x; use strict; $x->[0] <+delete> [exception] ok 113 - our $x; local $x; use strict; $x->[0] <+delete> [return] ok 114 - our $x; local $x; use strict; $x->[0] <+delete> [variable] ok 115 - our $x; local $x; no strict; $x->[0] <+delete> [exception] ok 116 - our $x; local $x; no strict; $x->[0] <+delete> [return] ok 117 - our $x; local $x; no strict; $x->[0] <+delete> [variable] ok 118 - my $x; $$x[0] <+delete> [exception] ok 119 - my $x; $$x[0] <+delete> [return] ok 120 - my $x; $$x[0] <+delete> [variable] ok 121 - our $x; local $x; use strict; $$x[0] <+delete> [exception] ok 122 - our $x; local $x; use strict; $$x[0] <+delete> [return] ok 123 - our $x; local $x; use strict; $$x[0] <+delete> [variable] ok 124 - our $x; local $x; no strict; $$x[0] <+delete> [exception] ok 125 - our $x; local $x; no strict; $$x[0] <+delete> [return] ok 126 - our $x; local $x; no strict; $$x[0] <+delete> [variable] ok 127 - my @x; $x[0] <+delete> [exception] ok 128 - my @x; $x[0] <+delete> [return] ok 129 - my @x; $x[0] <+delete> [variable] ok 130 - our @x; local @x; use strict; $x[0] <+delete> [exception] ok 131 - our @x; local @x; use strict; $x[0] <+delete> [return] ok 132 - our @x; local @x; use strict; $x[0] <+delete> [variable] ok 133 - our @x; local @x; no strict; $x[0] <+delete> [exception] ok 134 - our @x; local @x; no strict; $x[0] <+delete> [return] ok 135 - our @x; local @x; no strict; $x[0] <+delete> [variable] ok 136 - my $x; $x->[0] <+store> [exception] ok 137 - my $x; $x->[0] <+store> [return] ok 138 - my $x; $x->[0] <+store> [variable] ok 139 - our $x; local $x; use strict; $x->[0] <+store> [exception] ok 140 - our $x; local $x; use strict; $x->[0] <+store> [return] ok 141 - our $x; local $x; use strict; $x->[0] <+store> [variable] ok 142 - our $x; local $x; no strict; $x->[0] <+store> [exception] ok 143 - our $x; local $x; no strict; $x->[0] <+store> [return] ok 144 - our $x; local $x; no strict; $x->[0] <+store> [variable] ok 145 - my $x; $$x[0] <+store> [exception] ok 146 - my $x; $$x[0] <+store> [return] ok 147 - my $x; $$x[0] <+store> [variable] ok 148 - our $x; local $x; use strict; $$x[0] <+store> [exception] ok 149 - our $x; local $x; use strict; $$x[0] <+store> [return] ok 150 - our $x; local $x; use strict; $$x[0] <+store> [variable] ok 151 - our $x; local $x; no strict; $$x[0] <+store> [exception] ok 152 - our $x; local $x; no strict; $$x[0] <+store> [return] ok 153 - our $x; local $x; no strict; $$x[0] <+store> [variable] ok 154 - my @x; $x[0] <+store> [exception] ok 155 - my @x; $x[0] <+store> [return] ok 156 - my @x; $x[0] <+store> [variable] ok 157 - our @x; local @x; use strict; $x[0] <+store> [exception] ok 158 - our @x; local @x; use strict; $x[0] <+store> [return] ok 159 - our @x; local @x; use strict; $x[0] <+store> [variable] ok 160 - our @x; local @x; no strict; $x[0] <+store> [exception] ok 161 - our @x; local @x; no strict; $x[0] <+store> [return] ok 162 - our @x; local @x; no strict; $x[0] <+store> [variable] ok 163 - my $x; $x->[0] <-fetch> [exception] ok 164 - my $x; $x->[0] <-fetch> [return] ok 165 - my $x; $x->[0] <-fetch> [variable] ok 166 - our $x; local $x; use strict; $x->[0] <-fetch> [exception] ok 167 - our $x; local $x; use strict; $x->[0] <-fetch> [return] ok 168 - our $x; local $x; use strict; $x->[0] <-fetch> [variable] ok 169 - our $x; local $x; no strict; $x->[0] <-fetch> [exception] ok 170 - our $x; local $x; no strict; $x->[0] <-fetch> [return] ok 171 - our $x; local $x; no strict; $x->[0] <-fetch> [variable] ok 172 - my $x; $$x[0] <-fetch> [exception] ok 173 - my $x; $$x[0] <-fetch> [return] ok 174 - my $x; $$x[0] <-fetch> [variable] ok 175 - our $x; local $x; use strict; $$x[0] <-fetch> [exception] ok 176 - our $x; local $x; use strict; $$x[0] <-fetch> [return] ok 177 - our $x; local $x; use strict; $$x[0] <-fetch> [variable] ok 178 - our $x; local $x; no strict; $$x[0] <-fetch> [exception] ok 179 - our $x; local $x; no strict; $$x[0] <-fetch> [return] ok 180 - our $x; local $x; no strict; $$x[0] <-fetch> [variable] ok 181 - my @x; $x[0] <-fetch> [exception] ok 182 - my @x; $x[0] <-fetch> [return] ok 183 - my @x; $x[0] <-fetch> [variable] ok 184 - our @x; local @x; use strict; $x[0] <-fetch> [exception] ok 185 - our @x; local @x; use strict; $x[0] <-fetch> [return] ok 186 - our @x; local @x; use strict; $x[0] <-fetch> [variable] ok 187 - our @x; local @x; no strict; $x[0] <-fetch> [exception] ok 188 - our @x; local @x; no strict; $x[0] <-fetch> [return] ok 189 - our @x; local @x; no strict; $x[0] <-fetch> [variable] ok 190 - my $x; $x->[0] <+fetch -fetch> [exception] ok 191 - my $x; $x->[0] <+fetch -fetch> [return] ok 192 - my $x; $x->[0] <+fetch -fetch> [variable] ok 193 - our $x; local $x; use strict; $x->[0] <+fetch -fetch> [exception] ok 194 - our $x; local $x; use strict; $x->[0] <+fetch -fetch> [return] ok 195 - our $x; local $x; use strict; $x->[0] <+fetch -fetch> [variable] ok 196 - our $x; local $x; no strict; $x->[0] <+fetch -fetch> [exception] ok 197 - our $x; local $x; no strict; $x->[0] <+fetch -fetch> [return] ok 198 - our $x; local $x; no strict; $x->[0] <+fetch -fetch> [variable] ok 199 - my $x; $$x[0] <+fetch -fetch> [exception] ok 200 - my $x; $$x[0] <+fetch -fetch> [return] ok 201 - my $x; $$x[0] <+fetch -fetch> [variable] ok 202 - our $x; local $x; use strict; $$x[0] <+fetch -fetch> [exception] ok 203 - our $x; local $x; use strict; $$x[0] <+fetch -fetch> [return] ok 204 - our $x; local $x; use strict; $$x[0] <+fetch -fetch> [variable] ok 205 - our $x; local $x; no strict; $$x[0] <+fetch -fetch> [exception] ok 206 - our $x; local $x; no strict; $$x[0] <+fetch -fetch> [return] ok 207 - our $x; local $x; no strict; $$x[0] <+fetch -fetch> [variable] ok 208 - my @x; $x[0] <+fetch -fetch> [exception] ok 209 - my @x; $x[0] <+fetch -fetch> [return] ok 210 - my @x; $x[0] <+fetch -fetch> [variable] ok 211 - our @x; local @x; use strict; $x[0] <+fetch -fetch> [exception] ok 212 - our @x; local @x; use strict; $x[0] <+fetch -fetch> [return] ok 213 - our @x; local @x; use strict; $x[0] <+fetch -fetch> [variable] ok 214 - our @x; local @x; no strict; $x[0] <+fetch -fetch> [exception] ok 215 - our @x; local @x; no strict; $x[0] <+fetch -fetch> [return] ok 216 - our @x; local @x; no strict; $x[0] <+fetch -fetch> [variable] ok 217 - my $x; $x->[0] <-fetch +fetch> [exception] ok 218 - my $x; $x->[0] <-fetch +fetch> [return] ok 219 - my $x; $x->[0] <-fetch +fetch> [variable] ok 220 - our $x; local $x; use strict; $x->[0] <-fetch +fetch> [exception] ok 221 - our $x; local $x; use strict; $x->[0] <-fetch +fetch> [return] ok 222 - our $x; local $x; use strict; $x->[0] <-fetch +fetch> [variable] ok 223 - our $x; local $x; no strict; $x->[0] <-fetch +fetch> [exception] ok 224 - our $x; local $x; no strict; $x->[0] <-fetch +fetch> [return] ok 225 - our $x; local $x; no strict; $x->[0] <-fetch +fetch> [variable] ok 226 - my $x; $$x[0] <-fetch +fetch> [exception] ok 227 - my $x; $$x[0] <-fetch +fetch> [return] ok 228 - my $x; $$x[0] <-fetch +fetch> [variable] ok 229 - our $x; local $x; use strict; $$x[0] <-fetch +fetch> [exception] ok 230 - our $x; local $x; use strict; $$x[0] <-fetch +fetch> [return] ok 231 - our $x; local $x; use strict; $$x[0] <-fetch +fetch> [variable] ok 232 - our $x; local $x; no strict; $$x[0] <-fetch +fetch> [exception] ok 233 - our $x; local $x; no strict; $$x[0] <-fetch +fetch> [return] ok 234 - our $x; local $x; no strict; $$x[0] <-fetch +fetch> [variable] ok 235 - my @x; $x[0] <-fetch +fetch> [exception] ok 236 - my @x; $x[0] <-fetch +fetch> [return] ok 237 - my @x; $x[0] <-fetch +fetch> [variable] ok 238 - our @x; local @x; use strict; $x[0] <-fetch +fetch> [exception] ok 239 - our @x; local @x; use strict; $x[0] <-fetch +fetch> [return] ok 240 - our @x; local @x; use strict; $x[0] <-fetch +fetch> [variable] ok 241 - our @x; local @x; no strict; $x[0] <-fetch +fetch> [exception] ok 242 - our @x; local @x; no strict; $x[0] <-fetch +fetch> [return] ok 243 - our @x; local @x; no strict; $x[0] <-fetch +fetch> [variable] ok 244 - my $x; $x->[0] <+fetch -exists> [exception] ok 245 - my $x; $x->[0] <+fetch -exists> [return] ok 246 - my $x; $x->[0] <+fetch -exists> [variable] ok 247 - our $x; local $x; use strict; $x->[0] <+fetch -exists> [exception] ok 248 - our $x; local $x; use strict; $x->[0] <+fetch -exists> [return] ok 249 - our $x; local $x; use strict; $x->[0] <+fetch -exists> [variable] ok 250 - our $x; local $x; no strict; $x->[0] <+fetch -exists> [exception] ok 251 - our $x; local $x; no strict; $x->[0] <+fetch -exists> [return] ok 252 - our $x; local $x; no strict; $x->[0] <+fetch -exists> [variable] ok 253 - my $x; $$x[0] <+fetch -exists> [exception] ok 254 - my $x; $$x[0] <+fetch -exists> [return] ok 255 - my $x; $$x[0] <+fetch -exists> [variable] ok 256 - our $x; local $x; use strict; $$x[0] <+fetch -exists> [exception] ok 257 - our $x; local $x; use strict; $$x[0] <+fetch -exists> [return] ok 258 - our $x; local $x; use strict; $$x[0] <+fetch -exists> [variable] ok 259 - our $x; local $x; no strict; $$x[0] <+fetch -exists> [exception] ok 260 - our $x; local $x; no strict; $$x[0] <+fetch -exists> [return] ok 261 - our $x; local $x; no strict; $$x[0] <+fetch -exists> [variable] ok 262 - my @x; $x[0] <+fetch -exists> [exception] ok 263 - my @x; $x[0] <+fetch -exists> [return] ok 264 - my @x; $x[0] <+fetch -exists> [variable] ok 265 - our @x; local @x; use strict; $x[0] <+fetch -exists> [exception] ok 266 - our @x; local @x; use strict; $x[0] <+fetch -exists> [return] ok 267 - our @x; local @x; use strict; $x[0] <+fetch -exists> [variable] ok 268 - our @x; local @x; no strict; $x[0] <+fetch -exists> [exception] ok 269 - our @x; local @x; no strict; $x[0] <+fetch -exists> [return] ok 270 - our @x; local @x; no strict; $x[0] <+fetch -exists> [variable] ok 271 - my $x; $x->[0] <+strict +fetch> [exception] ok 272 - my $x; $x->[0] <+strict +fetch> [return] ok 273 - my $x; $x->[0] <+strict +fetch> [variable] ok 274 - our $x; local $x; use strict; $x->[0] <+strict +fetch> [exception] ok 275 - our $x; local $x; use strict; $x->[0] <+strict +fetch> [return] ok 276 - our $x; local $x; use strict; $x->[0] <+strict +fetch> [variable] ok 277 - our $x; local $x; no strict; $x->[0] <+strict +fetch> [exception] ok 278 - our $x; local $x; no strict; $x->[0] <+strict +fetch> [return] ok 279 - our $x; local $x; no strict; $x->[0] <+strict +fetch> [variable] ok 280 - my $x; $$x[0] <+strict +fetch> [exception] ok 281 - my $x; $$x[0] <+strict +fetch> [return] ok 282 - my $x; $$x[0] <+strict +fetch> [variable] ok 283 - our $x; local $x; use strict; $$x[0] <+strict +fetch> [exception] ok 284 - our $x; local $x; use strict; $$x[0] <+strict +fetch> [return] ok 285 - our $x; local $x; use strict; $$x[0] <+strict +fetch> [variable] ok 286 - our $x; local $x; no strict; $$x[0] <+strict +fetch> [exception] ok 287 - our $x; local $x; no strict; $$x[0] <+strict +fetch> [return] ok 288 - our $x; local $x; no strict; $$x[0] <+strict +fetch> [variable] ok 289 - my @x; 1 <+strict +fetch> [exception] ok 290 - my @x; 1 <+strict +fetch> [return] ok 291 - my @x; 1 <+strict +fetch> [variable] ok 292 - our @x; local @x; use strict; 1 <+strict +fetch> [exception] ok 293 - our @x; local @x; use strict; 1 <+strict +fetch> [return] ok 294 - our @x; local @x; use strict; 1 <+strict +fetch> [variable] ok 295 - our @x; local @x; no strict; 1 <+strict +fetch> [exception] ok 296 - our @x; local @x; no strict; 1 <+strict +fetch> [return] ok 297 - our @x; local @x; no strict; 1 <+strict +fetch> [variable] ok 298 - my $x; $x->[0] <+strict +exists> [exception] ok 299 - my $x; $x->[0] <+strict +exists> [return] ok 300 - my $x; $x->[0] <+strict +exists> [variable] ok 301 - our $x; local $x; use strict; $x->[0] <+strict +exists> [exception] ok 302 - our $x; local $x; use strict; $x->[0] <+strict +exists> [return] ok 303 - our $x; local $x; use strict; $x->[0] <+strict +exists> [variable] ok 304 - our $x; local $x; no strict; $x->[0] <+strict +exists> [exception] ok 305 - our $x; local $x; no strict; $x->[0] <+strict +exists> [return] ok 306 - our $x; local $x; no strict; $x->[0] <+strict +exists> [variable] ok 307 - my $x; $$x[0] <+strict +exists> [exception] ok 308 - my $x; $$x[0] <+strict +exists> [return] ok 309 - my $x; $$x[0] <+strict +exists> [variable] ok 310 - our $x; local $x; use strict; $$x[0] <+strict +exists> [exception] ok 311 - our $x; local $x; use strict; $$x[0] <+strict +exists> [return] ok 312 - our $x; local $x; use strict; $$x[0] <+strict +exists> [variable] ok 313 - our $x; local $x; no strict; $$x[0] <+strict +exists> [exception] ok 314 - our $x; local $x; no strict; $$x[0] <+strict +exists> [return] ok 315 - our $x; local $x; no strict; $$x[0] <+strict +exists> [variable] ok 316 - my @x; $x[0] <+strict +exists> [exception] ok 317 - my @x; $x[0] <+strict +exists> [return] ok 318 - my @x; $x[0] <+strict +exists> [variable] ok 319 - our @x; local @x; use strict; $x[0] <+strict +exists> [exception] ok 320 - our @x; local @x; use strict; $x[0] <+strict +exists> [return] ok 321 - our @x; local @x; use strict; $x[0] <+strict +exists> [variable] ok 322 - our @x; local @x; no strict; $x[0] <+strict +exists> [exception] ok 323 - our @x; local @x; no strict; $x[0] <+strict +exists> [return] ok 324 - our @x; local @x; no strict; $x[0] <+strict +exists> [variable] ok 325 - my $x; $x->[0] <+strict +delete> [exception] ok 326 - my $x; $x->[0] <+strict +delete> [return] ok 327 - my $x; $x->[0] <+strict +delete> [variable] ok 328 - our $x; local $x; use strict; $x->[0] <+strict +delete> [exception] ok 329 - our $x; local $x; use strict; $x->[0] <+strict +delete> [return] ok 330 - our $x; local $x; use strict; $x->[0] <+strict +delete> [variable] ok 331 - our $x; local $x; no strict; $x->[0] <+strict +delete> [exception] ok 332 - our $x; local $x; no strict; $x->[0] <+strict +delete> [return] ok 333 - our $x; local $x; no strict; $x->[0] <+strict +delete> [variable] ok 334 - my $x; $$x[0] <+strict +delete> [exception] ok 335 - my $x; $$x[0] <+strict +delete> [return] ok 336 - my $x; $$x[0] <+strict +delete> [variable] ok 337 - our $x; local $x; use strict; $$x[0] <+strict +delete> [exception] ok 338 - our $x; local $x; use strict; $$x[0] <+strict +delete> [return] ok 339 - our $x; local $x; use strict; $$x[0] <+strict +delete> [variable] ok 340 - our $x; local $x; no strict; $$x[0] <+strict +delete> [exception] ok 341 - our $x; local $x; no strict; $$x[0] <+strict +delete> [return] ok 342 - our $x; local $x; no strict; $$x[0] <+strict +delete> [variable] ok 343 - my @x; $x[0] <+strict +delete> [exception] ok 344 - my @x; $x[0] <+strict +delete> [return] ok 345 - my @x; $x[0] <+strict +delete> [variable] ok 346 - our @x; local @x; use strict; $x[0] <+strict +delete> [exception] ok 347 - our @x; local @x; use strict; $x[0] <+strict +delete> [return] ok 348 - our @x; local @x; use strict; $x[0] <+strict +delete> [variable] ok 349 - our @x; local @x; no strict; $x[0] <+strict +delete> [exception] ok 350 - our @x; local @x; no strict; $x[0] <+strict +delete> [return] ok 351 - our @x; local @x; no strict; $x[0] <+strict +delete> [variable] ok 352 - my $x; $x->[0] <+strict +store> [exception] ok 353 - my $x; $x->[0] <+strict +store> [return] ok 354 - my $x; $x->[0] <+strict +store> [variable] ok 355 - our $x; local $x; use strict; $x->[0] <+strict +store> [exception] ok 356 - our $x; local $x; use strict; $x->[0] <+strict +store> [return] ok 357 - our $x; local $x; use strict; $x->[0] <+strict +store> [variable] ok 358 - our $x; local $x; no strict; $x->[0] <+strict +store> [exception] ok 359 - our $x; local $x; no strict; $x->[0] <+strict +store> [return] ok 360 - our $x; local $x; no strict; $x->[0] <+strict +store> [variable] ok 361 - my $x; $$x[0] <+strict +store> [exception] ok 362 - my $x; $$x[0] <+strict +store> [return] ok 363 - my $x; $$x[0] <+strict +store> [variable] ok 364 - our $x; local $x; use strict; $$x[0] <+strict +store> [exception] ok 365 - our $x; local $x; use strict; $$x[0] <+strict +store> [return] ok 366 - our $x; local $x; use strict; $$x[0] <+strict +store> [variable] ok 367 - our $x; local $x; no strict; $$x[0] <+strict +store> [exception] ok 368 - our $x; local $x; no strict; $$x[0] <+strict +store> [return] ok 369 - our $x; local $x; no strict; $$x[0] <+strict +store> [variable] ok 370 - my @x; $x[0] <+strict +store> [exception] ok 371 - my @x; $x[0] <+strict +store> [return] ok 372 - my @x; $x[0] <+strict +store> [variable] ok 373 - our @x; local @x; use strict; $x[0] <+strict +store> [exception] ok 374 - our @x; local @x; use strict; $x[0] <+strict +store> [return] ok 375 - our @x; local @x; use strict; $x[0] <+strict +store> [variable] ok 376 - our @x; local @x; no strict; $x[0] <+strict +store> [exception] ok 377 - our @x; local @x; no strict; $x[0] <+strict +store> [return] ok 378 - our @x; local @x; no strict; $x[0] <+strict +store> [variable] ok 379 - my $x; $x->[0]->[1] [exception] ok 380 - my $x; $x->[0]->[1] [return] ok 381 - my $x; $x->[0]->[1] [variable] ok 382 - our $x; local $x; use strict; $x->[0]->[1] [exception] ok 383 - our $x; local $x; use strict; $x->[0]->[1] [return] ok 384 - our $x; local $x; use strict; $x->[0]->[1] [variable] ok 385 - our $x; local $x; no strict; $x->[0]->[1] [exception] ok 386 - our $x; local $x; no strict; $x->[0]->[1] [return] ok 387 - our $x; local $x; no strict; $x->[0]->[1] [variable] ok 388 - my $x; $$x[0]->[1] [exception] ok 389 - my $x; $$x[0]->[1] [return] ok 390 - my $x; $$x[0]->[1] [variable] ok 391 - our $x; local $x; use strict; $$x[0]->[1] [exception] ok 392 - our $x; local $x; use strict; $$x[0]->[1] [return] ok 393 - our $x; local $x; use strict; $$x[0]->[1] [variable] ok 394 - our $x; local $x; no strict; $$x[0]->[1] [exception] ok 395 - our $x; local $x; no strict; $$x[0]->[1] [return] ok 396 - our $x; local $x; no strict; $$x[0]->[1] [variable] ok 397 - my @x; $x[0]->[1] [exception] ok 398 - my @x; $x[0]->[1] [return] ok 399 - my @x; $x[0]->[1] [variable] ok 400 - our @x; local @x; use strict; $x[0]->[1] [exception] ok 401 - our @x; local @x; use strict; $x[0]->[1] [return] ok 402 - our @x; local @x; use strict; $x[0]->[1] [variable] ok 403 - our @x; local @x; no strict; $x[0]->[1] [exception] ok 404 - our @x; local @x; no strict; $x[0]->[1] [return] ok 405 - our @x; local @x; no strict; $x[0]->[1] [variable] ok 406 - my $x; $x->[0]->[1] [exception] ok 407 - my $x; $x->[0]->[1] [return] ok 408 - my $x; $x->[0]->[1] [variable] ok 409 - our $x; local $x; use strict; $x->[0]->[1] [exception] ok 410 - our $x; local $x; use strict; $x->[0]->[1] [return] ok 411 - our $x; local $x; use strict; $x->[0]->[1] [variable] ok 412 - our $x; local $x; no strict; $x->[0]->[1] [exception] ok 413 - our $x; local $x; no strict; $x->[0]->[1] [return] ok 414 - our $x; local $x; no strict; $x->[0]->[1] [variable] ok 415 - my $x; $$x[0]->[1] [exception] ok 416 - my $x; $$x[0]->[1] [return] ok 417 - my $x; $$x[0]->[1] [variable] ok 418 - our $x; local $x; use strict; $$x[0]->[1] [exception] ok 419 - our $x; local $x; use strict; $$x[0]->[1] [return] ok 420 - our $x; local $x; use strict; $$x[0]->[1] [variable] ok 421 - our $x; local $x; no strict; $$x[0]->[1] [exception] ok 422 - our $x; local $x; no strict; $$x[0]->[1] [return] ok 423 - our $x; local $x; no strict; $$x[0]->[1] [variable] ok 424 - my @x; $x[0]->[1] [exception] ok 425 - my @x; $x[0]->[1] [return] ok 426 - my @x; $x[0]->[1] [variable] ok 427 - our @x; local @x; use strict; $x[0]->[1] [exception] ok 428 - our @x; local @x; use strict; $x[0]->[1] [return] ok 429 - our @x; local @x; use strict; $x[0]->[1] [variable] ok 430 - our @x; local @x; no strict; $x[0]->[1] [exception] ok 431 - our @x; local @x; no strict; $x[0]->[1] [return] ok 432 - our @x; local @x; no strict; $x[0]->[1] [variable] ok 433 - my $x; $x->[0]->[1] <+fetch> [exception] ok 434 - my $x; $x->[0]->[1] <+fetch> [return] ok 435 - my $x; $x->[0]->[1] <+fetch> [variable] ok 436 - our $x; local $x; use strict; $x->[0]->[1] <+fetch> [exception] ok 437 - our $x; local $x; use strict; $x->[0]->[1] <+fetch> [return] ok 438 - our $x; local $x; use strict; $x->[0]->[1] <+fetch> [variable] ok 439 - our $x; local $x; no strict; $x->[0]->[1] <+fetch> [exception] ok 440 - our $x; local $x; no strict; $x->[0]->[1] <+fetch> [return] ok 441 - our $x; local $x; no strict; $x->[0]->[1] <+fetch> [variable] ok 442 - my $x; $$x[0]->[1] <+fetch> [exception] ok 443 - my $x; $$x[0]->[1] <+fetch> [return] ok 444 - my $x; $$x[0]->[1] <+fetch> [variable] ok 445 - our $x; local $x; use strict; $$x[0]->[1] <+fetch> [exception] ok 446 - our $x; local $x; use strict; $$x[0]->[1] <+fetch> [return] ok 447 - our $x; local $x; use strict; $$x[0]->[1] <+fetch> [variable] ok 448 - our $x; local $x; no strict; $$x[0]->[1] <+fetch> [exception] ok 449 - our $x; local $x; no strict; $$x[0]->[1] <+fetch> [return] ok 450 - our $x; local $x; no strict; $$x[0]->[1] <+fetch> [variable] ok 451 - my @x; $x[0]->[1] <+fetch> [exception] ok 452 - my @x; $x[0]->[1] <+fetch> [return] ok 453 - my @x; $x[0]->[1] <+fetch> [variable] ok 454 - our @x; local @x; use strict; $x[0]->[1] <+fetch> [exception] ok 455 - our @x; local @x; use strict; $x[0]->[1] <+fetch> [return] ok 456 - our @x; local @x; use strict; $x[0]->[1] <+fetch> [variable] ok 457 - our @x; local @x; no strict; $x[0]->[1] <+fetch> [exception] ok 458 - our @x; local @x; no strict; $x[0]->[1] <+fetch> [return] ok 459 - our @x; local @x; no strict; $x[0]->[1] <+fetch> [variable] ok 460 - my $x; $x->[0]->[1] <+exists> [exception] ok 461 - my $x; $x->[0]->[1] <+exists> [return] ok 462 - my $x; $x->[0]->[1] <+exists> [variable] ok 463 - our $x; local $x; use strict; $x->[0]->[1] <+exists> [exception] ok 464 - our $x; local $x; use strict; $x->[0]->[1] <+exists> [return] ok 465 - our $x; local $x; use strict; $x->[0]->[1] <+exists> [variable] ok 466 - our $x; local $x; no strict; $x->[0]->[1] <+exists> [exception] ok 467 - our $x; local $x; no strict; $x->[0]->[1] <+exists> [return] ok 468 - our $x; local $x; no strict; $x->[0]->[1] <+exists> [variable] ok 469 - my $x; $$x[0]->[1] <+exists> [exception] ok 470 - my $x; $$x[0]->[1] <+exists> [return] ok 471 - my $x; $$x[0]->[1] <+exists> [variable] ok 472 - our $x; local $x; use strict; $$x[0]->[1] <+exists> [exception] ok 473 - our $x; local $x; use strict; $$x[0]->[1] <+exists> [return] ok 474 - our $x; local $x; use strict; $$x[0]->[1] <+exists> [variable] ok 475 - our $x; local $x; no strict; $$x[0]->[1] <+exists> [exception] ok 476 - our $x; local $x; no strict; $$x[0]->[1] <+exists> [return] ok 477 - our $x; local $x; no strict; $$x[0]->[1] <+exists> [variable] ok 478 - my @x; $x[0]->[1] <+exists> [exception] ok 479 - my @x; $x[0]->[1] <+exists> [return] ok 480 - my @x; $x[0]->[1] <+exists> [variable] ok 481 - our @x; local @x; use strict; $x[0]->[1] <+exists> [exception] ok 482 - our @x; local @x; use strict; $x[0]->[1] <+exists> [return] ok 483 - our @x; local @x; use strict; $x[0]->[1] <+exists> [variable] ok 484 - our @x; local @x; no strict; $x[0]->[1] <+exists> [exception] ok 485 - our @x; local @x; no strict; $x[0]->[1] <+exists> [return] ok 486 - our @x; local @x; no strict; $x[0]->[1] <+exists> [variable] ok 487 - my $x; $x->[0]->[1] <+delete> [exception] ok 488 - my $x; $x->[0]->[1] <+delete> [return] ok 489 - my $x; $x->[0]->[1] <+delete> [variable] ok 490 - our $x; local $x; use strict; $x->[0]->[1] <+delete> [exception] ok 491 - our $x; local $x; use strict; $x->[0]->[1] <+delete> [return] ok 492 - our $x; local $x; use strict; $x->[0]->[1] <+delete> [variable] ok 493 - our $x; local $x; no strict; $x->[0]->[1] <+delete> [exception] ok 494 - our $x; local $x; no strict; $x->[0]->[1] <+delete> [return] ok 495 - our $x; local $x; no strict; $x->[0]->[1] <+delete> [variable] ok 496 - my $x; $$x[0]->[1] <+delete> [exception] ok 497 - my $x; $$x[0]->[1] <+delete> [return] ok 498 - my $x; $$x[0]->[1] <+delete> [variable] ok 499 - our $x; local $x; use strict; $$x[0]->[1] <+delete> [exception] ok 500 - our $x; local $x; use strict; $$x[0]->[1] <+delete> [return] ok 501 - our $x; local $x; use strict; $$x[0]->[1] <+delete> [variable] ok 502 - our $x; local $x; no strict; $$x[0]->[1] <+delete> [exception] ok 503 - our $x; local $x; no strict; $$x[0]->[1] <+delete> [return] ok 504 - our $x; local $x; no strict; $$x[0]->[1] <+delete> [variable] ok 505 - my @x; $x[0]->[1] <+delete> [exception] ok 506 - my @x; $x[0]->[1] <+delete> [return] ok 507 - my @x; $x[0]->[1] <+delete> [variable] ok 508 - our @x; local @x; use strict; $x[0]->[1] <+delete> [exception] ok 509 - our @x; local @x; use strict; $x[0]->[1] <+delete> [return] ok 510 - our @x; local @x; use strict; $x[0]->[1] <+delete> [variable] ok 511 - our @x; local @x; no strict; $x[0]->[1] <+delete> [exception] ok 512 - our @x; local @x; no strict; $x[0]->[1] <+delete> [return] ok 513 - our @x; local @x; no strict; $x[0]->[1] <+delete> [variable] ok 514 - my $x; $x->[0]->[1] <+store> [exception] ok 515 - my $x; $x->[0]->[1] <+store> [return] ok 516 - my $x; $x->[0]->[1] <+store> [variable] ok 517 - our $x; local $x; use strict; $x->[0]->[1] <+store> [exception] ok 518 - our $x; local $x; use strict; $x->[0]->[1] <+store> [return] ok 519 - our $x; local $x; use strict; $x->[0]->[1] <+store> [variable] ok 520 - our $x; local $x; no strict; $x->[0]->[1] <+store> [exception] ok 521 - our $x; local $x; no strict; $x->[0]->[1] <+store> [return] ok 522 - our $x; local $x; no strict; $x->[0]->[1] <+store> [variable] ok 523 - my $x; $$x[0]->[1] <+store> [exception] ok 524 - my $x; $$x[0]->[1] <+store> [return] ok 525 - my $x; $$x[0]->[1] <+store> [variable] ok 526 - our $x; local $x; use strict; $$x[0]->[1] <+store> [exception] ok 527 - our $x; local $x; use strict; $$x[0]->[1] <+store> [return] ok 528 - our $x; local $x; use strict; $$x[0]->[1] <+store> [variable] ok 529 - our $x; local $x; no strict; $$x[0]->[1] <+store> [exception] ok 530 - our $x; local $x; no strict; $$x[0]->[1] <+store> [return] ok 531 - our $x; local $x; no strict; $$x[0]->[1] <+store> [variable] ok 532 - my @x; $x[0]->[1] <+store> [exception] ok 533 - my @x; $x[0]->[1] <+store> [return] ok 534 - my @x; $x[0]->[1] <+store> [variable] ok 535 - our @x; local @x; use strict; $x[0]->[1] <+store> [exception] ok 536 - our @x; local @x; use strict; $x[0]->[1] <+store> [return] ok 537 - our @x; local @x; use strict; $x[0]->[1] <+store> [variable] ok 538 - our @x; local @x; no strict; $x[0]->[1] <+store> [exception] ok 539 - our @x; local @x; no strict; $x[0]->[1] <+store> [return] ok 540 - our @x; local @x; no strict; $x[0]->[1] <+store> [variable] ok 541 - my $x; $x->[0]->[1] <+strict +fetch> [exception] ok 542 - my $x; $x->[0]->[1] <+strict +fetch> [return] ok 543 - my $x; $x->[0]->[1] <+strict +fetch> [variable] ok 544 - our $x; local $x; use strict; $x->[0]->[1] <+strict +fetch> [exception] ok 545 - our $x; local $x; use strict; $x->[0]->[1] <+strict +fetch> [return] ok 546 - our $x; local $x; use strict; $x->[0]->[1] <+strict +fetch> [variable] ok 547 - our $x; local $x; no strict; $x->[0]->[1] <+strict +fetch> [exception] ok 548 - our $x; local $x; no strict; $x->[0]->[1] <+strict +fetch> [return] ok 549 - our $x; local $x; no strict; $x->[0]->[1] <+strict +fetch> [variable] ok 550 - my $x; $$x[0]->[1] <+strict +fetch> [exception] ok 551 - my $x; $$x[0]->[1] <+strict +fetch> [return] ok 552 - my $x; $$x[0]->[1] <+strict +fetch> [variable] ok 553 - our $x; local $x; use strict; $$x[0]->[1] <+strict +fetch> [exception] ok 554 - our $x; local $x; use strict; $$x[0]->[1] <+strict +fetch> [return] ok 555 - our $x; local $x; use strict; $$x[0]->[1] <+strict +fetch> [variable] ok 556 - our $x; local $x; no strict; $$x[0]->[1] <+strict +fetch> [exception] ok 557 - our $x; local $x; no strict; $$x[0]->[1] <+strict +fetch> [return] ok 558 - our $x; local $x; no strict; $$x[0]->[1] <+strict +fetch> [variable] ok 559 - my @x; $x[0]->[1] <+strict +fetch> [exception] ok 560 - my @x; $x[0]->[1] <+strict +fetch> [return] ok 561 - my @x; $x[0]->[1] <+strict +fetch> [variable] ok 562 - our @x; local @x; use strict; $x[0]->[1] <+strict +fetch> [exception] ok 563 - our @x; local @x; use strict; $x[0]->[1] <+strict +fetch> [return] ok 564 - our @x; local @x; use strict; $x[0]->[1] <+strict +fetch> [variable] ok 565 - our @x; local @x; no strict; $x[0]->[1] <+strict +fetch> [exception] ok 566 - our @x; local @x; no strict; $x[0]->[1] <+strict +fetch> [return] ok 567 - our @x; local @x; no strict; $x[0]->[1] <+strict +fetch> [variable] ok 568 - my $x; $x->[0]->[1] <+strict +exists> [exception] ok 569 - my $x; $x->[0]->[1] <+strict +exists> [return] ok 570 - my $x; $x->[0]->[1] <+strict +exists> [variable] ok 571 - our $x; local $x; use strict; $x->[0]->[1] <+strict +exists> [exception] ok 572 - our $x; local $x; use strict; $x->[0]->[1] <+strict +exists> [return] ok 573 - our $x; local $x; use strict; $x->[0]->[1] <+strict +exists> [variable] ok 574 - our $x; local $x; no strict; $x->[0]->[1] <+strict +exists> [exception] ok 575 - our $x; local $x; no strict; $x->[0]->[1] <+strict +exists> [return] ok 576 - our $x; local $x; no strict; $x->[0]->[1] <+strict +exists> [variable] ok 577 - my $x; $$x[0]->[1] <+strict +exists> [exception] ok 578 - my $x; $$x[0]->[1] <+strict +exists> [return] ok 579 - my $x; $$x[0]->[1] <+strict +exists> [variable] ok 580 - our $x; local $x; use strict; $$x[0]->[1] <+strict +exists> [exception] ok 581 - our $x; local $x; use strict; $$x[0]->[1] <+strict +exists> [return] ok 582 - our $x; local $x; use strict; $$x[0]->[1] <+strict +exists> [variable] ok 583 - our $x; local $x; no strict; $$x[0]->[1] <+strict +exists> [exception] ok 584 - our $x; local $x; no strict; $$x[0]->[1] <+strict +exists> [return] ok 585 - our $x; local $x; no strict; $$x[0]->[1] <+strict +exists> [variable] ok 586 - my @x; $x[0]->[1] <+strict +exists> [exception] ok 587 - my @x; $x[0]->[1] <+strict +exists> [return] ok 588 - my @x; $x[0]->[1] <+strict +exists> [variable] ok 589 - our @x; local @x; use strict; $x[0]->[1] <+strict +exists> [exception] ok 590 - our @x; local @x; use strict; $x[0]->[1] <+strict +exists> [return] ok 591 - our @x; local @x; use strict; $x[0]->[1] <+strict +exists> [variable] ok 592 - our @x; local @x; no strict; $x[0]->[1] <+strict +exists> [exception] ok 593 - our @x; local @x; no strict; $x[0]->[1] <+strict +exists> [return] ok 594 - our @x; local @x; no strict; $x[0]->[1] <+strict +exists> [variable] ok 595 - my $x; $x->[0]->[1] <+strict +delete> [exception] ok 596 - my $x; $x->[0]->[1] <+strict +delete> [return] ok 597 - my $x; $x->[0]->[1] <+strict +delete> [variable] ok 598 - our $x; local $x; use strict; $x->[0]->[1] <+strict +delete> [exception] ok 599 - our $x; local $x; use strict; $x->[0]->[1] <+strict +delete> [return] ok 600 - our $x; local $x; use strict; $x->[0]->[1] <+strict +delete> [variable] ok 601 - our $x; local $x; no strict; $x->[0]->[1] <+strict +delete> [exception] ok 602 - our $x; local $x; no strict; $x->[0]->[1] <+strict +delete> [return] ok 603 - our $x; local $x; no strict; $x->[0]->[1] <+strict +delete> [variable] ok 604 - my $x; $$x[0]->[1] <+strict +delete> [exception] ok 605 - my $x; $$x[0]->[1] <+strict +delete> [return] ok 606 - my $x; $$x[0]->[1] <+strict +delete> [variable] ok 607 - our $x; local $x; use strict; $$x[0]->[1] <+strict +delete> [exception] ok 608 - our $x; local $x; use strict; $$x[0]->[1] <+strict +delete> [return] ok 609 - our $x; local $x; use strict; $$x[0]->[1] <+strict +delete> [variable] ok 610 - our $x; local $x; no strict; $$x[0]->[1] <+strict +delete> [exception] ok 611 - our $x; local $x; no strict; $$x[0]->[1] <+strict +delete> [return] ok 612 - our $x; local $x; no strict; $$x[0]->[1] <+strict +delete> [variable] ok 613 - my @x; $x[0]->[1] <+strict +delete> [exception] ok 614 - my @x; $x[0]->[1] <+strict +delete> [return] ok 615 - my @x; $x[0]->[1] <+strict +delete> [variable] ok 616 - our @x; local @x; use strict; $x[0]->[1] <+strict +delete> [exception] ok 617 - our @x; local @x; use strict; $x[0]->[1] <+strict +delete> [return] ok 618 - our @x; local @x; use strict; $x[0]->[1] <+strict +delete> [variable] ok 619 - our @x; local @x; no strict; $x[0]->[1] <+strict +delete> [exception] ok 620 - our @x; local @x; no strict; $x[0]->[1] <+strict +delete> [return] ok 621 - our @x; local @x; no strict; $x[0]->[1] <+strict +delete> [variable] ok 622 - my $x; $x->[0]->[1] <+strict +store> [exception] ok 623 - my $x; $x->[0]->[1] <+strict +store> [return] ok 624 - my $x; $x->[0]->[1] <+strict +store> [variable] ok 625 - our $x; local $x; use strict; $x->[0]->[1] <+strict +store> [exception] ok 626 - our $x; local $x; use strict; $x->[0]->[1] <+strict +store> [return] ok 627 - our $x; local $x; use strict; $x->[0]->[1] <+strict +store> [variable] ok 628 - our $x; local $x; no strict; $x->[0]->[1] <+strict +store> [exception] ok 629 - our $x; local $x; no strict; $x->[0]->[1] <+strict +store> [return] ok 630 - our $x; local $x; no strict; $x->[0]->[1] <+strict +store> [variable] ok 631 - my $x; $$x[0]->[1] <+strict +store> [exception] ok 632 - my $x; $$x[0]->[1] <+strict +store> [return] ok 633 - my $x; $$x[0]->[1] <+strict +store> [variable] ok 634 - our $x; local $x; use strict; $$x[0]->[1] <+strict +store> [exception] ok 635 - our $x; local $x; use strict; $$x[0]->[1] <+strict +store> [return] ok 636 - our $x; local $x; use strict; $$x[0]->[1] <+strict +store> [variable] ok 637 - our $x; local $x; no strict; $$x[0]->[1] <+strict +store> [exception] ok 638 - our $x; local $x; no strict; $$x[0]->[1] <+strict +store> [return] ok 639 - our $x; local $x; no strict; $$x[0]->[1] <+strict +store> [variable] ok 640 - my @x; $x[0]->[1] <+strict +store> [exception] ok 641 - my @x; $x[0]->[1] <+strict +store> [return] ok 642 - my @x; $x[0]->[1] <+strict +store> [variable] ok 643 - our @x; local @x; use strict; $x[0]->[1] <+strict +store> [exception] ok 644 - our @x; local @x; use strict; $x[0]->[1] <+strict +store> [return] ok 645 - our @x; local @x; use strict; $x[0]->[1] <+strict +store> [variable] ok 646 - our @x; local @x; no strict; $x[0]->[1] <+strict +store> [exception] ok 647 - our @x; local @x; no strict; $x[0]->[1] <+strict +store> [return] ok 648 - our @x; local @x; no strict; $x[0]->[1] <+strict +store> [variable] ok 649 - my $x; $x->[0] = 1; $x->[0] <+fetch> [exception] ok 650 - my $x; $x->[0] = 1; $x->[0] <+fetch> [return] ok 651 - my $x; $x->[0] = 1; $x->[0] <+fetch> [variable] ok 652 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+fetch> [exception] ok 653 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+fetch> [return] ok 654 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+fetch> [variable] ok 655 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+fetch> [exception] ok 656 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+fetch> [return] ok 657 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+fetch> [variable] ok 658 - my $x; $x->[0] = 1; $$x[0] <+fetch> [exception] ok 659 - my $x; $x->[0] = 1; $$x[0] <+fetch> [return] ok 660 - my $x; $x->[0] = 1; $$x[0] <+fetch> [variable] ok 661 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+fetch> [exception] ok 662 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+fetch> [return] ok 663 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+fetch> [variable] ok 664 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+fetch> [exception] ok 665 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+fetch> [return] ok 666 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+fetch> [variable] ok 667 - my @x; $x[0] = 1; $x[0] <+fetch> [exception] ok 668 - my @x; $x[0] = 1; $x[0] <+fetch> [return] ok 669 - my @x; $x[0] = 1; $x[0] <+fetch> [variable] ok 670 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+fetch> [exception] ok 671 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+fetch> [return] ok 672 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+fetch> [variable] ok 673 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+fetch> [exception] ok 674 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+fetch> [return] ok 675 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+fetch> [variable] ok 676 - my $x; $x->[0] = 1; $x->[1] <+fetch> [exception] ok 677 - my $x; $x->[0] = 1; $x->[1] <+fetch> [return] ok 678 - my $x; $x->[0] = 1; $x->[1] <+fetch> [variable] ok 679 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+fetch> [exception] ok 680 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+fetch> [return] ok 681 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+fetch> [variable] ok 682 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+fetch> [exception] ok 683 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+fetch> [return] ok 684 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+fetch> [variable] ok 685 - my $x; $x->[0] = 1; $$x[1] <+fetch> [exception] ok 686 - my $x; $x->[0] = 1; $$x[1] <+fetch> [return] ok 687 - my $x; $x->[0] = 1; $$x[1] <+fetch> [variable] ok 688 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+fetch> [exception] ok 689 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+fetch> [return] ok 690 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+fetch> [variable] ok 691 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+fetch> [exception] ok 692 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+fetch> [return] ok 693 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+fetch> [variable] ok 694 - my @x; $x[0] = 1; $x[1] <+fetch> [exception] ok 695 - my @x; $x[0] = 1; $x[1] <+fetch> [return] ok 696 - my @x; $x[0] = 1; $x[1] <+fetch> [variable] ok 697 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+fetch> [exception] ok 698 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+fetch> [return] ok 699 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+fetch> [variable] ok 700 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+fetch> [exception] ok 701 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+fetch> [return] ok 702 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+fetch> [variable] ok 703 - my $x; $x->[0] = 1; $x->[0] <+exists> [exception] ok 704 - my $x; $x->[0] = 1; $x->[0] <+exists> [return] ok 705 - my $x; $x->[0] = 1; $x->[0] <+exists> [variable] ok 706 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+exists> [exception] ok 707 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+exists> [return] ok 708 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+exists> [variable] ok 709 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+exists> [exception] ok 710 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+exists> [return] ok 711 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+exists> [variable] ok 712 - my $x; $x->[0] = 1; $$x[0] <+exists> [exception] ok 713 - my $x; $x->[0] = 1; $$x[0] <+exists> [return] ok 714 - my $x; $x->[0] = 1; $$x[0] <+exists> [variable] ok 715 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+exists> [exception] ok 716 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+exists> [return] ok 717 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+exists> [variable] ok 718 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+exists> [exception] ok 719 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+exists> [return] ok 720 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+exists> [variable] ok 721 - my @x; $x[0] = 1; $x[0] <+exists> [exception] ok 722 - my @x; $x[0] = 1; $x[0] <+exists> [return] ok 723 - my @x; $x[0] = 1; $x[0] <+exists> [variable] ok 724 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+exists> [exception] ok 725 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+exists> [return] ok 726 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+exists> [variable] ok 727 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+exists> [exception] ok 728 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+exists> [return] ok 729 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+exists> [variable] ok 730 - my $x; $x->[0] = 1; $x->[1] <+exists> [exception] ok 731 - my $x; $x->[0] = 1; $x->[1] <+exists> [return] ok 732 - my $x; $x->[0] = 1; $x->[1] <+exists> [variable] ok 733 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+exists> [exception] ok 734 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+exists> [return] ok 735 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+exists> [variable] ok 736 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+exists> [exception] ok 737 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+exists> [return] ok 738 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+exists> [variable] ok 739 - my $x; $x->[0] = 1; $$x[1] <+exists> [exception] ok 740 - my $x; $x->[0] = 1; $$x[1] <+exists> [return] ok 741 - my $x; $x->[0] = 1; $$x[1] <+exists> [variable] ok 742 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+exists> [exception] ok 743 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+exists> [return] ok 744 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+exists> [variable] ok 745 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+exists> [exception] ok 746 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+exists> [return] ok 747 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+exists> [variable] ok 748 - my @x; $x[0] = 1; $x[1] <+exists> [exception] ok 749 - my @x; $x[0] = 1; $x[1] <+exists> [return] ok 750 - my @x; $x[0] = 1; $x[1] <+exists> [variable] ok 751 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+exists> [exception] ok 752 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+exists> [return] ok 753 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+exists> [variable] ok 754 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+exists> [exception] ok 755 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+exists> [return] ok 756 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+exists> [variable] ok 757 - my $x; $x->[0] = 1; $x->[0] <+delete> [exception] ok 758 - my $x; $x->[0] = 1; $x->[0] <+delete> [return] ok 759 - my $x; $x->[0] = 1; $x->[0] <+delete> [variable] ok 760 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+delete> [exception] ok 761 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+delete> [return] ok 762 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+delete> [variable] ok 763 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+delete> [exception] ok 764 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+delete> [return] ok 765 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+delete> [variable] ok 766 - my $x; $x->[0] = 1; $$x[0] <+delete> [exception] ok 767 - my $x; $x->[0] = 1; $$x[0] <+delete> [return] ok 768 - my $x; $x->[0] = 1; $$x[0] <+delete> [variable] ok 769 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+delete> [exception] ok 770 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+delete> [return] ok 771 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+delete> [variable] ok 772 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+delete> [exception] ok 773 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+delete> [return] ok 774 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+delete> [variable] ok 775 - my @x; $x[0] = 1; $x[0] <+delete> [exception] ok 776 - my @x; $x[0] = 1; $x[0] <+delete> [return] ok 777 - my @x; $x[0] = 1; $x[0] <+delete> [variable] ok 778 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+delete> [exception] ok 779 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+delete> [return] ok 780 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+delete> [variable] ok 781 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+delete> [exception] ok 782 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+delete> [return] ok 783 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+delete> [variable] ok 784 - my $x; $x->[0] = 1; $x->[1] <+delete> [exception] ok 785 - my $x; $x->[0] = 1; $x->[1] <+delete> [return] ok 786 - my $x; $x->[0] = 1; $x->[1] <+delete> [variable] ok 787 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+delete> [exception] ok 788 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+delete> [return] ok 789 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+delete> [variable] ok 790 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+delete> [exception] ok 791 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+delete> [return] ok 792 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+delete> [variable] ok 793 - my $x; $x->[0] = 1; $$x[1] <+delete> [exception] ok 794 - my $x; $x->[0] = 1; $$x[1] <+delete> [return] ok 795 - my $x; $x->[0] = 1; $$x[1] <+delete> [variable] ok 796 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+delete> [exception] ok 797 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+delete> [return] ok 798 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+delete> [variable] ok 799 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+delete> [exception] ok 800 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+delete> [return] ok 801 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+delete> [variable] ok 802 - my @x; $x[0] = 1; $x[1] <+delete> [exception] ok 803 - my @x; $x[0] = 1; $x[1] <+delete> [return] ok 804 - my @x; $x[0] = 1; $x[1] <+delete> [variable] ok 805 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+delete> [exception] ok 806 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+delete> [return] ok 807 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+delete> [variable] ok 808 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+delete> [exception] ok 809 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+delete> [return] ok 810 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+delete> [variable] ok 811 - my $x; $x->[0] = 1; $x->[0] <+store> [exception] ok 812 - my $x; $x->[0] = 1; $x->[0] <+store> [return] ok 813 - my $x; $x->[0] = 1; $x->[0] <+store> [variable] ok 814 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+store> [exception] ok 815 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+store> [return] ok 816 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+store> [variable] ok 817 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+store> [exception] ok 818 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+store> [return] ok 819 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+store> [variable] ok 820 - my $x; $x->[0] = 1; $$x[0] <+store> [exception] ok 821 - my $x; $x->[0] = 1; $$x[0] <+store> [return] ok 822 - my $x; $x->[0] = 1; $$x[0] <+store> [variable] ok 823 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+store> [exception] ok 824 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+store> [return] ok 825 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+store> [variable] ok 826 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+store> [exception] ok 827 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+store> [return] ok 828 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+store> [variable] ok 829 - my @x; $x[0] = 1; $x[0] <+store> [exception] ok 830 - my @x; $x[0] = 1; $x[0] <+store> [return] ok 831 - my @x; $x[0] = 1; $x[0] <+store> [variable] ok 832 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+store> [exception] ok 833 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+store> [return] ok 834 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+store> [variable] ok 835 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+store> [exception] ok 836 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+store> [return] ok 837 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+store> [variable] ok 838 - my $x; $x->[0] = 1; $x->[1] <+store> [exception] ok 839 - my $x; $x->[0] = 1; $x->[1] <+store> [return] ok 840 - my $x; $x->[0] = 1; $x->[1] <+store> [variable] ok 841 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+store> [exception] ok 842 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+store> [return] ok 843 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+store> [variable] ok 844 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+store> [exception] ok 845 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+store> [return] ok 846 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+store> [variable] ok 847 - my $x; $x->[0] = 1; $$x[1] <+store> [exception] ok 848 - my $x; $x->[0] = 1; $$x[1] <+store> [return] ok 849 - my $x; $x->[0] = 1; $$x[1] <+store> [variable] ok 850 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+store> [exception] ok 851 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+store> [return] ok 852 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+store> [variable] ok 853 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+store> [exception] ok 854 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+store> [return] ok 855 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+store> [variable] ok 856 - my @x; $x[0] = 1; $x[1] <+store> [exception] ok 857 - my @x; $x[0] = 1; $x[1] <+store> [return] ok 858 - my @x; $x[0] = 1; $x[1] <+store> [variable] ok 859 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+store> [exception] ok 860 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+store> [return] ok 861 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+store> [variable] ok 862 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+store> [exception] ok 863 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+store> [return] ok 864 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+store> [variable] ok 865 - my $x; $x->[0] = 1; $x->[0] <+strict +fetch> [exception] ok 866 - my $x; $x->[0] = 1; $x->[0] <+strict +fetch> [return] ok 867 - my $x; $x->[0] = 1; $x->[0] <+strict +fetch> [variable] ok 868 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +fetch> [exception] ok 869 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +fetch> [return] ok 870 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +fetch> [variable] ok 871 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +fetch> [exception] ok 872 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +fetch> [return] ok 873 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +fetch> [variable] ok 874 - my $x; $x->[0] = 1; $$x[0] <+strict +fetch> [exception] ok 875 - my $x; $x->[0] = 1; $$x[0] <+strict +fetch> [return] ok 876 - my $x; $x->[0] = 1; $$x[0] <+strict +fetch> [variable] ok 877 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +fetch> [exception] ok 878 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +fetch> [return] ok 879 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +fetch> [variable] ok 880 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +fetch> [exception] ok 881 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +fetch> [return] ok 882 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +fetch> [variable] ok 883 - my @x; $x[0] = 1; $x[0] <+strict +fetch> [exception] ok 884 - my @x; $x[0] = 1; $x[0] <+strict +fetch> [return] ok 885 - my @x; $x[0] = 1; $x[0] <+strict +fetch> [variable] ok 886 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +fetch> [exception] ok 887 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +fetch> [return] ok 888 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +fetch> [variable] ok 889 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +fetch> [exception] ok 890 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +fetch> [return] ok 891 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +fetch> [variable] ok 892 - my $x; $x->[0] = 1; $x->[1] <+strict +fetch> [exception] ok 893 - my $x; $x->[0] = 1; $x->[1] <+strict +fetch> [return] ok 894 - my $x; $x->[0] = 1; $x->[1] <+strict +fetch> [variable] ok 895 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +fetch> [exception] ok 896 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +fetch> [return] ok 897 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +fetch> [variable] ok 898 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +fetch> [exception] ok 899 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +fetch> [return] ok 900 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +fetch> [variable] ok 901 - my $x; $x->[0] = 1; $$x[1] <+strict +fetch> [exception] ok 902 - my $x; $x->[0] = 1; $$x[1] <+strict +fetch> [return] ok 903 - my $x; $x->[0] = 1; $$x[1] <+strict +fetch> [variable] ok 904 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +fetch> [exception] ok 905 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +fetch> [return] ok 906 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +fetch> [variable] ok 907 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +fetch> [exception] ok 908 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +fetch> [return] ok 909 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +fetch> [variable] ok 910 - my @x; $x[0] = 1; $x[1] <+strict +fetch> [exception] ok 911 - my @x; $x[0] = 1; $x[1] <+strict +fetch> [return] ok 912 - my @x; $x[0] = 1; $x[1] <+strict +fetch> [variable] ok 913 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +fetch> [exception] ok 914 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +fetch> [return] ok 915 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +fetch> [variable] ok 916 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +fetch> [exception] ok 917 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +fetch> [return] ok 918 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +fetch> [variable] ok 919 - my $x; $x->[0] = 1; $x->[0] <+strict +exists> [exception] ok 920 - my $x; $x->[0] = 1; $x->[0] <+strict +exists> [return] ok 921 - my $x; $x->[0] = 1; $x->[0] <+strict +exists> [variable] ok 922 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +exists> [exception] ok 923 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +exists> [return] ok 924 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +exists> [variable] ok 925 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +exists> [exception] ok 926 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +exists> [return] ok 927 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +exists> [variable] ok 928 - my $x; $x->[0] = 1; $$x[0] <+strict +exists> [exception] ok 929 - my $x; $x->[0] = 1; $$x[0] <+strict +exists> [return] ok 930 - my $x; $x->[0] = 1; $$x[0] <+strict +exists> [variable] ok 931 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +exists> [exception] ok 932 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +exists> [return] ok 933 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +exists> [variable] ok 934 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +exists> [exception] ok 935 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +exists> [return] ok 936 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +exists> [variable] ok 937 - my @x; $x[0] = 1; $x[0] <+strict +exists> [exception] ok 938 - my @x; $x[0] = 1; $x[0] <+strict +exists> [return] ok 939 - my @x; $x[0] = 1; $x[0] <+strict +exists> [variable] ok 940 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +exists> [exception] ok 941 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +exists> [return] ok 942 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +exists> [variable] ok 943 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +exists> [exception] ok 944 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +exists> [return] ok 945 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +exists> [variable] ok 946 - my $x; $x->[0] = 1; $x->[1] <+strict +exists> [exception] ok 947 - my $x; $x->[0] = 1; $x->[1] <+strict +exists> [return] ok 948 - my $x; $x->[0] = 1; $x->[1] <+strict +exists> [variable] ok 949 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +exists> [exception] ok 950 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +exists> [return] ok 951 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +exists> [variable] ok 952 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +exists> [exception] ok 953 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +exists> [return] ok 954 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +exists> [variable] ok 955 - my $x; $x->[0] = 1; $$x[1] <+strict +exists> [exception] ok 956 - my $x; $x->[0] = 1; $$x[1] <+strict +exists> [return] ok 957 - my $x; $x->[0] = 1; $$x[1] <+strict +exists> [variable] ok 958 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +exists> [exception] ok 959 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +exists> [return] ok 960 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +exists> [variable] ok 961 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +exists> [exception] ok 962 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +exists> [return] ok 963 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +exists> [variable] ok 964 - my @x; $x[0] = 1; $x[1] <+strict +exists> [exception] ok 965 - my @x; $x[0] = 1; $x[1] <+strict +exists> [return] ok 966 - my @x; $x[0] = 1; $x[1] <+strict +exists> [variable] ok 967 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +exists> [exception] ok 968 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +exists> [return] ok 969 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +exists> [variable] ok 970 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +exists> [exception] ok 971 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +exists> [return] ok 972 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +exists> [variable] ok 973 - my $x; $x->[0] = 1; $x->[0] <+strict +delete> [exception] ok 974 - my $x; $x->[0] = 1; $x->[0] <+strict +delete> [return] ok 975 - my $x; $x->[0] = 1; $x->[0] <+strict +delete> [variable] ok 976 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +delete> [exception] ok 977 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +delete> [return] ok 978 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +delete> [variable] ok 979 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +delete> [exception] ok 980 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +delete> [return] ok 981 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +delete> [variable] ok 982 - my $x; $x->[0] = 1; $$x[0] <+strict +delete> [exception] ok 983 - my $x; $x->[0] = 1; $$x[0] <+strict +delete> [return] ok 984 - my $x; $x->[0] = 1; $$x[0] <+strict +delete> [variable] ok 985 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +delete> [exception] ok 986 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +delete> [return] ok 987 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +delete> [variable] ok 988 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +delete> [exception] ok 989 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +delete> [return] ok 990 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +delete> [variable] ok 991 - my @x; $x[0] = 1; $x[0] <+strict +delete> [exception] ok 992 - my @x; $x[0] = 1; $x[0] <+strict +delete> [return] ok 993 - my @x; $x[0] = 1; $x[0] <+strict +delete> [variable] ok 994 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +delete> [exception] ok 995 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +delete> [return] ok 996 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +delete> [variable] ok 997 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +delete> [exception] ok 998 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +delete> [return] ok 999 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +delete> [variable] ok 1000 - my $x; $x->[0] = 1; $x->[1] <+strict +delete> [exception] ok 1001 - my $x; $x->[0] = 1; $x->[1] <+strict +delete> [return] ok 1002 - my $x; $x->[0] = 1; $x->[1] <+strict +delete> [variable] ok 1003 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +delete> [exception] ok 1004 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +delete> [return] ok 1005 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +delete> [variable] ok 1006 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +delete> [exception] ok 1007 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +delete> [return] ok 1008 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +delete> [variable] ok 1009 - my $x; $x->[0] = 1; $$x[1] <+strict +delete> [exception] ok 1010 - my $x; $x->[0] = 1; $$x[1] <+strict +delete> [return] ok 1011 - my $x; $x->[0] = 1; $$x[1] <+strict +delete> [variable] ok 1012 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +delete> [exception] ok 1013 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +delete> [return] ok 1014 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +delete> [variable] ok 1015 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +delete> [exception] ok 1016 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +delete> [return] ok 1017 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +delete> [variable] ok 1018 - my @x; $x[0] = 1; $x[1] <+strict +delete> [exception] ok 1019 - my @x; $x[0] = 1; $x[1] <+strict +delete> [return] ok 1020 - my @x; $x[0] = 1; $x[1] <+strict +delete> [variable] ok 1021 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +delete> [exception] ok 1022 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +delete> [return] ok 1023 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +delete> [variable] ok 1024 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +delete> [exception] ok 1025 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +delete> [return] ok 1026 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +delete> [variable] ok 1027 - my $x; $x->[0] = 1; $x->[0] <+strict +store> [exception] ok 1028 - my $x; $x->[0] = 1; $x->[0] <+strict +store> [return] ok 1029 - my $x; $x->[0] = 1; $x->[0] <+strict +store> [variable] ok 1030 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +store> [exception] ok 1031 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +store> [return] ok 1032 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +store> [variable] ok 1033 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +store> [exception] ok 1034 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +store> [return] ok 1035 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +store> [variable] ok 1036 - my $x; $x->[0] = 1; $$x[0] <+strict +store> [exception] ok 1037 - my $x; $x->[0] = 1; $$x[0] <+strict +store> [return] ok 1038 - my $x; $x->[0] = 1; $$x[0] <+strict +store> [variable] ok 1039 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +store> [exception] ok 1040 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +store> [return] ok 1041 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +store> [variable] ok 1042 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +store> [exception] ok 1043 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +store> [return] ok 1044 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +store> [variable] ok 1045 - my @x; $x[0] = 1; $x[0] <+strict +store> [exception] ok 1046 - my @x; $x[0] = 1; $x[0] <+strict +store> [return] ok 1047 - my @x; $x[0] = 1; $x[0] <+strict +store> [variable] ok 1048 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +store> [exception] ok 1049 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +store> [return] ok 1050 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +store> [variable] ok 1051 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +store> [exception] ok 1052 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +store> [return] ok 1053 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +store> [variable] ok 1054 - my $x; $x->[0] = 1; $x->[1] <+strict +store> [exception] ok 1055 - my $x; $x->[0] = 1; $x->[1] <+strict +store> [return] ok 1056 - my $x; $x->[0] = 1; $x->[1] <+strict +store> [variable] ok 1057 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +store> [exception] ok 1058 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +store> [return] ok 1059 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +store> [variable] ok 1060 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +store> [exception] ok 1061 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +store> [return] ok 1062 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +store> [variable] ok 1063 - my $x; $x->[0] = 1; $$x[1] <+strict +store> [exception] ok 1064 - my $x; $x->[0] = 1; $$x[1] <+strict +store> [return] ok 1065 - my $x; $x->[0] = 1; $$x[1] <+strict +store> [variable] ok 1066 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +store> [exception] ok 1067 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +store> [return] ok 1068 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +store> [variable] ok 1069 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +store> [exception] ok 1070 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +store> [return] ok 1071 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +store> [variable] ok 1072 - my @x; $x[0] = 1; $x[1] <+strict +store> [exception] ok 1073 - my @x; $x[0] = 1; $x[1] <+strict +store> [return] ok 1074 - my @x; $x[0] = 1; $x[1] <+strict +store> [variable] ok 1075 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +store> [exception] ok 1076 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +store> [return] ok 1077 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +store> [variable] ok 1078 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +store> [exception] ok 1079 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +store> [return] ok 1080 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +store> [variable] ok 1081 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [exception] ok 1082 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [return] ok 1083 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [variable] ok 1084 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [exception] ok 1085 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [return] ok 1086 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [variable] ok 1087 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [exception] ok 1088 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [return] ok 1089 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [variable] ok 1090 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [exception] ok 1091 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [return] ok 1092 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [variable] ok 1093 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [exception] ok 1094 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [return] ok 1095 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [variable] ok 1096 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [exception] ok 1097 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [return] ok 1098 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [variable] ok 1099 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [exception] ok 1100 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [return] ok 1101 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [variable] ok 1102 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [exception] ok 1103 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [return] ok 1104 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [variable] ok 1105 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [exception] ok 1106 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [return] ok 1107 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [variable] ok 1108 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [exception] ok 1109 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [return] ok 1110 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [variable] ok 1111 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [exception] ok 1112 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [return] ok 1113 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [variable] ok 1114 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [exception] ok 1115 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [return] ok 1116 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [variable] ok 1117 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [exception] ok 1118 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [return] ok 1119 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [variable] ok 1120 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [exception] ok 1121 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [return] ok 1122 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [variable] ok 1123 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [exception] ok 1124 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [return] ok 1125 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [variable] ok 1126 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [exception] ok 1127 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [return] ok 1128 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [variable] ok 1129 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [exception] ok 1130 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [return] ok 1131 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [variable] ok 1132 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [exception] ok 1133 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [return] ok 1134 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [variable] ok 1135 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [exception] ok 1136 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [return] ok 1137 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [variable] ok 1138 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [exception] ok 1139 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [return] ok 1140 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [variable] ok 1141 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [exception] ok 1142 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [return] ok 1143 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [variable] ok 1144 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [exception] ok 1145 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [return] ok 1146 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [variable] ok 1147 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [exception] ok 1148 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [return] ok 1149 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [variable] ok 1150 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [exception] ok 1151 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [return] ok 1152 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [variable] ok 1153 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [exception] ok 1154 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [return] ok 1155 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [variable] ok 1156 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [exception] ok 1157 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [return] ok 1158 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [variable] ok 1159 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [exception] ok 1160 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [return] ok 1161 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [variable] ok 1162 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [exception] ok 1163 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [return] ok 1164 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [variable] ok 1165 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [exception] ok 1166 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [return] ok 1167 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [variable] ok 1168 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [exception] ok 1169 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [return] ok 1170 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [variable] ok 1171 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [exception] ok 1172 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [return] ok 1173 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [variable] ok 1174 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [exception] ok 1175 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [return] ok 1176 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [variable] ok 1177 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [exception] ok 1178 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [return] ok 1179 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [variable] ok 1180 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+exists> [exception] ok 1181 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+exists> [return] ok 1182 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+exists> [variable] ok 1183 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+exists> [exception] ok 1184 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+exists> [return] ok 1185 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+exists> [variable] ok 1186 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+exists> [exception] ok 1187 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+exists> [return] ok 1188 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+exists> [variable] ok 1189 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [exception] ok 1190 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [return] ok 1191 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [variable] ok 1192 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [exception] ok 1193 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [return] ok 1194 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [variable] ok 1195 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [exception] ok 1196 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [return] ok 1197 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [variable] ok 1198 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [exception] ok 1199 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [return] ok 1200 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [variable] ok 1201 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [exception] ok 1202 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [return] ok 1203 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [variable] ok 1204 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [exception] ok 1205 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [return] ok 1206 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [variable] ok 1207 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+exists> [exception] ok 1208 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+exists> [return] ok 1209 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+exists> [variable] ok 1210 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+exists> [exception] ok 1211 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+exists> [return] ok 1212 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+exists> [variable] ok 1213 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+exists> [exception] ok 1214 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+exists> [return] ok 1215 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+exists> [variable] ok 1216 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [exception] ok 1217 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [return] ok 1218 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [variable] ok 1219 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [exception] ok 1220 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [return] ok 1221 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [variable] ok 1222 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [exception] ok 1223 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [return] ok 1224 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [variable] ok 1225 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [exception] ok 1226 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [return] ok 1227 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [variable] ok 1228 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [exception] ok 1229 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [return] ok 1230 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [variable] ok 1231 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [exception] ok 1232 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [return] ok 1233 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [variable] ok 1234 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+exists> [exception] ok 1235 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+exists> [return] ok 1236 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+exists> [variable] ok 1237 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+exists> [exception] ok 1238 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+exists> [return] ok 1239 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+exists> [variable] ok 1240 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+exists> [exception] ok 1241 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+exists> [return] ok 1242 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+exists> [variable] ok 1243 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [exception] ok 1244 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [return] ok 1245 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [variable] ok 1246 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [exception] ok 1247 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [return] ok 1248 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [variable] ok 1249 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [exception] ok 1250 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [return] ok 1251 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [variable] ok 1252 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [exception] ok 1253 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [return] ok 1254 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [variable] ok 1255 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [exception] ok 1256 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [return] ok 1257 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [variable] ok 1258 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [exception] ok 1259 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [return] ok 1260 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [variable] ok 1261 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+delete> [exception] ok 1262 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+delete> [return] ok 1263 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+delete> [variable] ok 1264 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+delete> [exception] ok 1265 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+delete> [return] ok 1266 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+delete> [variable] ok 1267 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+delete> [exception] ok 1268 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+delete> [return] ok 1269 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+delete> [variable] ok 1270 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [exception] ok 1271 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [return] ok 1272 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [variable] ok 1273 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [exception] ok 1274 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [return] ok 1275 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [variable] ok 1276 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [exception] ok 1277 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [return] ok 1278 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [variable] ok 1279 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [exception] ok 1280 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [return] ok 1281 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [variable] ok 1282 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [exception] ok 1283 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [return] ok 1284 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [variable] ok 1285 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [exception] ok 1286 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [return] ok 1287 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [variable] ok 1288 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+delete> [exception] ok 1289 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+delete> [return] ok 1290 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+delete> [variable] ok 1291 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+delete> [exception] ok 1292 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+delete> [return] ok 1293 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+delete> [variable] ok 1294 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+delete> [exception] ok 1295 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+delete> [return] ok 1296 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+delete> [variable] ok 1297 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [exception] ok 1298 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [return] ok 1299 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [variable] ok 1300 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [exception] ok 1301 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [return] ok 1302 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [variable] ok 1303 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [exception] ok 1304 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [return] ok 1305 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [variable] ok 1306 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [exception] ok 1307 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [return] ok 1308 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [variable] ok 1309 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [exception] ok 1310 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [return] ok 1311 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [variable] ok 1312 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [exception] ok 1313 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [return] ok 1314 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [variable] ok 1315 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+delete> [exception] ok 1316 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+delete> [return] ok 1317 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+delete> [variable] ok 1318 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+delete> [exception] ok 1319 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+delete> [return] ok 1320 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+delete> [variable] ok 1321 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+delete> [exception] ok 1322 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+delete> [return] ok 1323 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+delete> [variable] ok 1324 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [exception] ok 1325 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [return] ok 1326 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [variable] ok 1327 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [exception] ok 1328 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [return] ok 1329 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [variable] ok 1330 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [exception] ok 1331 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [return] ok 1332 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [variable] ok 1333 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [exception] ok 1334 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [return] ok 1335 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [variable] ok 1336 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [exception] ok 1337 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [return] ok 1338 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [variable] ok 1339 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [exception] ok 1340 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [return] ok 1341 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [variable] ok 1342 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+store> [exception] ok 1343 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+store> [return] ok 1344 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+store> [variable] ok 1345 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+store> [exception] ok 1346 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+store> [return] ok 1347 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+store> [variable] ok 1348 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+store> [exception] ok 1349 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+store> [return] ok 1350 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+store> [variable] ok 1351 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [exception] ok 1352 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [return] ok 1353 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [variable] ok 1354 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [exception] ok 1355 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [return] ok 1356 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [variable] ok 1357 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [exception] ok 1358 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [return] ok 1359 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [variable] ok 1360 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [exception] ok 1361 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [return] ok 1362 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [variable] ok 1363 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [exception] ok 1364 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [return] ok 1365 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [variable] ok 1366 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [exception] ok 1367 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [return] ok 1368 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [variable] ok 1369 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+store> [exception] ok 1370 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+store> [return] ok 1371 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+store> [variable] ok 1372 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+store> [exception] ok 1373 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+store> [return] ok 1374 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+store> [variable] ok 1375 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+store> [exception] ok 1376 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+store> [return] ok 1377 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+store> [variable] ok 1378 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [exception] ok 1379 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [return] ok 1380 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [variable] ok 1381 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [exception] ok 1382 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [return] ok 1383 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [variable] ok 1384 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [exception] ok 1385 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [return] ok 1386 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [variable] ok 1387 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [exception] ok 1388 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [return] ok 1389 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [variable] ok 1390 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [exception] ok 1391 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [return] ok 1392 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [variable] ok 1393 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [exception] ok 1394 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [return] ok 1395 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [variable] ok 1396 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+store> [exception] ok 1397 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+store> [return] ok 1398 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+store> [variable] ok 1399 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+store> [exception] ok 1400 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+store> [return] ok 1401 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+store> [variable] ok 1402 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+store> [exception] ok 1403 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+store> [return] ok 1404 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+store> [variable] ok 1405 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [exception] ok 1406 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [return] ok 1407 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [variable] ok 1408 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [exception] ok 1409 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [return] ok 1410 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [variable] ok 1411 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [exception] ok 1412 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [return] ok 1413 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [variable] ok 1414 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [exception] ok 1415 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [return] ok 1416 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [variable] ok 1417 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [exception] ok 1418 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [return] ok 1419 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [variable] ok 1420 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [exception] ok 1421 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [return] ok 1422 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [variable] ok 1423 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [exception] ok 1424 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [return] ok 1425 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [variable] ok 1426 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [exception] ok 1427 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [return] ok 1428 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [variable] ok 1429 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [exception] ok 1430 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [return] ok 1431 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [variable] ok 1432 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [exception] ok 1433 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [return] ok 1434 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [variable] ok 1435 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [exception] ok 1436 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [return] ok 1437 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [variable] ok 1438 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [exception] ok 1439 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [return] ok 1440 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [variable] ok 1441 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [exception] ok 1442 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [return] ok 1443 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [variable] ok 1444 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [exception] ok 1445 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [return] ok 1446 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [variable] ok 1447 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [exception] ok 1448 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [return] ok 1449 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [variable] ok 1450 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [exception] ok 1451 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [return] ok 1452 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [variable] ok 1453 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [exception] ok 1454 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [return] ok 1455 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [variable] ok 1456 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [exception] ok 1457 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [return] ok 1458 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [variable] ok 1459 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [exception] ok 1460 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [return] ok 1461 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [variable] ok 1462 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [exception] ok 1463 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [return] ok 1464 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [variable] ok 1465 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [exception] ok 1466 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [return] ok 1467 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [variable] ok 1468 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [exception] ok 1469 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [return] ok 1470 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [variable] ok 1471 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [exception] ok 1472 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [return] ok 1473 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [variable] ok 1474 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [exception] ok 1475 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [return] ok 1476 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [variable] ok 1477 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [exception] ok 1478 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [return] ok 1479 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [variable] ok 1480 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [exception] ok 1481 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [return] ok 1482 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [variable] ok 1483 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [exception] ok 1484 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [return] ok 1485 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [variable] ok 1486 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [exception] ok 1487 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [return] ok 1488 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [variable] ok 1489 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [exception] ok 1490 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [return] ok 1491 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [variable] ok 1492 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [exception] ok 1493 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [return] ok 1494 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [variable] ok 1495 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [exception] ok 1496 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [return] ok 1497 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [variable] ok 1498 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [exception] ok 1499 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [return] ok 1500 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [variable] ok 1501 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [exception] ok 1502 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [return] ok 1503 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [variable] ok 1504 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [exception] ok 1505 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [return] ok 1506 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [variable] ok 1507 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [exception] ok 1508 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [return] ok 1509 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [variable] ok 1510 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [exception] ok 1511 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [return] ok 1512 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [variable] ok 1513 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [exception] ok 1514 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [return] ok 1515 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [variable] ok 1516 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [exception] ok 1517 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [return] ok 1518 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [variable] ok 1519 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [exception] ok 1520 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [return] ok 1521 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [variable] ok 1522 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [exception] ok 1523 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [return] ok 1524 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [variable] ok 1525 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [exception] ok 1526 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [return] ok 1527 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [variable] ok 1528 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [exception] ok 1529 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [return] ok 1530 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [variable] ok 1531 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [exception] ok 1532 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [return] ok 1533 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [variable] ok 1534 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [exception] ok 1535 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [return] ok 1536 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [variable] ok 1537 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [exception] ok 1538 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [return] ok 1539 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [variable] ok 1540 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [exception] ok 1541 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [return] ok 1542 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [variable] ok 1543 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [exception] ok 1544 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [return] ok 1545 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [variable] ok 1546 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [exception] ok 1547 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [return] ok 1548 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [variable] ok 1549 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [exception] ok 1550 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [return] ok 1551 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [variable] ok 1552 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [exception] ok 1553 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [return] ok 1554 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [variable] ok 1555 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [exception] ok 1556 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [return] ok 1557 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [variable] ok 1558 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [exception] ok 1559 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [return] ok 1560 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [variable] ok 1561 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [exception] ok 1562 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [return] ok 1563 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [variable] ok 1564 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [exception] ok 1565 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [return] ok 1566 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [variable] ok 1567 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [exception] ok 1568 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [return] ok 1569 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [variable] ok 1570 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [exception] ok 1571 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [return] ok 1572 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [variable] ok 1573 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [exception] ok 1574 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [return] ok 1575 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [variable] ok 1576 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [exception] ok 1577 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [return] ok 1578 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [variable] ok 1579 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [exception] ok 1580 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [return] ok 1581 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [variable] ok 1582 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [exception] ok 1583 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [return] ok 1584 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [variable] ok 1585 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [exception] ok 1586 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [return] ok 1587 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [variable] ok 1588 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [exception] ok 1589 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [return] ok 1590 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [variable] ok 1591 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [exception] ok 1592 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [return] ok 1593 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [variable] ok 1594 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [exception] ok 1595 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [return] ok 1596 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [variable] ok 1597 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [exception] ok 1598 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [return] ok 1599 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [variable] ok 1600 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [exception] ok 1601 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [return] ok 1602 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [variable] ok 1603 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [exception] ok 1604 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [return] ok 1605 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [variable] ok 1606 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [exception] ok 1607 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [return] ok 1608 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [variable] ok 1609 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [exception] ok 1610 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [return] ok 1611 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [variable] ok 1612 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [exception] ok 1613 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [return] ok 1614 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [variable] ok 1615 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [exception] ok 1616 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [return] ok 1617 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [variable] ok 1618 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [exception] ok 1619 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [return] ok 1620 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [variable] ok 1621 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [exception] ok 1622 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [return] ok 1623 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [variable] ok 1624 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [exception] ok 1625 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [return] ok 1626 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [variable] ok 1627 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [exception] ok 1628 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [return] ok 1629 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [variable] ok 1630 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [exception] ok 1631 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [return] ok 1632 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [variable] ok 1633 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [exception] ok 1634 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [return] ok 1635 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [variable] ok 1636 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [exception] ok 1637 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [return] ok 1638 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [variable] ok 1639 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [exception] ok 1640 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [return] ok 1641 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [variable] ok 1642 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [exception] ok 1643 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [return] ok 1644 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [variable] ok 1645 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [exception] ok 1646 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [return] ok 1647 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [variable] ok 1648 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [exception] ok 1649 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [return] ok 1650 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [variable] ok 1651 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [exception] ok 1652 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [return] ok 1653 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [variable] ok 1654 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [exception] ok 1655 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [return] ok 1656 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [variable] ok 1657 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [exception] ok 1658 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [return] ok 1659 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [variable] ok 1660 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [exception] ok 1661 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [return] ok 1662 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [variable] ok 1663 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [exception] ok 1664 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [return] ok 1665 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [variable] ok 1666 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [exception] ok 1667 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [return] ok 1668 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [variable] ok 1669 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [exception] ok 1670 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [return] ok 1671 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [variable] ok 1672 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [exception] ok 1673 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [return] ok 1674 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [variable] ok 1675 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [exception] ok 1676 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [return] ok 1677 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [variable] ok 1678 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [exception] ok 1679 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [return] ok 1680 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [variable] ok 1681 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [exception] ok 1682 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [return] ok 1683 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [variable] ok 1684 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [exception] ok 1685 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [return] ok 1686 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [variable] ok 1687 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [exception] ok 1688 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [return] ok 1689 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [variable] ok 1690 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [exception] ok 1691 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [return] ok 1692 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [variable] ok 1693 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [exception] ok 1694 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [return] ok 1695 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [variable] ok 1696 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [exception] ok 1697 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [return] ok 1698 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [variable] ok 1699 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [exception] ok 1700 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [return] ok 1701 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [variable] ok 1702 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [exception] ok 1703 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [return] ok 1704 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [variable] ok 1705 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [exception] ok 1706 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [return] ok 1707 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [variable] ok 1708 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [exception] ok 1709 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [return] ok 1710 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [variable] ok 1711 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [exception] ok 1712 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [return] ok 1713 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [variable] ok 1714 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [exception] ok 1715 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [return] ok 1716 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [variable] ok 1717 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [exception] ok 1718 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [return] ok 1719 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [variable] ok 1720 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [exception] ok 1721 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [return] ok 1722 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [variable] ok 1723 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [exception] ok 1724 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [return] ok 1725 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [variable] ok 1726 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [exception] ok 1727 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [return] ok 1728 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [variable] ok 1729 - my $x; 1 for $x->[0]; () [exception] ok 1730 - my $x; 1 for $x->[0]; () [return] ok 1731 - my $x; 1 for $x->[0]; () [variable] ok 1732 - our $x; local $x; use strict; 1 for $x->[0]; () [exception] ok 1733 - our $x; local $x; use strict; 1 for $x->[0]; () [return] ok 1734 - our $x; local $x; use strict; 1 for $x->[0]; () [variable] ok 1735 - our $x; local $x; no strict; 1 for $x->[0]; () [exception] ok 1736 - our $x; local $x; no strict; 1 for $x->[0]; () [return] ok 1737 - our $x; local $x; no strict; 1 for $x->[0]; () [variable] ok 1738 - my $x; 1 for $$x[0]; () [exception] ok 1739 - my $x; 1 for $$x[0]; () [return] ok 1740 - my $x; 1 for $$x[0]; () [variable] ok 1741 - our $x; local $x; use strict; 1 for $$x[0]; () [exception] ok 1742 - our $x; local $x; use strict; 1 for $$x[0]; () [return] ok 1743 - our $x; local $x; use strict; 1 for $$x[0]; () [variable] ok 1744 - our $x; local $x; no strict; 1 for $$x[0]; () [exception] ok 1745 - our $x; local $x; no strict; 1 for $$x[0]; () [return] ok 1746 - our $x; local $x; no strict; 1 for $$x[0]; () [variable] ok 1747 - my @x; 1 for $x[0]; () [exception] ok 1748 - my @x; 1 for $x[0]; () [return] ok 1749 - my @x; 1 for $x[0]; () [variable] ok 1750 - our @x; local @x; use strict; 1 for $x[0]; () [exception] ok 1751 - our @x; local @x; use strict; 1 for $x[0]; () [return] ok 1752 - our @x; local @x; use strict; 1 for $x[0]; () [variable] ok 1753 - our @x; local @x; no strict; 1 for $x[0]; () [exception] ok 1754 - our @x; local @x; no strict; 1 for $x[0]; () [return] ok 1755 - our @x; local @x; no strict; 1 for $x[0]; () [variable] ok 1756 - my $x; 1 for $x->[0]; () [exception] ok 1757 - my $x; 1 for $x->[0]; () [return] ok 1758 - my $x; 1 for $x->[0]; () [variable] ok 1759 - our $x; local $x; use strict; 1 for $x->[0]; () [exception] ok 1760 - our $x; local $x; use strict; 1 for $x->[0]; () [return] ok 1761 - our $x; local $x; use strict; 1 for $x->[0]; () [variable] ok 1762 - our $x; local $x; no strict; 1 for $x->[0]; () [exception] ok 1763 - our $x; local $x; no strict; 1 for $x->[0]; () [return] ok 1764 - our $x; local $x; no strict; 1 for $x->[0]; () [variable] ok 1765 - my $x; 1 for $$x[0]; () [exception] ok 1766 - my $x; 1 for $$x[0]; () [return] ok 1767 - my $x; 1 for $$x[0]; () [variable] ok 1768 - our $x; local $x; use strict; 1 for $$x[0]; () [exception] ok 1769 - our $x; local $x; use strict; 1 for $$x[0]; () [return] ok 1770 - our $x; local $x; use strict; 1 for $$x[0]; () [variable] ok 1771 - our $x; local $x; no strict; 1 for $$x[0]; () [exception] ok 1772 - our $x; local $x; no strict; 1 for $$x[0]; () [return] ok 1773 - our $x; local $x; no strict; 1 for $$x[0]; () [variable] ok 1774 - my @x; 1 for $x[0]; () [exception] ok 1775 - my @x; 1 for $x[0]; () [return] ok 1776 - my @x; 1 for $x[0]; () [variable] ok 1777 - our @x; local @x; use strict; 1 for $x[0]; () [exception] ok 1778 - our @x; local @x; use strict; 1 for $x[0]; () [return] ok 1779 - our @x; local @x; use strict; 1 for $x[0]; () [variable] ok 1780 - our @x; local @x; no strict; 1 for $x[0]; () [exception] ok 1781 - our @x; local @x; no strict; 1 for $x[0]; () [return] ok 1782 - our @x; local @x; no strict; 1 for $x[0]; () [variable] ok 1783 - my $x; 1 for $x->[0]; () <+fetch> [exception] ok 1784 - my $x; 1 for $x->[0]; () <+fetch> [return] ok 1785 - my $x; 1 for $x->[0]; () <+fetch> [variable] ok 1786 - our $x; local $x; use strict; 1 for $x->[0]; () <+fetch> [exception] ok 1787 - our $x; local $x; use strict; 1 for $x->[0]; () <+fetch> [return] ok 1788 - our $x; local $x; use strict; 1 for $x->[0]; () <+fetch> [variable] ok 1789 - our $x; local $x; no strict; 1 for $x->[0]; () <+fetch> [exception] ok 1790 - our $x; local $x; no strict; 1 for $x->[0]; () <+fetch> [return] ok 1791 - our $x; local $x; no strict; 1 for $x->[0]; () <+fetch> [variable] ok 1792 - my $x; 1 for $$x[0]; () <+fetch> [exception] ok 1793 - my $x; 1 for $$x[0]; () <+fetch> [return] ok 1794 - my $x; 1 for $$x[0]; () <+fetch> [variable] ok 1795 - our $x; local $x; use strict; 1 for $$x[0]; () <+fetch> [exception] ok 1796 - our $x; local $x; use strict; 1 for $$x[0]; () <+fetch> [return] ok 1797 - our $x; local $x; use strict; 1 for $$x[0]; () <+fetch> [variable] ok 1798 - our $x; local $x; no strict; 1 for $$x[0]; () <+fetch> [exception] ok 1799 - our $x; local $x; no strict; 1 for $$x[0]; () <+fetch> [return] ok 1800 - our $x; local $x; no strict; 1 for $$x[0]; () <+fetch> [variable] ok 1801 - my @x; 1 for $x[0]; () <+fetch> [exception] ok 1802 - my @x; 1 for $x[0]; () <+fetch> [return] ok 1803 - my @x; 1 for $x[0]; () <+fetch> [variable] ok 1804 - our @x; local @x; use strict; 1 for $x[0]; () <+fetch> [exception] ok 1805 - our @x; local @x; use strict; 1 for $x[0]; () <+fetch> [return] ok 1806 - our @x; local @x; use strict; 1 for $x[0]; () <+fetch> [variable] ok 1807 - our @x; local @x; no strict; 1 for $x[0]; () <+fetch> [exception] ok 1808 - our @x; local @x; no strict; 1 for $x[0]; () <+fetch> [return] ok 1809 - our @x; local @x; no strict; 1 for $x[0]; () <+fetch> [variable] ok 1810 - my $x; 1 for $x->[0]; () <+exists> [exception] ok 1811 - my $x; 1 for $x->[0]; () <+exists> [return] ok 1812 - my $x; 1 for $x->[0]; () <+exists> [variable] ok 1813 - our $x; local $x; use strict; 1 for $x->[0]; () <+exists> [exception] ok 1814 - our $x; local $x; use strict; 1 for $x->[0]; () <+exists> [return] ok 1815 - our $x; local $x; use strict; 1 for $x->[0]; () <+exists> [variable] ok 1816 - our $x; local $x; no strict; 1 for $x->[0]; () <+exists> [exception] ok 1817 - our $x; local $x; no strict; 1 for $x->[0]; () <+exists> [return] ok 1818 - our $x; local $x; no strict; 1 for $x->[0]; () <+exists> [variable] ok 1819 - my $x; 1 for $$x[0]; () <+exists> [exception] ok 1820 - my $x; 1 for $$x[0]; () <+exists> [return] ok 1821 - my $x; 1 for $$x[0]; () <+exists> [variable] ok 1822 - our $x; local $x; use strict; 1 for $$x[0]; () <+exists> [exception] ok 1823 - our $x; local $x; use strict; 1 for $$x[0]; () <+exists> [return] ok 1824 - our $x; local $x; use strict; 1 for $$x[0]; () <+exists> [variable] ok 1825 - our $x; local $x; no strict; 1 for $$x[0]; () <+exists> [exception] ok 1826 - our $x; local $x; no strict; 1 for $$x[0]; () <+exists> [return] ok 1827 - our $x; local $x; no strict; 1 for $$x[0]; () <+exists> [variable] ok 1828 - my @x; 1 for $x[0]; () <+exists> [exception] ok 1829 - my @x; 1 for $x[0]; () <+exists> [return] ok 1830 - my @x; 1 for $x[0]; () <+exists> [variable] ok 1831 - our @x; local @x; use strict; 1 for $x[0]; () <+exists> [exception] ok 1832 - our @x; local @x; use strict; 1 for $x[0]; () <+exists> [return] ok 1833 - our @x; local @x; use strict; 1 for $x[0]; () <+exists> [variable] ok 1834 - our @x; local @x; no strict; 1 for $x[0]; () <+exists> [exception] ok 1835 - our @x; local @x; no strict; 1 for $x[0]; () <+exists> [return] ok 1836 - our @x; local @x; no strict; 1 for $x[0]; () <+exists> [variable] ok 1837 - my $x; 1 for $x->[0]; () <+delete> [exception] ok 1838 - my $x; 1 for $x->[0]; () <+delete> [return] ok 1839 - my $x; 1 for $x->[0]; () <+delete> [variable] ok 1840 - our $x; local $x; use strict; 1 for $x->[0]; () <+delete> [exception] ok 1841 - our $x; local $x; use strict; 1 for $x->[0]; () <+delete> [return] ok 1842 - our $x; local $x; use strict; 1 for $x->[0]; () <+delete> [variable] ok 1843 - our $x; local $x; no strict; 1 for $x->[0]; () <+delete> [exception] ok 1844 - our $x; local $x; no strict; 1 for $x->[0]; () <+delete> [return] ok 1845 - our $x; local $x; no strict; 1 for $x->[0]; () <+delete> [variable] ok 1846 - my $x; 1 for $$x[0]; () <+delete> [exception] ok 1847 - my $x; 1 for $$x[0]; () <+delete> [return] ok 1848 - my $x; 1 for $$x[0]; () <+delete> [variable] ok 1849 - our $x; local $x; use strict; 1 for $$x[0]; () <+delete> [exception] ok 1850 - our $x; local $x; use strict; 1 for $$x[0]; () <+delete> [return] ok 1851 - our $x; local $x; use strict; 1 for $$x[0]; () <+delete> [variable] ok 1852 - our $x; local $x; no strict; 1 for $$x[0]; () <+delete> [exception] ok 1853 - our $x; local $x; no strict; 1 for $$x[0]; () <+delete> [return] ok 1854 - our $x; local $x; no strict; 1 for $$x[0]; () <+delete> [variable] ok 1855 - my @x; 1 for $x[0]; () <+delete> [exception] ok 1856 - my @x; 1 for $x[0]; () <+delete> [return] ok 1857 - my @x; 1 for $x[0]; () <+delete> [variable] ok 1858 - our @x; local @x; use strict; 1 for $x[0]; () <+delete> [exception] ok 1859 - our @x; local @x; use strict; 1 for $x[0]; () <+delete> [return] ok 1860 - our @x; local @x; use strict; 1 for $x[0]; () <+delete> [variable] ok 1861 - our @x; local @x; no strict; 1 for $x[0]; () <+delete> [exception] ok 1862 - our @x; local @x; no strict; 1 for $x[0]; () <+delete> [return] ok 1863 - our @x; local @x; no strict; 1 for $x[0]; () <+delete> [variable] ok 1864 - my $x; 1 for $x->[0]; () <+store> [exception] ok 1865 - my $x; 1 for $x->[0]; () <+store> [return] ok 1866 - my $x; 1 for $x->[0]; () <+store> [variable] ok 1867 - our $x; local $x; use strict; 1 for $x->[0]; () <+store> [exception] ok 1868 - our $x; local $x; use strict; 1 for $x->[0]; () <+store> [return] ok 1869 - our $x; local $x; use strict; 1 for $x->[0]; () <+store> [variable] ok 1870 - our $x; local $x; no strict; 1 for $x->[0]; () <+store> [exception] ok 1871 - our $x; local $x; no strict; 1 for $x->[0]; () <+store> [return] ok 1872 - our $x; local $x; no strict; 1 for $x->[0]; () <+store> [variable] ok 1873 - my $x; 1 for $$x[0]; () <+store> [exception] ok 1874 - my $x; 1 for $$x[0]; () <+store> [return] ok 1875 - my $x; 1 for $$x[0]; () <+store> [variable] ok 1876 - our $x; local $x; use strict; 1 for $$x[0]; () <+store> [exception] ok 1877 - our $x; local $x; use strict; 1 for $$x[0]; () <+store> [return] ok 1878 - our $x; local $x; use strict; 1 for $$x[0]; () <+store> [variable] ok 1879 - our $x; local $x; no strict; 1 for $$x[0]; () <+store> [exception] ok 1880 - our $x; local $x; no strict; 1 for $$x[0]; () <+store> [return] ok 1881 - our $x; local $x; no strict; 1 for $$x[0]; () <+store> [variable] ok 1882 - my @x; 1 <+store> [exception] ok 1883 - my @x; 1 <+store> [return] ok 1884 - my @x; 1 <+store> [variable] ok 1885 - our @x; local @x; use strict; 1 <+store> [exception] ok 1886 - our @x; local @x; use strict; 1 <+store> [return] ok 1887 - our @x; local @x; use strict; 1 <+store> [variable] ok 1888 - our @x; local @x; no strict; 1 <+store> [exception] ok 1889 - our @x; local @x; no strict; 1 <+store> [return] ok 1890 - our @x; local @x; no strict; 1 <+store> [variable] ok 1891 - my $x; $_ = 1 for $x->[0]; () [exception] ok 1892 - my $x; $_ = 1 for $x->[0]; () [return] ok 1893 - my $x; $_ = 1 for $x->[0]; () [variable] ok 1894 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () [exception] ok 1895 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () [return] ok 1896 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () [variable] ok 1897 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () [exception] ok 1898 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () [return] ok 1899 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () [variable] ok 1900 - my $x; $_ = 1 for $$x[0]; () [exception] ok 1901 - my $x; $_ = 1 for $$x[0]; () [return] ok 1902 - my $x; $_ = 1 for $$x[0]; () [variable] ok 1903 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () [exception] ok 1904 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () [return] ok 1905 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () [variable] ok 1906 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () [exception] ok 1907 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () [return] ok 1908 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () [variable] ok 1909 - my @x; $_ = 1 for $x[0]; () [exception] ok 1910 - my @x; $_ = 1 for $x[0]; () [return] ok 1911 - my @x; $_ = 1 for $x[0]; () [variable] ok 1912 - our @x; local @x; use strict; $_ = 1 for $x[0]; () [exception] ok 1913 - our @x; local @x; use strict; $_ = 1 for $x[0]; () [return] ok 1914 - our @x; local @x; use strict; $_ = 1 for $x[0]; () [variable] ok 1915 - our @x; local @x; no strict; $_ = 1 for $x[0]; () [exception] ok 1916 - our @x; local @x; no strict; $_ = 1 for $x[0]; () [return] ok 1917 - our @x; local @x; no strict; $_ = 1 for $x[0]; () [variable] ok 1918 - my $x; $_ = 1 for $x->[0]; () [exception] ok 1919 - my $x; $_ = 1 for $x->[0]; () [return] ok 1920 - my $x; $_ = 1 for $x->[0]; () [variable] ok 1921 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () [exception] ok 1922 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () [return] ok 1923 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () [variable] ok 1924 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () [exception] ok 1925 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () [return] ok 1926 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () [variable] ok 1927 - my $x; $_ = 1 for $$x[0]; () [exception] ok 1928 - my $x; $_ = 1 for $$x[0]; () [return] ok 1929 - my $x; $_ = 1 for $$x[0]; () [variable] ok 1930 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () [exception] ok 1931 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () [return] ok 1932 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () [variable] ok 1933 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () [exception] ok 1934 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () [return] ok 1935 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () [variable] ok 1936 - my @x; $_ = 1 for $x[0]; () [exception] ok 1937 - my @x; $_ = 1 for $x[0]; () [return] ok 1938 - my @x; $_ = 1 for $x[0]; () [variable] ok 1939 - our @x; local @x; use strict; $_ = 1 for $x[0]; () [exception] ok 1940 - our @x; local @x; use strict; $_ = 1 for $x[0]; () [return] ok 1941 - our @x; local @x; use strict; $_ = 1 for $x[0]; () [variable] ok 1942 - our @x; local @x; no strict; $_ = 1 for $x[0]; () [exception] ok 1943 - our @x; local @x; no strict; $_ = 1 for $x[0]; () [return] ok 1944 - our @x; local @x; no strict; $_ = 1 for $x[0]; () [variable] ok 1945 - my $x; $_ = 1 for $x->[0]; () <+fetch> [exception] ok 1946 - my $x; $_ = 1 for $x->[0]; () <+fetch> [return] ok 1947 - my $x; $_ = 1 for $x->[0]; () <+fetch> [variable] ok 1948 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+fetch> [exception] ok 1949 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+fetch> [return] ok 1950 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+fetch> [variable] ok 1951 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+fetch> [exception] ok 1952 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+fetch> [return] ok 1953 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+fetch> [variable] ok 1954 - my $x; $_ = 1 for $$x[0]; () <+fetch> [exception] ok 1955 - my $x; $_ = 1 for $$x[0]; () <+fetch> [return] ok 1956 - my $x; $_ = 1 for $$x[0]; () <+fetch> [variable] ok 1957 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+fetch> [exception] ok 1958 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+fetch> [return] ok 1959 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+fetch> [variable] ok 1960 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+fetch> [exception] ok 1961 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+fetch> [return] ok 1962 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+fetch> [variable] ok 1963 - my @x; $_ = 1 for $x[0]; () <+fetch> [exception] ok 1964 - my @x; $_ = 1 for $x[0]; () <+fetch> [return] ok 1965 - my @x; $_ = 1 for $x[0]; () <+fetch> [variable] ok 1966 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+fetch> [exception] ok 1967 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+fetch> [return] ok 1968 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+fetch> [variable] ok 1969 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+fetch> [exception] ok 1970 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+fetch> [return] ok 1971 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+fetch> [variable] ok 1972 - my $x; $_ = 1 for $x->[0]; () <+exists> [exception] ok 1973 - my $x; $_ = 1 for $x->[0]; () <+exists> [return] ok 1974 - my $x; $_ = 1 for $x->[0]; () <+exists> [variable] ok 1975 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+exists> [exception] ok 1976 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+exists> [return] ok 1977 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+exists> [variable] ok 1978 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+exists> [exception] ok 1979 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+exists> [return] ok 1980 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+exists> [variable] ok 1981 - my $x; $_ = 1 for $$x[0]; () <+exists> [exception] ok 1982 - my $x; $_ = 1 for $$x[0]; () <+exists> [return] ok 1983 - my $x; $_ = 1 for $$x[0]; () <+exists> [variable] ok 1984 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+exists> [exception] ok 1985 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+exists> [return] ok 1986 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+exists> [variable] ok 1987 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+exists> [exception] ok 1988 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+exists> [return] ok 1989 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+exists> [variable] ok 1990 - my @x; $_ = 1 for $x[0]; () <+exists> [exception] ok 1991 - my @x; $_ = 1 for $x[0]; () <+exists> [return] ok 1992 - my @x; $_ = 1 for $x[0]; () <+exists> [variable] ok 1993 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+exists> [exception] ok 1994 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+exists> [return] ok 1995 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+exists> [variable] ok 1996 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+exists> [exception] ok 1997 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+exists> [return] ok 1998 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+exists> [variable] ok 1999 - my $x; $_ = 1 for $x->[0]; () <+delete> [exception] ok 2000 - my $x; $_ = 1 for $x->[0]; () <+delete> [return] ok 2001 - my $x; $_ = 1 for $x->[0]; () <+delete> [variable] ok 2002 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+delete> [exception] ok 2003 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+delete> [return] ok 2004 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+delete> [variable] ok 2005 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+delete> [exception] ok 2006 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+delete> [return] ok 2007 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+delete> [variable] ok 2008 - my $x; $_ = 1 for $$x[0]; () <+delete> [exception] ok 2009 - my $x; $_ = 1 for $$x[0]; () <+delete> [return] ok 2010 - my $x; $_ = 1 for $$x[0]; () <+delete> [variable] ok 2011 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+delete> [exception] ok 2012 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+delete> [return] ok 2013 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+delete> [variable] ok 2014 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+delete> [exception] ok 2015 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+delete> [return] ok 2016 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+delete> [variable] ok 2017 - my @x; $_ = 1 for $x[0]; () <+delete> [exception] ok 2018 - my @x; $_ = 1 for $x[0]; () <+delete> [return] ok 2019 - my @x; $_ = 1 for $x[0]; () <+delete> [variable] ok 2020 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+delete> [exception] ok 2021 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+delete> [return] ok 2022 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+delete> [variable] ok 2023 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+delete> [exception] ok 2024 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+delete> [return] ok 2025 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+delete> [variable] ok 2026 - my $x; $_ = 1 for $x->[0]; () <+store> [exception] ok 2027 - my $x; $_ = 1 for $x->[0]; () <+store> [return] ok 2028 - my $x; $_ = 1 for $x->[0]; () <+store> [variable] ok 2029 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+store> [exception] ok 2030 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+store> [return] ok 2031 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+store> [variable] ok 2032 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+store> [exception] ok 2033 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+store> [return] ok 2034 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+store> [variable] ok 2035 - my $x; $_ = 1 for $$x[0]; () <+store> [exception] ok 2036 - my $x; $_ = 1 for $$x[0]; () <+store> [return] ok 2037 - my $x; $_ = 1 for $$x[0]; () <+store> [variable] ok 2038 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+store> [exception] ok 2039 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+store> [return] ok 2040 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+store> [variable] ok 2041 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+store> [exception] ok 2042 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+store> [return] ok 2043 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+store> [variable] ok 2044 - my @x; 1 <+store> [exception] ok 2045 - my @x; 1 <+store> [return] ok 2046 - my @x; 1 <+store> [variable] ok 2047 - our @x; local @x; use strict; 1 <+store> [exception] ok 2048 - our @x; local @x; use strict; 1 <+store> [return] ok 2049 - our @x; local @x; use strict; 1 <+store> [variable] ok 2050 - our @x; local @x; no strict; 1 <+store> [exception] ok 2051 - our @x; local @x; no strict; 1 <+store> [return] ok 2052 - our @x; local @x; no strict; 1 <+store> [variable] ok 2053 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [exception] ok 2054 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [return] ok 2055 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [variable] ok 2056 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [exception] ok 2057 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [return] ok 2058 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [variable] ok 2059 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [exception] ok 2060 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [return] ok 2061 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [variable] ok 2062 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [exception] ok 2063 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [return] ok 2064 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [variable] ok 2065 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [exception] ok 2066 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [return] ok 2067 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [variable] ok 2068 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [exception] ok 2069 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [return] ok 2070 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [variable] ok 2071 - my @x; $x[0] = 1; 1 for $x[0]; () <+fetch> [exception] ok 2072 - my @x; $x[0] = 1; 1 for $x[0]; () <+fetch> [return] ok 2073 - my @x; $x[0] = 1; 1 for $x[0]; () <+fetch> [variable] ok 2074 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+fetch> [exception] ok 2075 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+fetch> [return] ok 2076 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+fetch> [variable] ok 2077 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+fetch> [exception] ok 2078 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+fetch> [return] ok 2079 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+fetch> [variable] ok 2080 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [exception] ok 2081 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [return] ok 2082 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [variable] ok 2083 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [exception] ok 2084 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [return] ok 2085 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [variable] ok 2086 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [exception] ok 2087 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [return] ok 2088 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [variable] ok 2089 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [exception] ok 2090 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [return] ok 2091 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [variable] ok 2092 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [exception] ok 2093 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [return] ok 2094 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [variable] ok 2095 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [exception] ok 2096 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [return] ok 2097 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [variable] ok 2098 - my @x; $x[0] = 1; 1 for $x[1]; () <+fetch> [exception] ok 2099 - my @x; $x[0] = 1; 1 for $x[1]; () <+fetch> [return] ok 2100 - my @x; $x[0] = 1; 1 for $x[1]; () <+fetch> [variable] ok 2101 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+fetch> [exception] ok 2102 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+fetch> [return] ok 2103 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+fetch> [variable] ok 2104 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+fetch> [exception] ok 2105 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+fetch> [return] ok 2106 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+fetch> [variable] ok 2107 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+exists> [exception] ok 2108 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+exists> [return] ok 2109 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+exists> [variable] ok 2110 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+exists> [exception] ok 2111 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+exists> [return] ok 2112 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+exists> [variable] ok 2113 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+exists> [exception] ok 2114 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+exists> [return] ok 2115 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+exists> [variable] ok 2116 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+exists> [exception] ok 2117 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+exists> [return] ok 2118 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+exists> [variable] ok 2119 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+exists> [exception] ok 2120 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+exists> [return] ok 2121 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+exists> [variable] ok 2122 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+exists> [exception] ok 2123 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+exists> [return] ok 2124 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+exists> [variable] ok 2125 - my @x; $x[0] = 1; 1 for $x[0]; () <+exists> [exception] ok 2126 - my @x; $x[0] = 1; 1 for $x[0]; () <+exists> [return] ok 2127 - my @x; $x[0] = 1; 1 for $x[0]; () <+exists> [variable] ok 2128 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+exists> [exception] ok 2129 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+exists> [return] ok 2130 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+exists> [variable] ok 2131 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+exists> [exception] ok 2132 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+exists> [return] ok 2133 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+exists> [variable] ok 2134 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+exists> [exception] ok 2135 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+exists> [return] ok 2136 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+exists> [variable] ok 2137 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+exists> [exception] ok 2138 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+exists> [return] ok 2139 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+exists> [variable] ok 2140 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+exists> [exception] ok 2141 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+exists> [return] ok 2142 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+exists> [variable] ok 2143 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+exists> [exception] ok 2144 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+exists> [return] ok 2145 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+exists> [variable] ok 2146 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+exists> [exception] ok 2147 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+exists> [return] ok 2148 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+exists> [variable] ok 2149 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+exists> [exception] ok 2150 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+exists> [return] ok 2151 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+exists> [variable] ok 2152 - my @x; $x[0] = 1; 1 for $x[1]; () <+exists> [exception] ok 2153 - my @x; $x[0] = 1; 1 for $x[1]; () <+exists> [return] ok 2154 - my @x; $x[0] = 1; 1 for $x[1]; () <+exists> [variable] ok 2155 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+exists> [exception] ok 2156 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+exists> [return] ok 2157 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+exists> [variable] ok 2158 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+exists> [exception] ok 2159 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+exists> [return] ok 2160 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+exists> [variable] ok 2161 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+delete> [exception] ok 2162 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+delete> [return] ok 2163 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+delete> [variable] ok 2164 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+delete> [exception] ok 2165 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+delete> [return] ok 2166 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+delete> [variable] ok 2167 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+delete> [exception] ok 2168 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+delete> [return] ok 2169 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+delete> [variable] ok 2170 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+delete> [exception] ok 2171 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+delete> [return] ok 2172 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+delete> [variable] ok 2173 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+delete> [exception] ok 2174 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+delete> [return] ok 2175 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+delete> [variable] ok 2176 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+delete> [exception] ok 2177 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+delete> [return] ok 2178 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+delete> [variable] ok 2179 - my @x; $x[0] = 1; 1 for $x[0]; () <+delete> [exception] ok 2180 - my @x; $x[0] = 1; 1 for $x[0]; () <+delete> [return] ok 2181 - my @x; $x[0] = 1; 1 for $x[0]; () <+delete> [variable] ok 2182 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+delete> [exception] ok 2183 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+delete> [return] ok 2184 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+delete> [variable] ok 2185 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+delete> [exception] ok 2186 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+delete> [return] ok 2187 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+delete> [variable] ok 2188 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+delete> [exception] ok 2189 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+delete> [return] ok 2190 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+delete> [variable] ok 2191 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+delete> [exception] ok 2192 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+delete> [return] ok 2193 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+delete> [variable] ok 2194 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+delete> [exception] ok 2195 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+delete> [return] ok 2196 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+delete> [variable] ok 2197 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+delete> [exception] ok 2198 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+delete> [return] ok 2199 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+delete> [variable] ok 2200 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+delete> [exception] ok 2201 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+delete> [return] ok 2202 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+delete> [variable] ok 2203 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+delete> [exception] ok 2204 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+delete> [return] ok 2205 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+delete> [variable] ok 2206 - my @x; $x[0] = 1; 1 for $x[1]; () <+delete> [exception] ok 2207 - my @x; $x[0] = 1; 1 for $x[1]; () <+delete> [return] ok 2208 - my @x; $x[0] = 1; 1 for $x[1]; () <+delete> [variable] ok 2209 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+delete> [exception] ok 2210 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+delete> [return] ok 2211 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+delete> [variable] ok 2212 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+delete> [exception] ok 2213 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+delete> [return] ok 2214 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+delete> [variable] ok 2215 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+store> [exception] ok 2216 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+store> [return] ok 2217 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+store> [variable] ok 2218 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+store> [exception] ok 2219 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+store> [return] ok 2220 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+store> [variable] ok 2221 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+store> [exception] ok 2222 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+store> [return] ok 2223 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+store> [variable] ok 2224 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+store> [exception] ok 2225 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+store> [return] ok 2226 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+store> [variable] ok 2227 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+store> [exception] ok 2228 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+store> [return] ok 2229 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+store> [variable] ok 2230 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+store> [exception] ok 2231 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+store> [return] ok 2232 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+store> [variable] ok 2233 - my @x; $x[0] = 1; 1 for $x[0]; () <+store> [exception] ok 2234 - my @x; $x[0] = 1; 1 for $x[0]; () <+store> [return] ok 2235 - my @x; $x[0] = 1; 1 for $x[0]; () <+store> [variable] ok 2236 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+store> [exception] ok 2237 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+store> [return] ok 2238 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+store> [variable] ok 2239 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+store> [exception] ok 2240 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+store> [return] ok 2241 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+store> [variable] ok 2242 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+store> [exception] ok 2243 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+store> [return] ok 2244 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+store> [variable] ok 2245 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+store> [exception] ok 2246 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+store> [return] ok 2247 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+store> [variable] ok 2248 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+store> [exception] ok 2249 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+store> [return] ok 2250 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+store> [variable] ok 2251 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+store> [exception] ok 2252 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+store> [return] ok 2253 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+store> [variable] ok 2254 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+store> [exception] ok 2255 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+store> [return] ok 2256 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+store> [variable] ok 2257 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+store> [exception] ok 2258 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+store> [return] ok 2259 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+store> [variable] ok 2260 - my @x; $x[0] = 1; 1 for $x[1]; () <+store> [exception] ok 2261 - my @x; $x[0] = 1; 1 for $x[1]; () <+store> [return] ok 2262 - my @x; $x[0] = 1; 1 for $x[1]; () <+store> [variable] ok 2263 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+store> [exception] ok 2264 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+store> [return] ok 2265 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+store> [variable] ok 2266 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+store> [exception] ok 2267 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+store> [return] ok 2268 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+store> [variable] ok 2269 - my $x; do_nothing($x->[0]); () [exception] ok 2270 - my $x; do_nothing($x->[0]); () [return] ok 2271 - my $x; do_nothing($x->[0]); () [variable] ok 2272 - our $x; local $x; use strict; do_nothing($x->[0]); () [exception] ok 2273 - our $x; local $x; use strict; do_nothing($x->[0]); () [return] ok 2274 - our $x; local $x; use strict; do_nothing($x->[0]); () [variable] ok 2275 - our $x; local $x; no strict; do_nothing($x->[0]); () [exception] ok 2276 - our $x; local $x; no strict; do_nothing($x->[0]); () [return] ok 2277 - our $x; local $x; no strict; do_nothing($x->[0]); () [variable] ok 2278 - my $x; do_nothing($$x[0]); () [exception] ok 2279 - my $x; do_nothing($$x[0]); () [return] ok 2280 - my $x; do_nothing($$x[0]); () [variable] ok 2281 - our $x; local $x; use strict; do_nothing($$x[0]); () [exception] ok 2282 - our $x; local $x; use strict; do_nothing($$x[0]); () [return] ok 2283 - our $x; local $x; use strict; do_nothing($$x[0]); () [variable] ok 2284 - our $x; local $x; no strict; do_nothing($$x[0]); () [exception] ok 2285 - our $x; local $x; no strict; do_nothing($$x[0]); () [return] ok 2286 - our $x; local $x; no strict; do_nothing($$x[0]); () [variable] ok 2287 - my @x; do_nothing($x[0]); () [exception] ok 2288 - my @x; do_nothing($x[0]); () [return] ok 2289 - my @x; do_nothing($x[0]); () [variable] ok 2290 - our @x; local @x; use strict; do_nothing($x[0]); () [exception] ok 2291 - our @x; local @x; use strict; do_nothing($x[0]); () [return] ok 2292 - our @x; local @x; use strict; do_nothing($x[0]); () [variable] ok 2293 - our @x; local @x; no strict; do_nothing($x[0]); () [exception] ok 2294 - our @x; local @x; no strict; do_nothing($x[0]); () [return] ok 2295 - our @x; local @x; no strict; do_nothing($x[0]); () [variable] ok 2296 - my $x; do_nothing($x->[0]); () [exception] ok 2297 - my $x; do_nothing($x->[0]); () [return] ok 2298 - my $x; do_nothing($x->[0]); () [variable] ok 2299 - our $x; local $x; use strict; do_nothing($x->[0]); () [exception] ok 2300 - our $x; local $x; use strict; do_nothing($x->[0]); () [return] ok 2301 - our $x; local $x; use strict; do_nothing($x->[0]); () [variable] ok 2302 - our $x; local $x; no strict; do_nothing($x->[0]); () [exception] ok 2303 - our $x; local $x; no strict; do_nothing($x->[0]); () [return] ok 2304 - our $x; local $x; no strict; do_nothing($x->[0]); () [variable] ok 2305 - my $x; do_nothing($$x[0]); () [exception] ok 2306 - my $x; do_nothing($$x[0]); () [return] ok 2307 - my $x; do_nothing($$x[0]); () [variable] ok 2308 - our $x; local $x; use strict; do_nothing($$x[0]); () [exception] ok 2309 - our $x; local $x; use strict; do_nothing($$x[0]); () [return] ok 2310 - our $x; local $x; use strict; do_nothing($$x[0]); () [variable] ok 2311 - our $x; local $x; no strict; do_nothing($$x[0]); () [exception] ok 2312 - our $x; local $x; no strict; do_nothing($$x[0]); () [return] ok 2313 - our $x; local $x; no strict; do_nothing($$x[0]); () [variable] ok 2314 - my @x; do_nothing($x[0]); () [exception] ok 2315 - my @x; do_nothing($x[0]); () [return] ok 2316 - my @x; do_nothing($x[0]); () [variable] ok 2317 - our @x; local @x; use strict; do_nothing($x[0]); () [exception] ok 2318 - our @x; local @x; use strict; do_nothing($x[0]); () [return] ok 2319 - our @x; local @x; use strict; do_nothing($x[0]); () [variable] ok 2320 - our @x; local @x; no strict; do_nothing($x[0]); () [exception] ok 2321 - our @x; local @x; no strict; do_nothing($x[0]); () [return] ok 2322 - our @x; local @x; no strict; do_nothing($x[0]); () [variable] ok 2323 - my $x; do_nothing($x->[0]); () <+fetch> [exception] ok 2324 - my $x; do_nothing($x->[0]); () <+fetch> [return] ok 2325 - my $x; do_nothing($x->[0]); () <+fetch> [variable] ok 2326 - our $x; local $x; use strict; do_nothing($x->[0]); () <+fetch> [exception] ok 2327 - our $x; local $x; use strict; do_nothing($x->[0]); () <+fetch> [return] ok 2328 - our $x; local $x; use strict; do_nothing($x->[0]); () <+fetch> [variable] ok 2329 - our $x; local $x; no strict; do_nothing($x->[0]); () <+fetch> [exception] ok 2330 - our $x; local $x; no strict; do_nothing($x->[0]); () <+fetch> [return] ok 2331 - our $x; local $x; no strict; do_nothing($x->[0]); () <+fetch> [variable] ok 2332 - my $x; do_nothing($$x[0]); () <+fetch> [exception] ok 2333 - my $x; do_nothing($$x[0]); () <+fetch> [return] ok 2334 - my $x; do_nothing($$x[0]); () <+fetch> [variable] ok 2335 - our $x; local $x; use strict; do_nothing($$x[0]); () <+fetch> [exception] ok 2336 - our $x; local $x; use strict; do_nothing($$x[0]); () <+fetch> [return] ok 2337 - our $x; local $x; use strict; do_nothing($$x[0]); () <+fetch> [variable] ok 2338 - our $x; local $x; no strict; do_nothing($$x[0]); () <+fetch> [exception] ok 2339 - our $x; local $x; no strict; do_nothing($$x[0]); () <+fetch> [return] ok 2340 - our $x; local $x; no strict; do_nothing($$x[0]); () <+fetch> [variable] ok 2341 - my @x; do_nothing($x[0]); () <+fetch> [exception] ok 2342 - my @x; do_nothing($x[0]); () <+fetch> [return] ok 2343 - my @x; do_nothing($x[0]); () <+fetch> [variable] ok 2344 - our @x; local @x; use strict; do_nothing($x[0]); () <+fetch> [exception] ok 2345 - our @x; local @x; use strict; do_nothing($x[0]); () <+fetch> [return] ok 2346 - our @x; local @x; use strict; do_nothing($x[0]); () <+fetch> [variable] ok 2347 - our @x; local @x; no strict; do_nothing($x[0]); () <+fetch> [exception] ok 2348 - our @x; local @x; no strict; do_nothing($x[0]); () <+fetch> [return] ok 2349 - our @x; local @x; no strict; do_nothing($x[0]); () <+fetch> [variable] ok 2350 - my $x; do_nothing($x->[0]); () <+exists> [exception] ok 2351 - my $x; do_nothing($x->[0]); () <+exists> [return] ok 2352 - my $x; do_nothing($x->[0]); () <+exists> [variable] ok 2353 - our $x; local $x; use strict; do_nothing($x->[0]); () <+exists> [exception] ok 2354 - our $x; local $x; use strict; do_nothing($x->[0]); () <+exists> [return] ok 2355 - our $x; local $x; use strict; do_nothing($x->[0]); () <+exists> [variable] ok 2356 - our $x; local $x; no strict; do_nothing($x->[0]); () <+exists> [exception] ok 2357 - our $x; local $x; no strict; do_nothing($x->[0]); () <+exists> [return] ok 2358 - our $x; local $x; no strict; do_nothing($x->[0]); () <+exists> [variable] ok 2359 - my $x; do_nothing($$x[0]); () <+exists> [exception] ok 2360 - my $x; do_nothing($$x[0]); () <+exists> [return] ok 2361 - my $x; do_nothing($$x[0]); () <+exists> [variable] ok 2362 - our $x; local $x; use strict; do_nothing($$x[0]); () <+exists> [exception] ok 2363 - our $x; local $x; use strict; do_nothing($$x[0]); () <+exists> [return] ok 2364 - our $x; local $x; use strict; do_nothing($$x[0]); () <+exists> [variable] ok 2365 - our $x; local $x; no strict; do_nothing($$x[0]); () <+exists> [exception] ok 2366 - our $x; local $x; no strict; do_nothing($$x[0]); () <+exists> [return] ok 2367 - our $x; local $x; no strict; do_nothing($$x[0]); () <+exists> [variable] ok 2368 - my @x; do_nothing($x[0]); () <+exists> [exception] ok 2369 - my @x; do_nothing($x[0]); () <+exists> [return] ok 2370 - my @x; do_nothing($x[0]); () <+exists> [variable] ok 2371 - our @x; local @x; use strict; do_nothing($x[0]); () <+exists> [exception] ok 2372 - our @x; local @x; use strict; do_nothing($x[0]); () <+exists> [return] ok 2373 - our @x; local @x; use strict; do_nothing($x[0]); () <+exists> [variable] ok 2374 - our @x; local @x; no strict; do_nothing($x[0]); () <+exists> [exception] ok 2375 - our @x; local @x; no strict; do_nothing($x[0]); () <+exists> [return] ok 2376 - our @x; local @x; no strict; do_nothing($x[0]); () <+exists> [variable] ok 2377 - my $x; do_nothing($x->[0]); () <+delete> [exception] ok 2378 - my $x; do_nothing($x->[0]); () <+delete> [return] ok 2379 - my $x; do_nothing($x->[0]); () <+delete> [variable] ok 2380 - our $x; local $x; use strict; do_nothing($x->[0]); () <+delete> [exception] ok 2381 - our $x; local $x; use strict; do_nothing($x->[0]); () <+delete> [return] ok 2382 - our $x; local $x; use strict; do_nothing($x->[0]); () <+delete> [variable] ok 2383 - our $x; local $x; no strict; do_nothing($x->[0]); () <+delete> [exception] ok 2384 - our $x; local $x; no strict; do_nothing($x->[0]); () <+delete> [return] ok 2385 - our $x; local $x; no strict; do_nothing($x->[0]); () <+delete> [variable] ok 2386 - my $x; do_nothing($$x[0]); () <+delete> [exception] ok 2387 - my $x; do_nothing($$x[0]); () <+delete> [return] ok 2388 - my $x; do_nothing($$x[0]); () <+delete> [variable] ok 2389 - our $x; local $x; use strict; do_nothing($$x[0]); () <+delete> [exception] ok 2390 - our $x; local $x; use strict; do_nothing($$x[0]); () <+delete> [return] ok 2391 - our $x; local $x; use strict; do_nothing($$x[0]); () <+delete> [variable] ok 2392 - our $x; local $x; no strict; do_nothing($$x[0]); () <+delete> [exception] ok 2393 - our $x; local $x; no strict; do_nothing($$x[0]); () <+delete> [return] ok 2394 - our $x; local $x; no strict; do_nothing($$x[0]); () <+delete> [variable] ok 2395 - my @x; do_nothing($x[0]); () <+delete> [exception] ok 2396 - my @x; do_nothing($x[0]); () <+delete> [return] ok 2397 - my @x; do_nothing($x[0]); () <+delete> [variable] ok 2398 - our @x; local @x; use strict; do_nothing($x[0]); () <+delete> [exception] ok 2399 - our @x; local @x; use strict; do_nothing($x[0]); () <+delete> [return] ok 2400 - our @x; local @x; use strict; do_nothing($x[0]); () <+delete> [variable] ok 2401 - our @x; local @x; no strict; do_nothing($x[0]); () <+delete> [exception] ok 2402 - our @x; local @x; no strict; do_nothing($x[0]); () <+delete> [return] ok 2403 - our @x; local @x; no strict; do_nothing($x[0]); () <+delete> [variable] ok 2404 - my $x; do_nothing($x->[0]); () <+store> [exception] ok 2405 - my $x; do_nothing($x->[0]); () <+store> [return] ok 2406 - my $x; do_nothing($x->[0]); () <+store> [variable] ok 2407 - our $x; local $x; use strict; do_nothing($x->[0]); () <+store> [exception] ok 2408 - our $x; local $x; use strict; do_nothing($x->[0]); () <+store> [return] ok 2409 - our $x; local $x; use strict; do_nothing($x->[0]); () <+store> [variable] ok 2410 - our $x; local $x; no strict; do_nothing($x->[0]); () <+store> [exception] ok 2411 - our $x; local $x; no strict; do_nothing($x->[0]); () <+store> [return] ok 2412 - our $x; local $x; no strict; do_nothing($x->[0]); () <+store> [variable] ok 2413 - my $x; do_nothing($$x[0]); () <+store> [exception] ok 2414 - my $x; do_nothing($$x[0]); () <+store> [return] ok 2415 - my $x; do_nothing($$x[0]); () <+store> [variable] ok 2416 - our $x; local $x; use strict; do_nothing($$x[0]); () <+store> [exception] ok 2417 - our $x; local $x; use strict; do_nothing($$x[0]); () <+store> [return] ok 2418 - our $x; local $x; use strict; do_nothing($$x[0]); () <+store> [variable] ok 2419 - our $x; local $x; no strict; do_nothing($$x[0]); () <+store> [exception] ok 2420 - our $x; local $x; no strict; do_nothing($$x[0]); () <+store> [return] ok 2421 - our $x; local $x; no strict; do_nothing($$x[0]); () <+store> [variable] ok 2422 - my @x; 1 <+store> [exception] ok 2423 - my @x; 1 <+store> [return] ok 2424 - my @x; 1 <+store> [variable] ok 2425 - our @x; local @x; use strict; 1 <+store> [exception] ok 2426 - our @x; local @x; use strict; 1 <+store> [return] ok 2427 - our @x; local @x; use strict; 1 <+store> [variable] ok 2428 - our @x; local @x; no strict; 1 <+store> [exception] ok 2429 - our @x; local @x; no strict; 1 <+store> [return] ok 2430 - our @x; local @x; no strict; 1 <+store> [variable] ok 2431 - my $x; set_arg($x->[0]); () [exception] ok 2432 - my $x; set_arg($x->[0]); () [return] ok 2433 - my $x; set_arg($x->[0]); () [variable] ok 2434 - our $x; local $x; use strict; set_arg($x->[0]); () [exception] ok 2435 - our $x; local $x; use strict; set_arg($x->[0]); () [return] ok 2436 - our $x; local $x; use strict; set_arg($x->[0]); () [variable] ok 2437 - our $x; local $x; no strict; set_arg($x->[0]); () [exception] ok 2438 - our $x; local $x; no strict; set_arg($x->[0]); () [return] ok 2439 - our $x; local $x; no strict; set_arg($x->[0]); () [variable] ok 2440 - my $x; set_arg($$x[0]); () [exception] ok 2441 - my $x; set_arg($$x[0]); () [return] ok 2442 - my $x; set_arg($$x[0]); () [variable] ok 2443 - our $x; local $x; use strict; set_arg($$x[0]); () [exception] ok 2444 - our $x; local $x; use strict; set_arg($$x[0]); () [return] ok 2445 - our $x; local $x; use strict; set_arg($$x[0]); () [variable] ok 2446 - our $x; local $x; no strict; set_arg($$x[0]); () [exception] ok 2447 - our $x; local $x; no strict; set_arg($$x[0]); () [return] ok 2448 - our $x; local $x; no strict; set_arg($$x[0]); () [variable] ok 2449 - my @x; set_arg($x[0]); () [exception] ok 2450 - my @x; set_arg($x[0]); () [return] ok 2451 - my @x; set_arg($x[0]); () [variable] ok 2452 - our @x; local @x; use strict; set_arg($x[0]); () [exception] ok 2453 - our @x; local @x; use strict; set_arg($x[0]); () [return] ok 2454 - our @x; local @x; use strict; set_arg($x[0]); () [variable] ok 2455 - our @x; local @x; no strict; set_arg($x[0]); () [exception] ok 2456 - our @x; local @x; no strict; set_arg($x[0]); () [return] ok 2457 - our @x; local @x; no strict; set_arg($x[0]); () [variable] ok 2458 - my $x; set_arg($x->[0]); () [exception] ok 2459 - my $x; set_arg($x->[0]); () [return] ok 2460 - my $x; set_arg($x->[0]); () [variable] ok 2461 - our $x; local $x; use strict; set_arg($x->[0]); () [exception] ok 2462 - our $x; local $x; use strict; set_arg($x->[0]); () [return] ok 2463 - our $x; local $x; use strict; set_arg($x->[0]); () [variable] ok 2464 - our $x; local $x; no strict; set_arg($x->[0]); () [exception] ok 2465 - our $x; local $x; no strict; set_arg($x->[0]); () [return] ok 2466 - our $x; local $x; no strict; set_arg($x->[0]); () [variable] ok 2467 - my $x; set_arg($$x[0]); () [exception] ok 2468 - my $x; set_arg($$x[0]); () [return] ok 2469 - my $x; set_arg($$x[0]); () [variable] ok 2470 - our $x; local $x; use strict; set_arg($$x[0]); () [exception] ok 2471 - our $x; local $x; use strict; set_arg($$x[0]); () [return] ok 2472 - our $x; local $x; use strict; set_arg($$x[0]); () [variable] ok 2473 - our $x; local $x; no strict; set_arg($$x[0]); () [exception] ok 2474 - our $x; local $x; no strict; set_arg($$x[0]); () [return] ok 2475 - our $x; local $x; no strict; set_arg($$x[0]); () [variable] ok 2476 - my @x; set_arg($x[0]); () [exception] ok 2477 - my @x; set_arg($x[0]); () [return] ok 2478 - my @x; set_arg($x[0]); () [variable] ok 2479 - our @x; local @x; use strict; set_arg($x[0]); () [exception] ok 2480 - our @x; local @x; use strict; set_arg($x[0]); () [return] ok 2481 - our @x; local @x; use strict; set_arg($x[0]); () [variable] ok 2482 - our @x; local @x; no strict; set_arg($x[0]); () [exception] ok 2483 - our @x; local @x; no strict; set_arg($x[0]); () [return] ok 2484 - our @x; local @x; no strict; set_arg($x[0]); () [variable] ok 2485 - my $x; set_arg($x->[0]); () <+fetch> [exception] ok 2486 - my $x; set_arg($x->[0]); () <+fetch> [return] ok 2487 - my $x; set_arg($x->[0]); () <+fetch> [variable] ok 2488 - our $x; local $x; use strict; set_arg($x->[0]); () <+fetch> [exception] ok 2489 - our $x; local $x; use strict; set_arg($x->[0]); () <+fetch> [return] ok 2490 - our $x; local $x; use strict; set_arg($x->[0]); () <+fetch> [variable] ok 2491 - our $x; local $x; no strict; set_arg($x->[0]); () <+fetch> [exception] ok 2492 - our $x; local $x; no strict; set_arg($x->[0]); () <+fetch> [return] ok 2493 - our $x; local $x; no strict; set_arg($x->[0]); () <+fetch> [variable] ok 2494 - my $x; set_arg($$x[0]); () <+fetch> [exception] ok 2495 - my $x; set_arg($$x[0]); () <+fetch> [return] ok 2496 - my $x; set_arg($$x[0]); () <+fetch> [variable] ok 2497 - our $x; local $x; use strict; set_arg($$x[0]); () <+fetch> [exception] ok 2498 - our $x; local $x; use strict; set_arg($$x[0]); () <+fetch> [return] ok 2499 - our $x; local $x; use strict; set_arg($$x[0]); () <+fetch> [variable] ok 2500 - our $x; local $x; no strict; set_arg($$x[0]); () <+fetch> [exception] ok 2501 - our $x; local $x; no strict; set_arg($$x[0]); () <+fetch> [return] ok 2502 - our $x; local $x; no strict; set_arg($$x[0]); () <+fetch> [variable] ok 2503 - my @x; set_arg($x[0]); () <+fetch> [exception] ok 2504 - my @x; set_arg($x[0]); () <+fetch> [return] ok 2505 - my @x; set_arg($x[0]); () <+fetch> [variable] ok 2506 - our @x; local @x; use strict; set_arg($x[0]); () <+fetch> [exception] ok 2507 - our @x; local @x; use strict; set_arg($x[0]); () <+fetch> [return] ok 2508 - our @x; local @x; use strict; set_arg($x[0]); () <+fetch> [variable] ok 2509 - our @x; local @x; no strict; set_arg($x[0]); () <+fetch> [exception] ok 2510 - our @x; local @x; no strict; set_arg($x[0]); () <+fetch> [return] ok 2511 - our @x; local @x; no strict; set_arg($x[0]); () <+fetch> [variable] ok 2512 - my $x; set_arg($x->[0]); () <+exists> [exception] ok 2513 - my $x; set_arg($x->[0]); () <+exists> [return] ok 2514 - my $x; set_arg($x->[0]); () <+exists> [variable] ok 2515 - our $x; local $x; use strict; set_arg($x->[0]); () <+exists> [exception] ok 2516 - our $x; local $x; use strict; set_arg($x->[0]); () <+exists> [return] ok 2517 - our $x; local $x; use strict; set_arg($x->[0]); () <+exists> [variable] ok 2518 - our $x; local $x; no strict; set_arg($x->[0]); () <+exists> [exception] ok 2519 - our $x; local $x; no strict; set_arg($x->[0]); () <+exists> [return] ok 2520 - our $x; local $x; no strict; set_arg($x->[0]); () <+exists> [variable] ok 2521 - my $x; set_arg($$x[0]); () <+exists> [exception] ok 2522 - my $x; set_arg($$x[0]); () <+exists> [return] ok 2523 - my $x; set_arg($$x[0]); () <+exists> [variable] ok 2524 - our $x; local $x; use strict; set_arg($$x[0]); () <+exists> [exception] ok 2525 - our $x; local $x; use strict; set_arg($$x[0]); () <+exists> [return] ok 2526 - our $x; local $x; use strict; set_arg($$x[0]); () <+exists> [variable] ok 2527 - our $x; local $x; no strict; set_arg($$x[0]); () <+exists> [exception] ok 2528 - our $x; local $x; no strict; set_arg($$x[0]); () <+exists> [return] ok 2529 - our $x; local $x; no strict; set_arg($$x[0]); () <+exists> [variable] ok 2530 - my @x; set_arg($x[0]); () <+exists> [exception] ok 2531 - my @x; set_arg($x[0]); () <+exists> [return] ok 2532 - my @x; set_arg($x[0]); () <+exists> [variable] ok 2533 - our @x; local @x; use strict; set_arg($x[0]); () <+exists> [exception] ok 2534 - our @x; local @x; use strict; set_arg($x[0]); () <+exists> [return] ok 2535 - our @x; local @x; use strict; set_arg($x[0]); () <+exists> [variable] ok 2536 - our @x; local @x; no strict; set_arg($x[0]); () <+exists> [exception] ok 2537 - our @x; local @x; no strict; set_arg($x[0]); () <+exists> [return] ok 2538 - our @x; local @x; no strict; set_arg($x[0]); () <+exists> [variable] ok 2539 - my $x; set_arg($x->[0]); () <+delete> [exception] ok 2540 - my $x; set_arg($x->[0]); () <+delete> [return] ok 2541 - my $x; set_arg($x->[0]); () <+delete> [variable] ok 2542 - our $x; local $x; use strict; set_arg($x->[0]); () <+delete> [exception] ok 2543 - our $x; local $x; use strict; set_arg($x->[0]); () <+delete> [return] ok 2544 - our $x; local $x; use strict; set_arg($x->[0]); () <+delete> [variable] ok 2545 - our $x; local $x; no strict; set_arg($x->[0]); () <+delete> [exception] ok 2546 - our $x; local $x; no strict; set_arg($x->[0]); () <+delete> [return] ok 2547 - our $x; local $x; no strict; set_arg($x->[0]); () <+delete> [variable] ok 2548 - my $x; set_arg($$x[0]); () <+delete> [exception] ok 2549 - my $x; set_arg($$x[0]); () <+delete> [return] ok 2550 - my $x; set_arg($$x[0]); () <+delete> [variable] ok 2551 - our $x; local $x; use strict; set_arg($$x[0]); () <+delete> [exception] ok 2552 - our $x; local $x; use strict; set_arg($$x[0]); () <+delete> [return] ok 2553 - our $x; local $x; use strict; set_arg($$x[0]); () <+delete> [variable] ok 2554 - our $x; local $x; no strict; set_arg($$x[0]); () <+delete> [exception] ok 2555 - our $x; local $x; no strict; set_arg($$x[0]); () <+delete> [return] ok 2556 - our $x; local $x; no strict; set_arg($$x[0]); () <+delete> [variable] ok 2557 - my @x; set_arg($x[0]); () <+delete> [exception] ok 2558 - my @x; set_arg($x[0]); () <+delete> [return] ok 2559 - my @x; set_arg($x[0]); () <+delete> [variable] ok 2560 - our @x; local @x; use strict; set_arg($x[0]); () <+delete> [exception] ok 2561 - our @x; local @x; use strict; set_arg($x[0]); () <+delete> [return] ok 2562 - our @x; local @x; use strict; set_arg($x[0]); () <+delete> [variable] ok 2563 - our @x; local @x; no strict; set_arg($x[0]); () <+delete> [exception] ok 2564 - our @x; local @x; no strict; set_arg($x[0]); () <+delete> [return] ok 2565 - our @x; local @x; no strict; set_arg($x[0]); () <+delete> [variable] ok 2566 - my $x; set_arg($x->[0]); () <+store> [exception] ok 2567 - my $x; set_arg($x->[0]); () <+store> [return] ok 2568 - my $x; set_arg($x->[0]); () <+store> [variable] ok 2569 - our $x; local $x; use strict; set_arg($x->[0]); () <+store> [exception] ok 2570 - our $x; local $x; use strict; set_arg($x->[0]); () <+store> [return] ok 2571 - our $x; local $x; use strict; set_arg($x->[0]); () <+store> [variable] ok 2572 - our $x; local $x; no strict; set_arg($x->[0]); () <+store> [exception] ok 2573 - our $x; local $x; no strict; set_arg($x->[0]); () <+store> [return] ok 2574 - our $x; local $x; no strict; set_arg($x->[0]); () <+store> [variable] ok 2575 - my $x; set_arg($$x[0]); () <+store> [exception] ok 2576 - my $x; set_arg($$x[0]); () <+store> [return] ok 2577 - my $x; set_arg($$x[0]); () <+store> [variable] ok 2578 - our $x; local $x; use strict; set_arg($$x[0]); () <+store> [exception] ok 2579 - our $x; local $x; use strict; set_arg($$x[0]); () <+store> [return] ok 2580 - our $x; local $x; use strict; set_arg($$x[0]); () <+store> [variable] ok 2581 - our $x; local $x; no strict; set_arg($$x[0]); () <+store> [exception] ok 2582 - our $x; local $x; no strict; set_arg($$x[0]); () <+store> [return] ok 2583 - our $x; local $x; no strict; set_arg($$x[0]); () <+store> [variable] ok 2584 - my @x; 1 <+store> [exception] ok 2585 - my @x; 1 <+store> [return] ok 2586 - my @x; 1 <+store> [variable] ok 2587 - our @x; local @x; use strict; 1 <+store> [exception] ok 2588 - our @x; local @x; use strict; 1 <+store> [return] ok 2589 - our @x; local @x; use strict; 1 <+store> [variable] ok 2590 - our @x; local @x; no strict; 1 <+store> [exception] ok 2591 - our @x; local @x; no strict; 1 <+store> [return] ok 2592 - our @x; local @x; no strict; 1 <+store> [variable] ok 2593 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2594 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2595 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2596 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2597 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2598 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2599 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2600 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2601 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2602 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2603 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2604 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2605 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2606 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2607 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2608 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2609 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2610 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2611 - my @x; 1 [exception] ok 2612 - my @x; 1 [return] ok 2613 - my @x; 1 [variable] ok 2614 - our @x; local @x; use strict; 1 [exception] ok 2615 - our @x; local @x; use strict; 1 [return] ok 2616 - our @x; local @x; use strict; 1 [variable] ok 2617 - our @x; local @x; no strict; 1 [exception] ok 2618 - our @x; local @x; no strict; 1 [return] ok 2619 - our @x; local @x; no strict; 1 [variable] ok 2620 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2621 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2622 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2623 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2624 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2625 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2626 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2627 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2628 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2629 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2630 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2631 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2632 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2633 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2634 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2635 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2636 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2637 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2638 - my @x; 1 [exception] ok 2639 - my @x; 1 [return] ok 2640 - my @x; 1 [variable] ok 2641 - our @x; local @x; use strict; 1 [exception] ok 2642 - our @x; local @x; use strict; 1 [return] ok 2643 - our @x; local @x; use strict; 1 [variable] ok 2644 - our @x; local @x; no strict; 1 [exception] ok 2645 - our @x; local @x; no strict; 1 [return] ok 2646 - our @x; local @x; no strict; 1 [variable] ok 2647 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2648 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2649 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2650 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2651 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2652 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2653 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2654 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2655 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2656 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2657 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2658 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2659 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2660 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2661 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2662 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2663 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2664 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2665 - my @x; 1 <+fetch> [exception] ok 2666 - my @x; 1 <+fetch> [return] ok 2667 - my @x; 1 <+fetch> [variable] ok 2668 - our @x; local @x; use strict; 1 <+fetch> [exception] ok 2669 - our @x; local @x; use strict; 1 <+fetch> [return] ok 2670 - our @x; local @x; use strict; 1 <+fetch> [variable] ok 2671 - our @x; local @x; no strict; 1 <+fetch> [exception] ok 2672 - our @x; local @x; no strict; 1 <+fetch> [return] ok 2673 - our @x; local @x; no strict; 1 <+fetch> [variable] ok 2674 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2675 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2676 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2677 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2678 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2679 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2680 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2681 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2682 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2683 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2684 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2685 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2686 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2687 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2688 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2689 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2690 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2691 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2692 - my @x; 1 <+exists> [exception] ok 2693 - my @x; 1 <+exists> [return] ok 2694 - my @x; 1 <+exists> [variable] ok 2695 - our @x; local @x; use strict; 1 <+exists> [exception] ok 2696 - our @x; local @x; use strict; 1 <+exists> [return] ok 2697 - our @x; local @x; use strict; 1 <+exists> [variable] ok 2698 - our @x; local @x; no strict; 1 <+exists> [exception] ok 2699 - our @x; local @x; no strict; 1 <+exists> [return] ok 2700 - our @x; local @x; no strict; 1 <+exists> [variable] ok 2701 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2702 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2703 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2704 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2705 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2706 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2707 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2708 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2709 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2710 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2711 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2712 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2713 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2714 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2715 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2716 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2717 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2718 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2719 - my @x; 1 <+delete> [exception] ok 2720 - my @x; 1 <+delete> [return] ok 2721 - my @x; 1 <+delete> [variable] ok 2722 - our @x; local @x; use strict; 1 <+delete> [exception] ok 2723 - our @x; local @x; use strict; 1 <+delete> [return] ok 2724 - our @x; local @x; use strict; 1 <+delete> [variable] ok 2725 - our @x; local @x; no strict; 1 <+delete> [exception] ok 2726 - our @x; local @x; no strict; 1 <+delete> [return] ok 2727 - our @x; local @x; no strict; 1 <+delete> [variable] ok 2728 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2729 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2730 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2731 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2732 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2733 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2734 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2735 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2736 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2737 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2738 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2739 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2740 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2741 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2742 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2743 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2744 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2745 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2746 - my @x; 1 <+store> [exception] ok 2747 - my @x; 1 <+store> [return] ok 2748 - my @x; 1 <+store> [variable] ok 2749 - our @x; local @x; use strict; 1 <+store> [exception] ok 2750 - our @x; local @x; use strict; 1 <+store> [return] ok 2751 - our @x; local @x; use strict; 1 <+store> [variable] ok 2752 - our @x; local @x; no strict; 1 <+store> [exception] ok 2753 - our @x; local @x; no strict; 1 <+store> [return] ok 2754 - our @x; local @x; no strict; 1 <+store> [variable] ok 2755 - my $x; $x->[0] = 1; my @a = @$x; () <+fetch> [exception] ok 2756 - my $x; $x->[0] = 1; my @a = @$x; () <+fetch> [return] ok 2757 - my $x; $x->[0] = 1; my @a = @$x; () <+fetch> [variable] ok 2758 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+fetch> [exception] ok 2759 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+fetch> [return] ok 2760 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+fetch> [variable] ok 2761 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+fetch> [exception] ok 2762 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+fetch> [return] ok 2763 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+fetch> [variable] ok 2764 - my $x; $x->[0] = 1; my @a = @$x; () <+fetch> [exception] ok 2765 - my $x; $x->[0] = 1; my @a = @$x; () <+fetch> [return] ok 2766 - my $x; $x->[0] = 1; my @a = @$x; () <+fetch> [variable] ok 2767 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+fetch> [exception] ok 2768 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+fetch> [return] ok 2769 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+fetch> [variable] ok 2770 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+fetch> [exception] ok 2771 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+fetch> [return] ok 2772 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+fetch> [variable] ok 2773 - my @x; $x[0] = 1; my @a = @x; () <+fetch> [exception] ok 2774 - my @x; $x[0] = 1; my @a = @x; () <+fetch> [return] ok 2775 - my @x; $x[0] = 1; my @a = @x; () <+fetch> [variable] ok 2776 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+fetch> [exception] ok 2777 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+fetch> [return] ok 2778 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+fetch> [variable] ok 2779 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+fetch> [exception] ok 2780 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+fetch> [return] ok 2781 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+fetch> [variable] ok 2782 - my $x; $x->[0] = 1; my @a = @$x; () <+exists> [exception] ok 2783 - my $x; $x->[0] = 1; my @a = @$x; () <+exists> [return] ok 2784 - my $x; $x->[0] = 1; my @a = @$x; () <+exists> [variable] ok 2785 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+exists> [exception] ok 2786 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+exists> [return] ok 2787 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+exists> [variable] ok 2788 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+exists> [exception] ok 2789 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+exists> [return] ok 2790 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+exists> [variable] ok 2791 - my $x; $x->[0] = 1; my @a = @$x; () <+exists> [exception] ok 2792 - my $x; $x->[0] = 1; my @a = @$x; () <+exists> [return] ok 2793 - my $x; $x->[0] = 1; my @a = @$x; () <+exists> [variable] ok 2794 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+exists> [exception] ok 2795 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+exists> [return] ok 2796 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+exists> [variable] ok 2797 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+exists> [exception] ok 2798 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+exists> [return] ok 2799 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+exists> [variable] ok 2800 - my @x; $x[0] = 1; my @a = @x; () <+exists> [exception] ok 2801 - my @x; $x[0] = 1; my @a = @x; () <+exists> [return] ok 2802 - my @x; $x[0] = 1; my @a = @x; () <+exists> [variable] ok 2803 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+exists> [exception] ok 2804 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+exists> [return] ok 2805 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+exists> [variable] ok 2806 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+exists> [exception] ok 2807 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+exists> [return] ok 2808 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+exists> [variable] ok 2809 - my $x; $x->[0] = 1; my @a = @$x; () <+delete> [exception] ok 2810 - my $x; $x->[0] = 1; my @a = @$x; () <+delete> [return] ok 2811 - my $x; $x->[0] = 1; my @a = @$x; () <+delete> [variable] ok 2812 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+delete> [exception] ok 2813 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+delete> [return] ok 2814 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+delete> [variable] ok 2815 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+delete> [exception] ok 2816 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+delete> [return] ok 2817 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+delete> [variable] ok 2818 - my $x; $x->[0] = 1; my @a = @$x; () <+delete> [exception] ok 2819 - my $x; $x->[0] = 1; my @a = @$x; () <+delete> [return] ok 2820 - my $x; $x->[0] = 1; my @a = @$x; () <+delete> [variable] ok 2821 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+delete> [exception] ok 2822 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+delete> [return] ok 2823 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+delete> [variable] ok 2824 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+delete> [exception] ok 2825 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+delete> [return] ok 2826 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+delete> [variable] ok 2827 - my @x; $x[0] = 1; my @a = @x; () <+delete> [exception] ok 2828 - my @x; $x[0] = 1; my @a = @x; () <+delete> [return] ok 2829 - my @x; $x[0] = 1; my @a = @x; () <+delete> [variable] ok 2830 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+delete> [exception] ok 2831 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+delete> [return] ok 2832 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+delete> [variable] ok 2833 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+delete> [exception] ok 2834 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+delete> [return] ok 2835 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+delete> [variable] ok 2836 - my $x; $x->[0] = 1; my @a = @$x; () <+store> [exception] ok 2837 - my $x; $x->[0] = 1; my @a = @$x; () <+store> [return] ok 2838 - my $x; $x->[0] = 1; my @a = @$x; () <+store> [variable] ok 2839 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+store> [exception] ok 2840 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+store> [return] ok 2841 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+store> [variable] ok 2842 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+store> [exception] ok 2843 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+store> [return] ok 2844 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+store> [variable] ok 2845 - my $x; $x->[0] = 1; my @a = @$x; () <+store> [exception] ok 2846 - my $x; $x->[0] = 1; my @a = @$x; () <+store> [return] ok 2847 - my $x; $x->[0] = 1; my @a = @$x; () <+store> [variable] ok 2848 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+store> [exception] ok 2849 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+store> [return] ok 2850 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+store> [variable] ok 2851 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+store> [exception] ok 2852 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+store> [return] ok 2853 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+store> [variable] ok 2854 - my @x; $x[0] = 1; my @a = @x; () <+store> [exception] ok 2855 - my @x; $x[0] = 1; my @a = @x; () <+store> [return] ok 2856 - my @x; $x[0] = 1; my @a = @x; () <+store> [variable] ok 2857 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+store> [exception] ok 2858 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+store> [return] ok 2859 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+store> [variable] ok 2860 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+store> [exception] ok 2861 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+store> [return] ok 2862 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+store> [variable] ok 2863 - my $x; my @a = @$x[0, 1]; \@a [exception] ok 2864 - my $x; my @a = @$x[0, 1]; \@a [return] ok 2865 - my $x; my @a = @$x[0, 1]; \@a [variable] ok 2866 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [exception] ok 2867 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [return] ok 2868 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [variable] ok 2869 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [exception] ok 2870 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [return] ok 2871 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [variable] ok 2872 - my $x; my @a = @$x[0, 1]; \@a [exception] ok 2873 - my $x; my @a = @$x[0, 1]; \@a [return] ok 2874 - my $x; my @a = @$x[0, 1]; \@a [variable] ok 2875 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [exception] ok 2876 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [return] ok 2877 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [variable] ok 2878 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [exception] ok 2879 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [return] ok 2880 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [variable] ok 2881 - my @x; my @a = @x[0, 1]; \@a [exception] ok 2882 - my @x; my @a = @x[0, 1]; \@a [return] ok 2883 - my @x; my @a = @x[0, 1]; \@a [variable] ok 2884 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a [exception] ok 2885 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a [return] ok 2886 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a [variable] ok 2887 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a [exception] ok 2888 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a [return] ok 2889 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a [variable] ok 2890 - my $x; my @a = @$x[0, 1]; \@a [exception] ok 2891 - my $x; my @a = @$x[0, 1]; \@a [return] ok 2892 - my $x; my @a = @$x[0, 1]; \@a [variable] ok 2893 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [exception] ok 2894 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [return] ok 2895 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [variable] ok 2896 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [exception] ok 2897 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [return] ok 2898 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [variable] ok 2899 - my $x; my @a = @$x[0, 1]; \@a [exception] ok 2900 - my $x; my @a = @$x[0, 1]; \@a [return] ok 2901 - my $x; my @a = @$x[0, 1]; \@a [variable] ok 2902 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [exception] ok 2903 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [return] ok 2904 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [variable] ok 2905 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [exception] ok 2906 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [return] ok 2907 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [variable] ok 2908 - my @x; my @a = @x[0, 1]; \@a [exception] ok 2909 - my @x; my @a = @x[0, 1]; \@a [return] ok 2910 - my @x; my @a = @x[0, 1]; \@a [variable] ok 2911 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a [exception] ok 2912 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a [return] ok 2913 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a [variable] ok 2914 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a [exception] ok 2915 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a [return] ok 2916 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a [variable] ok 2917 - my $x; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 2918 - my $x; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 2919 - my $x; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 2920 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 2921 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 2922 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 2923 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 2924 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 2925 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 2926 - my $x; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 2927 - my $x; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 2928 - my $x; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 2929 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 2930 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 2931 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 2932 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 2933 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 2934 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 2935 - my @x; my @a = @x[0, 1]; \@a <+fetch> [exception] ok 2936 - my @x; my @a = @x[0, 1]; \@a <+fetch> [return] ok 2937 - my @x; my @a = @x[0, 1]; \@a <+fetch> [variable] ok 2938 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+fetch> [exception] ok 2939 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+fetch> [return] ok 2940 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+fetch> [variable] ok 2941 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+fetch> [exception] ok 2942 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+fetch> [return] ok 2943 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+fetch> [variable] ok 2944 - my $x; my @a = @$x[0, 1]; \@a <+exists> [exception] ok 2945 - my $x; my @a = @$x[0, 1]; \@a <+exists> [return] ok 2946 - my $x; my @a = @$x[0, 1]; \@a <+exists> [variable] ok 2947 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+exists> [exception] ok 2948 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+exists> [return] ok 2949 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+exists> [variable] ok 2950 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+exists> [exception] ok 2951 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+exists> [return] ok 2952 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+exists> [variable] ok 2953 - my $x; my @a = @$x[0, 1]; \@a <+exists> [exception] ok 2954 - my $x; my @a = @$x[0, 1]; \@a <+exists> [return] ok 2955 - my $x; my @a = @$x[0, 1]; \@a <+exists> [variable] ok 2956 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+exists> [exception] ok 2957 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+exists> [return] ok 2958 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+exists> [variable] ok 2959 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+exists> [exception] ok 2960 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+exists> [return] ok 2961 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+exists> [variable] ok 2962 - my @x; my @a = @x[0, 1]; \@a <+exists> [exception] ok 2963 - my @x; my @a = @x[0, 1]; \@a <+exists> [return] ok 2964 - my @x; my @a = @x[0, 1]; \@a <+exists> [variable] ok 2965 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+exists> [exception] ok 2966 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+exists> [return] ok 2967 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+exists> [variable] ok 2968 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+exists> [exception] ok 2969 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+exists> [return] ok 2970 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+exists> [variable] ok 2971 - my $x; my @a = @$x[0, 1]; \@a <+delete> [exception] ok 2972 - my $x; my @a = @$x[0, 1]; \@a <+delete> [return] ok 2973 - my $x; my @a = @$x[0, 1]; \@a <+delete> [variable] ok 2974 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+delete> [exception] ok 2975 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+delete> [return] ok 2976 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+delete> [variable] ok 2977 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+delete> [exception] ok 2978 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+delete> [return] ok 2979 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+delete> [variable] ok 2980 - my $x; my @a = @$x[0, 1]; \@a <+delete> [exception] ok 2981 - my $x; my @a = @$x[0, 1]; \@a <+delete> [return] ok 2982 - my $x; my @a = @$x[0, 1]; \@a <+delete> [variable] ok 2983 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+delete> [exception] ok 2984 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+delete> [return] ok 2985 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+delete> [variable] ok 2986 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+delete> [exception] ok 2987 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+delete> [return] ok 2988 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+delete> [variable] ok 2989 - my @x; my @a = @x[0, 1]; \@a <+delete> [exception] ok 2990 - my @x; my @a = @x[0, 1]; \@a <+delete> [return] ok 2991 - my @x; my @a = @x[0, 1]; \@a <+delete> [variable] ok 2992 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+delete> [exception] ok 2993 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+delete> [return] ok 2994 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+delete> [variable] ok 2995 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+delete> [exception] ok 2996 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+delete> [return] ok 2997 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+delete> [variable] ok 2998 - my $x; my @a = @$x[0, 1]; \@a <+store> [exception] ok 2999 - my $x; my @a = @$x[0, 1]; \@a <+store> [return] ok 3000 - my $x; my @a = @$x[0, 1]; \@a <+store> [variable] ok 3001 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+store> [exception] ok 3002 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+store> [return] ok 3003 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+store> [variable] ok 3004 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+store> [exception] ok 3005 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+store> [return] ok 3006 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+store> [variable] ok 3007 - my $x; my @a = @$x[0, 1]; \@a <+store> [exception] ok 3008 - my $x; my @a = @$x[0, 1]; \@a <+store> [return] ok 3009 - my $x; my @a = @$x[0, 1]; \@a <+store> [variable] ok 3010 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+store> [exception] ok 3011 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+store> [return] ok 3012 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+store> [variable] ok 3013 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+store> [exception] ok 3014 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+store> [return] ok 3015 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+store> [variable] ok 3016 - my @x; my @a = @x[0, 1]; \@a <+store> [exception] ok 3017 - my @x; my @a = @x[0, 1]; \@a <+store> [return] ok 3018 - my @x; my @a = @x[0, 1]; \@a <+store> [variable] ok 3019 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+store> [exception] ok 3020 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+store> [return] ok 3021 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+store> [variable] ok 3022 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+store> [exception] ok 3023 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+store> [return] ok 3024 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+store> [variable] ok 3025 - my $x; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 3026 - my $x; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 3027 - my $x; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 3028 - our $x; local $x; use strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 3029 - our $x; local $x; use strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 3030 - our $x; local $x; use strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 3031 - our $x; local $x; no strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 3032 - our $x; local $x; no strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 3033 - our $x; local $x; no strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 3034 - my $x; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 3035 - my $x; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 3036 - my $x; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 3037 - our $x; local $x; use strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 3038 - our $x; local $x; use strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 3039 - our $x; local $x; use strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 3040 - our $x; local $x; no strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 3041 - our $x; local $x; no strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 3042 - our $x; local $x; no strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 3043 - my @x; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [exception] ok 3044 - my @x; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [return] ok 3045 - my @x; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [variable] ok 3046 - our @x; local @x; use strict; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [exception] ok 3047 - our @x; local @x; use strict; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [return] ok 3048 - our @x; local @x; use strict; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [variable] ok 3049 - our @x; local @x; no strict; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [exception] ok 3050 - our @x; local @x; no strict; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [return] ok 3051 - our @x; local @x; no strict; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [variable] ok 3052 - my $x; @$x[0, 1] = (1, 2); () [exception] ok 3053 - my $x; @$x[0, 1] = (1, 2); () [return] ok 3054 - my $x; @$x[0, 1] = (1, 2); () [variable] ok 3055 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [exception] ok 3056 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [return] ok 3057 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [variable] ok 3058 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [exception] ok 3059 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [return] ok 3060 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [variable] ok 3061 - my $x; @$x[0, 1] = (1, 2); () [exception] ok 3062 - my $x; @$x[0, 1] = (1, 2); () [return] ok 3063 - my $x; @$x[0, 1] = (1, 2); () [variable] ok 3064 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [exception] ok 3065 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [return] ok 3066 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [variable] ok 3067 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [exception] ok 3068 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [return] ok 3069 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [variable] ok 3070 - my @x; @x[0, 1] = (1, 2); () [exception] ok 3071 - my @x; @x[0, 1] = (1, 2); () [return] ok 3072 - my @x; @x[0, 1] = (1, 2); () [variable] ok 3073 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () [exception] ok 3074 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () [return] ok 3075 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () [variable] ok 3076 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () [exception] ok 3077 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () [return] ok 3078 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () [variable] ok 3079 - my $x; @$x[0, 1] = (1, 2); () [exception] ok 3080 - my $x; @$x[0, 1] = (1, 2); () [return] ok 3081 - my $x; @$x[0, 1] = (1, 2); () [variable] ok 3082 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [exception] ok 3083 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [return] ok 3084 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [variable] ok 3085 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [exception] ok 3086 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [return] ok 3087 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [variable] ok 3088 - my $x; @$x[0, 1] = (1, 2); () [exception] ok 3089 - my $x; @$x[0, 1] = (1, 2); () [return] ok 3090 - my $x; @$x[0, 1] = (1, 2); () [variable] ok 3091 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [exception] ok 3092 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [return] ok 3093 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [variable] ok 3094 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [exception] ok 3095 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [return] ok 3096 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [variable] ok 3097 - my @x; @x[0, 1] = (1, 2); () [exception] ok 3098 - my @x; @x[0, 1] = (1, 2); () [return] ok 3099 - my @x; @x[0, 1] = (1, 2); () [variable] ok 3100 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () [exception] ok 3101 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () [return] ok 3102 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () [variable] ok 3103 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () [exception] ok 3104 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () [return] ok 3105 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () [variable] ok 3106 - my $x; @$x[0, 1] = (1, 2); () <+fetch> [exception] ok 3107 - my $x; @$x[0, 1] = (1, 2); () <+fetch> [return] ok 3108 - my $x; @$x[0, 1] = (1, 2); () <+fetch> [variable] ok 3109 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+fetch> [exception] ok 3110 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+fetch> [return] ok 3111 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+fetch> [variable] ok 3112 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+fetch> [exception] ok 3113 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+fetch> [return] ok 3114 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+fetch> [variable] ok 3115 - my $x; @$x[0, 1] = (1, 2); () <+fetch> [exception] ok 3116 - my $x; @$x[0, 1] = (1, 2); () <+fetch> [return] ok 3117 - my $x; @$x[0, 1] = (1, 2); () <+fetch> [variable] ok 3118 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+fetch> [exception] ok 3119 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+fetch> [return] ok 3120 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+fetch> [variable] ok 3121 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+fetch> [exception] ok 3122 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+fetch> [return] ok 3123 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+fetch> [variable] ok 3124 - my @x; @x[0, 1] = (1, 2); () <+fetch> [exception] ok 3125 - my @x; @x[0, 1] = (1, 2); () <+fetch> [return] ok 3126 - my @x; @x[0, 1] = (1, 2); () <+fetch> [variable] ok 3127 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+fetch> [exception] ok 3128 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+fetch> [return] ok 3129 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+fetch> [variable] ok 3130 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+fetch> [exception] ok 3131 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+fetch> [return] ok 3132 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+fetch> [variable] ok 3133 - my $x; @$x[0, 1] = (1, 2); () <+exists> [exception] ok 3134 - my $x; @$x[0, 1] = (1, 2); () <+exists> [return] ok 3135 - my $x; @$x[0, 1] = (1, 2); () <+exists> [variable] ok 3136 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+exists> [exception] ok 3137 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+exists> [return] ok 3138 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+exists> [variable] ok 3139 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+exists> [exception] ok 3140 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+exists> [return] ok 3141 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+exists> [variable] ok 3142 - my $x; @$x[0, 1] = (1, 2); () <+exists> [exception] ok 3143 - my $x; @$x[0, 1] = (1, 2); () <+exists> [return] ok 3144 - my $x; @$x[0, 1] = (1, 2); () <+exists> [variable] ok 3145 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+exists> [exception] ok 3146 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+exists> [return] ok 3147 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+exists> [variable] ok 3148 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+exists> [exception] ok 3149 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+exists> [return] ok 3150 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+exists> [variable] ok 3151 - my @x; @x[0, 1] = (1, 2); () <+exists> [exception] ok 3152 - my @x; @x[0, 1] = (1, 2); () <+exists> [return] ok 3153 - my @x; @x[0, 1] = (1, 2); () <+exists> [variable] ok 3154 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+exists> [exception] ok 3155 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+exists> [return] ok 3156 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+exists> [variable] ok 3157 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+exists> [exception] ok 3158 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+exists> [return] ok 3159 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+exists> [variable] ok 3160 - my $x; @$x[0, 1] = (1, 2); () <+delete> [exception] ok 3161 - my $x; @$x[0, 1] = (1, 2); () <+delete> [return] ok 3162 - my $x; @$x[0, 1] = (1, 2); () <+delete> [variable] ok 3163 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+delete> [exception] ok 3164 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+delete> [return] ok 3165 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+delete> [variable] ok 3166 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+delete> [exception] ok 3167 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+delete> [return] ok 3168 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+delete> [variable] ok 3169 - my $x; @$x[0, 1] = (1, 2); () <+delete> [exception] ok 3170 - my $x; @$x[0, 1] = (1, 2); () <+delete> [return] ok 3171 - my $x; @$x[0, 1] = (1, 2); () <+delete> [variable] ok 3172 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+delete> [exception] ok 3173 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+delete> [return] ok 3174 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+delete> [variable] ok 3175 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+delete> [exception] ok 3176 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+delete> [return] ok 3177 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+delete> [variable] ok 3178 - my @x; @x[0, 1] = (1, 2); () <+delete> [exception] ok 3179 - my @x; @x[0, 1] = (1, 2); () <+delete> [return] ok 3180 - my @x; @x[0, 1] = (1, 2); () <+delete> [variable] ok 3181 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+delete> [exception] ok 3182 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+delete> [return] ok 3183 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+delete> [variable] ok 3184 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+delete> [exception] ok 3185 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+delete> [return] ok 3186 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+delete> [variable] ok 3187 - my $x; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3188 - my $x; @$x[0, 1] = (1, 2); () <+store> [return] ok 3189 - my $x; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3190 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3191 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+store> [return] ok 3192 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3193 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3194 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+store> [return] ok 3195 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3196 - my $x; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3197 - my $x; @$x[0, 1] = (1, 2); () <+store> [return] ok 3198 - my $x; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3199 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3200 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+store> [return] ok 3201 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3202 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3203 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+store> [return] ok 3204 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3205 - my @x; 1 <+store> [exception] ok 3206 - my @x; 1 <+store> [return] ok 3207 - my @x; 1 <+store> [variable] ok 3208 - our @x; local @x; use strict; 1 <+store> [exception] ok 3209 - our @x; local @x; use strict; 1 <+store> [return] ok 3210 - our @x; local @x; use strict; 1 <+store> [variable] ok 3211 - our @x; local @x; no strict; 1 <+store> [exception] ok 3212 - our @x; local @x; no strict; 1 <+store> [return] ok 3213 - our @x; local @x; no strict; 1 <+store> [variable] ok 3214 - my $x; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3215 - my $x; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3216 - my $x; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3217 - our $x; local $x; use strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3218 - our $x; local $x; use strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3219 - our $x; local $x; use strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3220 - our $x; local $x; no strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3221 - our $x; local $x; no strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3222 - our $x; local $x; no strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3223 - my $x; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3224 - my $x; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3225 - my $x; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3226 - our $x; local $x; use strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3227 - our $x; local $x; use strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3228 - our $x; local $x; use strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3229 - our $x; local $x; no strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3230 - our $x; local $x; no strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3231 - our $x; local $x; no strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3232 - my @x; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3233 - my @x; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3234 - my @x; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3235 - our @x; local @x; use strict; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3236 - our @x; local @x; use strict; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3237 - our @x; local @x; use strict; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3238 - our @x; local @x; no strict; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3239 - our @x; local @x; no strict; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3240 - our @x; local @x; no strict; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3241 - my $x; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3242 - my $x; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3243 - my $x; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3244 - our $x; local $x; use strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3245 - our $x; local $x; use strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3246 - our $x; local $x; use strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3247 - our $x; local $x; no strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3248 - our $x; local $x; no strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3249 - our $x; local $x; no strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3250 - my $x; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3251 - my $x; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3252 - my $x; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3253 - our $x; local $x; use strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3254 - our $x; local $x; use strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3255 - our $x; local $x; use strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3256 - our $x; local $x; no strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3257 - our $x; local $x; no strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3258 - our $x; local $x; no strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3259 - my @x; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3260 - my @x; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3261 - my @x; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3262 - our @x; local @x; use strict; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3263 - our @x; local @x; use strict; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3264 - our @x; local @x; use strict; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3265 - our @x; local @x; no strict; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3266 - our @x; local @x; no strict; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3267 - our @x; local @x; no strict; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3268 - my $x; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3269 - my $x; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3270 - my $x; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3271 - our $x; local $x; use strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3272 - our $x; local $x; use strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3273 - our $x; local $x; use strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3274 - our $x; local $x; no strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3275 - our $x; local $x; no strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3276 - our $x; local $x; no strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3277 - my $x; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3278 - my $x; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3279 - my $x; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3280 - our $x; local $x; use strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3281 - our $x; local $x; use strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3282 - our $x; local $x; use strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3283 - our $x; local $x; no strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3284 - our $x; local $x; no strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3285 - our $x; local $x; no strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3286 - my @x; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3287 - my @x; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3288 - my @x; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3289 - our @x; local @x; use strict; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3290 - our @x; local @x; use strict; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3291 - our @x; local @x; use strict; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3292 - our @x; local @x; no strict; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3293 - our @x; local @x; no strict; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3294 - our @x; local @x; no strict; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3295 - my $x; exists $x->[0] [exception] ok 3296 - my $x; exists $x->[0] [return] ok 3297 - my $x; exists $x->[0] [variable] ok 3298 - our $x; local $x; use strict; exists $x->[0] [exception] ok 3299 - our $x; local $x; use strict; exists $x->[0] [return] ok 3300 - our $x; local $x; use strict; exists $x->[0] [variable] ok 3301 - our $x; local $x; no strict; exists $x->[0] [exception] ok 3302 - our $x; local $x; no strict; exists $x->[0] [return] ok 3303 - our $x; local $x; no strict; exists $x->[0] [variable] ok 3304 - my $x; exists $$x[0] [exception] ok 3305 - my $x; exists $$x[0] [return] ok 3306 - my $x; exists $$x[0] [variable] ok 3307 - our $x; local $x; use strict; exists $$x[0] [exception] ok 3308 - our $x; local $x; use strict; exists $$x[0] [return] ok 3309 - our $x; local $x; use strict; exists $$x[0] [variable] ok 3310 - our $x; local $x; no strict; exists $$x[0] [exception] ok 3311 - our $x; local $x; no strict; exists $$x[0] [return] ok 3312 - our $x; local $x; no strict; exists $$x[0] [variable] ok 3313 - my @x; exists $x[0] [exception] ok 3314 - my @x; exists $x[0] [return] ok 3315 - my @x; exists $x[0] [variable] ok 3316 - our @x; local @x; use strict; exists $x[0] [exception] ok 3317 - our @x; local @x; use strict; exists $x[0] [return] ok 3318 - our @x; local @x; use strict; exists $x[0] [variable] ok 3319 - our @x; local @x; no strict; exists $x[0] [exception] ok 3320 - our @x; local @x; no strict; exists $x[0] [return] ok 3321 - our @x; local @x; no strict; exists $x[0] [variable] ok 3322 - my $x; exists $x->[0] [exception] ok 3323 - my $x; exists $x->[0] [return] ok 3324 - my $x; exists $x->[0] [variable] ok 3325 - our $x; local $x; use strict; exists $x->[0] [exception] ok 3326 - our $x; local $x; use strict; exists $x->[0] [return] ok 3327 - our $x; local $x; use strict; exists $x->[0] [variable] ok 3328 - our $x; local $x; no strict; exists $x->[0] [exception] ok 3329 - our $x; local $x; no strict; exists $x->[0] [return] ok 3330 - our $x; local $x; no strict; exists $x->[0] [variable] ok 3331 - my $x; exists $$x[0] [exception] ok 3332 - my $x; exists $$x[0] [return] ok 3333 - my $x; exists $$x[0] [variable] ok 3334 - our $x; local $x; use strict; exists $$x[0] [exception] ok 3335 - our $x; local $x; use strict; exists $$x[0] [return] ok 3336 - our $x; local $x; use strict; exists $$x[0] [variable] ok 3337 - our $x; local $x; no strict; exists $$x[0] [exception] ok 3338 - our $x; local $x; no strict; exists $$x[0] [return] ok 3339 - our $x; local $x; no strict; exists $$x[0] [variable] ok 3340 - my @x; exists $x[0] [exception] ok 3341 - my @x; exists $x[0] [return] ok 3342 - my @x; exists $x[0] [variable] ok 3343 - our @x; local @x; use strict; exists $x[0] [exception] ok 3344 - our @x; local @x; use strict; exists $x[0] [return] ok 3345 - our @x; local @x; use strict; exists $x[0] [variable] ok 3346 - our @x; local @x; no strict; exists $x[0] [exception] ok 3347 - our @x; local @x; no strict; exists $x[0] [return] ok 3348 - our @x; local @x; no strict; exists $x[0] [variable] ok 3349 - my $x; exists $x->[0] <+fetch> [exception] ok 3350 - my $x; exists $x->[0] <+fetch> [return] ok 3351 - my $x; exists $x->[0] <+fetch> [variable] ok 3352 - our $x; local $x; use strict; exists $x->[0] <+fetch> [exception] ok 3353 - our $x; local $x; use strict; exists $x->[0] <+fetch> [return] ok 3354 - our $x; local $x; use strict; exists $x->[0] <+fetch> [variable] ok 3355 - our $x; local $x; no strict; exists $x->[0] <+fetch> [exception] ok 3356 - our $x; local $x; no strict; exists $x->[0] <+fetch> [return] ok 3357 - our $x; local $x; no strict; exists $x->[0] <+fetch> [variable] ok 3358 - my $x; exists $$x[0] <+fetch> [exception] ok 3359 - my $x; exists $$x[0] <+fetch> [return] ok 3360 - my $x; exists $$x[0] <+fetch> [variable] ok 3361 - our $x; local $x; use strict; exists $$x[0] <+fetch> [exception] ok 3362 - our $x; local $x; use strict; exists $$x[0] <+fetch> [return] ok 3363 - our $x; local $x; use strict; exists $$x[0] <+fetch> [variable] ok 3364 - our $x; local $x; no strict; exists $$x[0] <+fetch> [exception] ok 3365 - our $x; local $x; no strict; exists $$x[0] <+fetch> [return] ok 3366 - our $x; local $x; no strict; exists $$x[0] <+fetch> [variable] ok 3367 - my @x; exists $x[0] <+fetch> [exception] ok 3368 - my @x; exists $x[0] <+fetch> [return] ok 3369 - my @x; exists $x[0] <+fetch> [variable] ok 3370 - our @x; local @x; use strict; exists $x[0] <+fetch> [exception] ok 3371 - our @x; local @x; use strict; exists $x[0] <+fetch> [return] ok 3372 - our @x; local @x; use strict; exists $x[0] <+fetch> [variable] ok 3373 - our @x; local @x; no strict; exists $x[0] <+fetch> [exception] ok 3374 - our @x; local @x; no strict; exists $x[0] <+fetch> [return] ok 3375 - our @x; local @x; no strict; exists $x[0] <+fetch> [variable] ok 3376 - my $x; exists $x->[0] <+exists> [exception] ok 3377 - my $x; exists $x->[0] <+exists> [return] ok 3378 - my $x; exists $x->[0] <+exists> [variable] ok 3379 - our $x; local $x; use strict; exists $x->[0] <+exists> [exception] ok 3380 - our $x; local $x; use strict; exists $x->[0] <+exists> [return] ok 3381 - our $x; local $x; use strict; exists $x->[0] <+exists> [variable] ok 3382 - our $x; local $x; no strict; exists $x->[0] <+exists> [exception] ok 3383 - our $x; local $x; no strict; exists $x->[0] <+exists> [return] ok 3384 - our $x; local $x; no strict; exists $x->[0] <+exists> [variable] ok 3385 - my $x; exists $$x[0] <+exists> [exception] ok 3386 - my $x; exists $$x[0] <+exists> [return] ok 3387 - my $x; exists $$x[0] <+exists> [variable] ok 3388 - our $x; local $x; use strict; exists $$x[0] <+exists> [exception] ok 3389 - our $x; local $x; use strict; exists $$x[0] <+exists> [return] ok 3390 - our $x; local $x; use strict; exists $$x[0] <+exists> [variable] ok 3391 - our $x; local $x; no strict; exists $$x[0] <+exists> [exception] ok 3392 - our $x; local $x; no strict; exists $$x[0] <+exists> [return] ok 3393 - our $x; local $x; no strict; exists $$x[0] <+exists> [variable] ok 3394 - my @x; exists $x[0] <+exists> [exception] ok 3395 - my @x; exists $x[0] <+exists> [return] ok 3396 - my @x; exists $x[0] <+exists> [variable] ok 3397 - our @x; local @x; use strict; exists $x[0] <+exists> [exception] ok 3398 - our @x; local @x; use strict; exists $x[0] <+exists> [return] ok 3399 - our @x; local @x; use strict; exists $x[0] <+exists> [variable] ok 3400 - our @x; local @x; no strict; exists $x[0] <+exists> [exception] ok 3401 - our @x; local @x; no strict; exists $x[0] <+exists> [return] ok 3402 - our @x; local @x; no strict; exists $x[0] <+exists> [variable] ok 3403 - my $x; exists $x->[0] <+delete> [exception] ok 3404 - my $x; exists $x->[0] <+delete> [return] ok 3405 - my $x; exists $x->[0] <+delete> [variable] ok 3406 - our $x; local $x; use strict; exists $x->[0] <+delete> [exception] ok 3407 - our $x; local $x; use strict; exists $x->[0] <+delete> [return] ok 3408 - our $x; local $x; use strict; exists $x->[0] <+delete> [variable] ok 3409 - our $x; local $x; no strict; exists $x->[0] <+delete> [exception] ok 3410 - our $x; local $x; no strict; exists $x->[0] <+delete> [return] ok 3411 - our $x; local $x; no strict; exists $x->[0] <+delete> [variable] ok 3412 - my $x; exists $$x[0] <+delete> [exception] ok 3413 - my $x; exists $$x[0] <+delete> [return] ok 3414 - my $x; exists $$x[0] <+delete> [variable] ok 3415 - our $x; local $x; use strict; exists $$x[0] <+delete> [exception] ok 3416 - our $x; local $x; use strict; exists $$x[0] <+delete> [return] ok 3417 - our $x; local $x; use strict; exists $$x[0] <+delete> [variable] ok 3418 - our $x; local $x; no strict; exists $$x[0] <+delete> [exception] ok 3419 - our $x; local $x; no strict; exists $$x[0] <+delete> [return] ok 3420 - our $x; local $x; no strict; exists $$x[0] <+delete> [variable] ok 3421 - my @x; exists $x[0] <+delete> [exception] ok 3422 - my @x; exists $x[0] <+delete> [return] ok 3423 - my @x; exists $x[0] <+delete> [variable] ok 3424 - our @x; local @x; use strict; exists $x[0] <+delete> [exception] ok 3425 - our @x; local @x; use strict; exists $x[0] <+delete> [return] ok 3426 - our @x; local @x; use strict; exists $x[0] <+delete> [variable] ok 3427 - our @x; local @x; no strict; exists $x[0] <+delete> [exception] ok 3428 - our @x; local @x; no strict; exists $x[0] <+delete> [return] ok 3429 - our @x; local @x; no strict; exists $x[0] <+delete> [variable] ok 3430 - my $x; exists $x->[0] <+store> [exception] ok 3431 - my $x; exists $x->[0] <+store> [return] ok 3432 - my $x; exists $x->[0] <+store> [variable] ok 3433 - our $x; local $x; use strict; exists $x->[0] <+store> [exception] ok 3434 - our $x; local $x; use strict; exists $x->[0] <+store> [return] ok 3435 - our $x; local $x; use strict; exists $x->[0] <+store> [variable] ok 3436 - our $x; local $x; no strict; exists $x->[0] <+store> [exception] ok 3437 - our $x; local $x; no strict; exists $x->[0] <+store> [return] ok 3438 - our $x; local $x; no strict; exists $x->[0] <+store> [variable] ok 3439 - my $x; exists $$x[0] <+store> [exception] ok 3440 - my $x; exists $$x[0] <+store> [return] ok 3441 - my $x; exists $$x[0] <+store> [variable] ok 3442 - our $x; local $x; use strict; exists $$x[0] <+store> [exception] ok 3443 - our $x; local $x; use strict; exists $$x[0] <+store> [return] ok 3444 - our $x; local $x; use strict; exists $$x[0] <+store> [variable] ok 3445 - our $x; local $x; no strict; exists $$x[0] <+store> [exception] ok 3446 - our $x; local $x; no strict; exists $$x[0] <+store> [return] ok 3447 - our $x; local $x; no strict; exists $$x[0] <+store> [variable] ok 3448 - my @x; exists $x[0] <+store> [exception] ok 3449 - my @x; exists $x[0] <+store> [return] ok 3450 - my @x; exists $x[0] <+store> [variable] ok 3451 - our @x; local @x; use strict; exists $x[0] <+store> [exception] ok 3452 - our @x; local @x; use strict; exists $x[0] <+store> [return] ok 3453 - our @x; local @x; use strict; exists $x[0] <+store> [variable] ok 3454 - our @x; local @x; no strict; exists $x[0] <+store> [exception] ok 3455 - our @x; local @x; no strict; exists $x[0] <+store> [return] ok 3456 - our @x; local @x; no strict; exists $x[0] <+store> [variable] ok 3457 - my $x; exists $x->[0] <+strict +fetch> [exception] ok 3458 - my $x; exists $x->[0] <+strict +fetch> [return] ok 3459 - my $x; exists $x->[0] <+strict +fetch> [variable] ok 3460 - our $x; local $x; use strict; exists $x->[0] <+strict +fetch> [exception] ok 3461 - our $x; local $x; use strict; exists $x->[0] <+strict +fetch> [return] ok 3462 - our $x; local $x; use strict; exists $x->[0] <+strict +fetch> [variable] ok 3463 - our $x; local $x; no strict; exists $x->[0] <+strict +fetch> [exception] ok 3464 - our $x; local $x; no strict; exists $x->[0] <+strict +fetch> [return] ok 3465 - our $x; local $x; no strict; exists $x->[0] <+strict +fetch> [variable] ok 3466 - my $x; exists $$x[0] <+strict +fetch> [exception] ok 3467 - my $x; exists $$x[0] <+strict +fetch> [return] ok 3468 - my $x; exists $$x[0] <+strict +fetch> [variable] ok 3469 - our $x; local $x; use strict; exists $$x[0] <+strict +fetch> [exception] ok 3470 - our $x; local $x; use strict; exists $$x[0] <+strict +fetch> [return] ok 3471 - our $x; local $x; use strict; exists $$x[0] <+strict +fetch> [variable] ok 3472 - our $x; local $x; no strict; exists $$x[0] <+strict +fetch> [exception] ok 3473 - our $x; local $x; no strict; exists $$x[0] <+strict +fetch> [return] ok 3474 - our $x; local $x; no strict; exists $$x[0] <+strict +fetch> [variable] ok 3475 - my @x; exists $x[0] <+strict +fetch> [exception] ok 3476 - my @x; exists $x[0] <+strict +fetch> [return] ok 3477 - my @x; exists $x[0] <+strict +fetch> [variable] ok 3478 - our @x; local @x; use strict; exists $x[0] <+strict +fetch> [exception] ok 3479 - our @x; local @x; use strict; exists $x[0] <+strict +fetch> [return] ok 3480 - our @x; local @x; use strict; exists $x[0] <+strict +fetch> [variable] ok 3481 - our @x; local @x; no strict; exists $x[0] <+strict +fetch> [exception] ok 3482 - our @x; local @x; no strict; exists $x[0] <+strict +fetch> [return] ok 3483 - our @x; local @x; no strict; exists $x[0] <+strict +fetch> [variable] ok 3484 - my $x; exists $x->[0] <+strict +exists> [exception] ok 3485 - my $x; exists $x->[0] <+strict +exists> [return] ok 3486 - my $x; exists $x->[0] <+strict +exists> [variable] ok 3487 - our $x; local $x; use strict; exists $x->[0] <+strict +exists> [exception] ok 3488 - our $x; local $x; use strict; exists $x->[0] <+strict +exists> [return] ok 3489 - our $x; local $x; use strict; exists $x->[0] <+strict +exists> [variable] ok 3490 - our $x; local $x; no strict; exists $x->[0] <+strict +exists> [exception] ok 3491 - our $x; local $x; no strict; exists $x->[0] <+strict +exists> [return] ok 3492 - our $x; local $x; no strict; exists $x->[0] <+strict +exists> [variable] ok 3493 - my $x; exists $$x[0] <+strict +exists> [exception] ok 3494 - my $x; exists $$x[0] <+strict +exists> [return] ok 3495 - my $x; exists $$x[0] <+strict +exists> [variable] ok 3496 - our $x; local $x; use strict; exists $$x[0] <+strict +exists> [exception] ok 3497 - our $x; local $x; use strict; exists $$x[0] <+strict +exists> [return] ok 3498 - our $x; local $x; use strict; exists $$x[0] <+strict +exists> [variable] ok 3499 - our $x; local $x; no strict; exists $$x[0] <+strict +exists> [exception] ok 3500 - our $x; local $x; no strict; exists $$x[0] <+strict +exists> [return] ok 3501 - our $x; local $x; no strict; exists $$x[0] <+strict +exists> [variable] ok 3502 - my @x; 1 <+strict +exists> [exception] ok 3503 - my @x; 1 <+strict +exists> [return] ok 3504 - my @x; 1 <+strict +exists> [variable] ok 3505 - our @x; local @x; use strict; 1 <+strict +exists> [exception] ok 3506 - our @x; local @x; use strict; 1 <+strict +exists> [return] ok 3507 - our @x; local @x; use strict; 1 <+strict +exists> [variable] ok 3508 - our @x; local @x; no strict; 1 <+strict +exists> [exception] ok 3509 - our @x; local @x; no strict; 1 <+strict +exists> [return] ok 3510 - our @x; local @x; no strict; 1 <+strict +exists> [variable] ok 3511 - my $x; exists $x->[0] <+strict +delete> [exception] ok 3512 - my $x; exists $x->[0] <+strict +delete> [return] ok 3513 - my $x; exists $x->[0] <+strict +delete> [variable] ok 3514 - our $x; local $x; use strict; exists $x->[0] <+strict +delete> [exception] ok 3515 - our $x; local $x; use strict; exists $x->[0] <+strict +delete> [return] ok 3516 - our $x; local $x; use strict; exists $x->[0] <+strict +delete> [variable] ok 3517 - our $x; local $x; no strict; exists $x->[0] <+strict +delete> [exception] ok 3518 - our $x; local $x; no strict; exists $x->[0] <+strict +delete> [return] ok 3519 - our $x; local $x; no strict; exists $x->[0] <+strict +delete> [variable] ok 3520 - my $x; exists $$x[0] <+strict +delete> [exception] ok 3521 - my $x; exists $$x[0] <+strict +delete> [return] ok 3522 - my $x; exists $$x[0] <+strict +delete> [variable] ok 3523 - our $x; local $x; use strict; exists $$x[0] <+strict +delete> [exception] ok 3524 - our $x; local $x; use strict; exists $$x[0] <+strict +delete> [return] ok 3525 - our $x; local $x; use strict; exists $$x[0] <+strict +delete> [variable] ok 3526 - our $x; local $x; no strict; exists $$x[0] <+strict +delete> [exception] ok 3527 - our $x; local $x; no strict; exists $$x[0] <+strict +delete> [return] ok 3528 - our $x; local $x; no strict; exists $$x[0] <+strict +delete> [variable] ok 3529 - my @x; exists $x[0] <+strict +delete> [exception] ok 3530 - my @x; exists $x[0] <+strict +delete> [return] ok 3531 - my @x; exists $x[0] <+strict +delete> [variable] ok 3532 - our @x; local @x; use strict; exists $x[0] <+strict +delete> [exception] ok 3533 - our @x; local @x; use strict; exists $x[0] <+strict +delete> [return] ok 3534 - our @x; local @x; use strict; exists $x[0] <+strict +delete> [variable] ok 3535 - our @x; local @x; no strict; exists $x[0] <+strict +delete> [exception] ok 3536 - our @x; local @x; no strict; exists $x[0] <+strict +delete> [return] ok 3537 - our @x; local @x; no strict; exists $x[0] <+strict +delete> [variable] ok 3538 - my $x; exists $x->[0] <+strict +store> [exception] ok 3539 - my $x; exists $x->[0] <+strict +store> [return] ok 3540 - my $x; exists $x->[0] <+strict +store> [variable] ok 3541 - our $x; local $x; use strict; exists $x->[0] <+strict +store> [exception] ok 3542 - our $x; local $x; use strict; exists $x->[0] <+strict +store> [return] ok 3543 - our $x; local $x; use strict; exists $x->[0] <+strict +store> [variable] ok 3544 - our $x; local $x; no strict; exists $x->[0] <+strict +store> [exception] ok 3545 - our $x; local $x; no strict; exists $x->[0] <+strict +store> [return] ok 3546 - our $x; local $x; no strict; exists $x->[0] <+strict +store> [variable] ok 3547 - my $x; exists $$x[0] <+strict +store> [exception] ok 3548 - my $x; exists $$x[0] <+strict +store> [return] ok 3549 - my $x; exists $$x[0] <+strict +store> [variable] ok 3550 - our $x; local $x; use strict; exists $$x[0] <+strict +store> [exception] ok 3551 - our $x; local $x; use strict; exists $$x[0] <+strict +store> [return] ok 3552 - our $x; local $x; use strict; exists $$x[0] <+strict +store> [variable] ok 3553 - our $x; local $x; no strict; exists $$x[0] <+strict +store> [exception] ok 3554 - our $x; local $x; no strict; exists $$x[0] <+strict +store> [return] ok 3555 - our $x; local $x; no strict; exists $$x[0] <+strict +store> [variable] ok 3556 - my @x; exists $x[0] <+strict +store> [exception] ok 3557 - my @x; exists $x[0] <+strict +store> [return] ok 3558 - my @x; exists $x[0] <+strict +store> [variable] ok 3559 - our @x; local @x; use strict; exists $x[0] <+strict +store> [exception] ok 3560 - our @x; local @x; use strict; exists $x[0] <+strict +store> [return] ok 3561 - our @x; local @x; use strict; exists $x[0] <+strict +store> [variable] ok 3562 - our @x; local @x; no strict; exists $x[0] <+strict +store> [exception] ok 3563 - our @x; local @x; no strict; exists $x[0] <+strict +store> [return] ok 3564 - our @x; local @x; no strict; exists $x[0] <+strict +store> [variable] ok 3565 - my $x; exists $x->[0]->[1] [exception] ok 3566 - my $x; exists $x->[0]->[1] [return] ok 3567 - my $x; exists $x->[0]->[1] [variable] ok 3568 - our $x; local $x; use strict; exists $x->[0]->[1] [exception] ok 3569 - our $x; local $x; use strict; exists $x->[0]->[1] [return] ok 3570 - our $x; local $x; use strict; exists $x->[0]->[1] [variable] ok 3571 - our $x; local $x; no strict; exists $x->[0]->[1] [exception] ok 3572 - our $x; local $x; no strict; exists $x->[0]->[1] [return] ok 3573 - our $x; local $x; no strict; exists $x->[0]->[1] [variable] ok 3574 - my $x; exists $$x[0]->[1] [exception] ok 3575 - my $x; exists $$x[0]->[1] [return] ok 3576 - my $x; exists $$x[0]->[1] [variable] ok 3577 - our $x; local $x; use strict; exists $$x[0]->[1] [exception] ok 3578 - our $x; local $x; use strict; exists $$x[0]->[1] [return] ok 3579 - our $x; local $x; use strict; exists $$x[0]->[1] [variable] ok 3580 - our $x; local $x; no strict; exists $$x[0]->[1] [exception] ok 3581 - our $x; local $x; no strict; exists $$x[0]->[1] [return] ok 3582 - our $x; local $x; no strict; exists $$x[0]->[1] [variable] ok 3583 - my @x; exists $x[0]->[1] [exception] ok 3584 - my @x; exists $x[0]->[1] [return] ok 3585 - my @x; exists $x[0]->[1] [variable] ok 3586 - our @x; local @x; use strict; exists $x[0]->[1] [exception] ok 3587 - our @x; local @x; use strict; exists $x[0]->[1] [return] ok 3588 - our @x; local @x; use strict; exists $x[0]->[1] [variable] ok 3589 - our @x; local @x; no strict; exists $x[0]->[1] [exception] ok 3590 - our @x; local @x; no strict; exists $x[0]->[1] [return] ok 3591 - our @x; local @x; no strict; exists $x[0]->[1] [variable] ok 3592 - my $x; exists $x->[0]->[1] [exception] ok 3593 - my $x; exists $x->[0]->[1] [return] ok 3594 - my $x; exists $x->[0]->[1] [variable] ok 3595 - our $x; local $x; use strict; exists $x->[0]->[1] [exception] ok 3596 - our $x; local $x; use strict; exists $x->[0]->[1] [return] ok 3597 - our $x; local $x; use strict; exists $x->[0]->[1] [variable] ok 3598 - our $x; local $x; no strict; exists $x->[0]->[1] [exception] ok 3599 - our $x; local $x; no strict; exists $x->[0]->[1] [return] ok 3600 - our $x; local $x; no strict; exists $x->[0]->[1] [variable] ok 3601 - my $x; exists $$x[0]->[1] [exception] ok 3602 - my $x; exists $$x[0]->[1] [return] ok 3603 - my $x; exists $$x[0]->[1] [variable] ok 3604 - our $x; local $x; use strict; exists $$x[0]->[1] [exception] ok 3605 - our $x; local $x; use strict; exists $$x[0]->[1] [return] ok 3606 - our $x; local $x; use strict; exists $$x[0]->[1] [variable] ok 3607 - our $x; local $x; no strict; exists $$x[0]->[1] [exception] ok 3608 - our $x; local $x; no strict; exists $$x[0]->[1] [return] ok 3609 - our $x; local $x; no strict; exists $$x[0]->[1] [variable] ok 3610 - my @x; exists $x[0]->[1] [exception] ok 3611 - my @x; exists $x[0]->[1] [return] ok 3612 - my @x; exists $x[0]->[1] [variable] ok 3613 - our @x; local @x; use strict; exists $x[0]->[1] [exception] ok 3614 - our @x; local @x; use strict; exists $x[0]->[1] [return] ok 3615 - our @x; local @x; use strict; exists $x[0]->[1] [variable] ok 3616 - our @x; local @x; no strict; exists $x[0]->[1] [exception] ok 3617 - our @x; local @x; no strict; exists $x[0]->[1] [return] ok 3618 - our @x; local @x; no strict; exists $x[0]->[1] [variable] ok 3619 - my $x; exists $x->[0]->[1] <+fetch> [exception] ok 3620 - my $x; exists $x->[0]->[1] <+fetch> [return] ok 3621 - my $x; exists $x->[0]->[1] <+fetch> [variable] ok 3622 - our $x; local $x; use strict; exists $x->[0]->[1] <+fetch> [exception] ok 3623 - our $x; local $x; use strict; exists $x->[0]->[1] <+fetch> [return] ok 3624 - our $x; local $x; use strict; exists $x->[0]->[1] <+fetch> [variable] ok 3625 - our $x; local $x; no strict; exists $x->[0]->[1] <+fetch> [exception] ok 3626 - our $x; local $x; no strict; exists $x->[0]->[1] <+fetch> [return] ok 3627 - our $x; local $x; no strict; exists $x->[0]->[1] <+fetch> [variable] ok 3628 - my $x; exists $$x[0]->[1] <+fetch> [exception] ok 3629 - my $x; exists $$x[0]->[1] <+fetch> [return] ok 3630 - my $x; exists $$x[0]->[1] <+fetch> [variable] ok 3631 - our $x; local $x; use strict; exists $$x[0]->[1] <+fetch> [exception] ok 3632 - our $x; local $x; use strict; exists $$x[0]->[1] <+fetch> [return] ok 3633 - our $x; local $x; use strict; exists $$x[0]->[1] <+fetch> [variable] ok 3634 - our $x; local $x; no strict; exists $$x[0]->[1] <+fetch> [exception] ok 3635 - our $x; local $x; no strict; exists $$x[0]->[1] <+fetch> [return] ok 3636 - our $x; local $x; no strict; exists $$x[0]->[1] <+fetch> [variable] ok 3637 - my @x; exists $x[0]->[1] <+fetch> [exception] ok 3638 - my @x; exists $x[0]->[1] <+fetch> [return] ok 3639 - my @x; exists $x[0]->[1] <+fetch> [variable] ok 3640 - our @x; local @x; use strict; exists $x[0]->[1] <+fetch> [exception] ok 3641 - our @x; local @x; use strict; exists $x[0]->[1] <+fetch> [return] ok 3642 - our @x; local @x; use strict; exists $x[0]->[1] <+fetch> [variable] ok 3643 - our @x; local @x; no strict; exists $x[0]->[1] <+fetch> [exception] ok 3644 - our @x; local @x; no strict; exists $x[0]->[1] <+fetch> [return] ok 3645 - our @x; local @x; no strict; exists $x[0]->[1] <+fetch> [variable] ok 3646 - my $x; exists $x->[0]->[1] <+exists> [exception] ok 3647 - my $x; exists $x->[0]->[1] <+exists> [return] ok 3648 - my $x; exists $x->[0]->[1] <+exists> [variable] ok 3649 - our $x; local $x; use strict; exists $x->[0]->[1] <+exists> [exception] ok 3650 - our $x; local $x; use strict; exists $x->[0]->[1] <+exists> [return] ok 3651 - our $x; local $x; use strict; exists $x->[0]->[1] <+exists> [variable] ok 3652 - our $x; local $x; no strict; exists $x->[0]->[1] <+exists> [exception] ok 3653 - our $x; local $x; no strict; exists $x->[0]->[1] <+exists> [return] ok 3654 - our $x; local $x; no strict; exists $x->[0]->[1] <+exists> [variable] ok 3655 - my $x; exists $$x[0]->[1] <+exists> [exception] ok 3656 - my $x; exists $$x[0]->[1] <+exists> [return] ok 3657 - my $x; exists $$x[0]->[1] <+exists> [variable] ok 3658 - our $x; local $x; use strict; exists $$x[0]->[1] <+exists> [exception] ok 3659 - our $x; local $x; use strict; exists $$x[0]->[1] <+exists> [return] ok 3660 - our $x; local $x; use strict; exists $$x[0]->[1] <+exists> [variable] ok 3661 - our $x; local $x; no strict; exists $$x[0]->[1] <+exists> [exception] ok 3662 - our $x; local $x; no strict; exists $$x[0]->[1] <+exists> [return] ok 3663 - our $x; local $x; no strict; exists $$x[0]->[1] <+exists> [variable] ok 3664 - my @x; exists $x[0]->[1] <+exists> [exception] ok 3665 - my @x; exists $x[0]->[1] <+exists> [return] ok 3666 - my @x; exists $x[0]->[1] <+exists> [variable] ok 3667 - our @x; local @x; use strict; exists $x[0]->[1] <+exists> [exception] ok 3668 - our @x; local @x; use strict; exists $x[0]->[1] <+exists> [return] ok 3669 - our @x; local @x; use strict; exists $x[0]->[1] <+exists> [variable] ok 3670 - our @x; local @x; no strict; exists $x[0]->[1] <+exists> [exception] ok 3671 - our @x; local @x; no strict; exists $x[0]->[1] <+exists> [return] ok 3672 - our @x; local @x; no strict; exists $x[0]->[1] <+exists> [variable] ok 3673 - my $x; exists $x->[0]->[1] <+delete> [exception] ok 3674 - my $x; exists $x->[0]->[1] <+delete> [return] ok 3675 - my $x; exists $x->[0]->[1] <+delete> [variable] ok 3676 - our $x; local $x; use strict; exists $x->[0]->[1] <+delete> [exception] ok 3677 - our $x; local $x; use strict; exists $x->[0]->[1] <+delete> [return] ok 3678 - our $x; local $x; use strict; exists $x->[0]->[1] <+delete> [variable] ok 3679 - our $x; local $x; no strict; exists $x->[0]->[1] <+delete> [exception] ok 3680 - our $x; local $x; no strict; exists $x->[0]->[1] <+delete> [return] ok 3681 - our $x; local $x; no strict; exists $x->[0]->[1] <+delete> [variable] ok 3682 - my $x; exists $$x[0]->[1] <+delete> [exception] ok 3683 - my $x; exists $$x[0]->[1] <+delete> [return] ok 3684 - my $x; exists $$x[0]->[1] <+delete> [variable] ok 3685 - our $x; local $x; use strict; exists $$x[0]->[1] <+delete> [exception] ok 3686 - our $x; local $x; use strict; exists $$x[0]->[1] <+delete> [return] ok 3687 - our $x; local $x; use strict; exists $$x[0]->[1] <+delete> [variable] ok 3688 - our $x; local $x; no strict; exists $$x[0]->[1] <+delete> [exception] ok 3689 - our $x; local $x; no strict; exists $$x[0]->[1] <+delete> [return] ok 3690 - our $x; local $x; no strict; exists $$x[0]->[1] <+delete> [variable] ok 3691 - my @x; exists $x[0]->[1] <+delete> [exception] ok 3692 - my @x; exists $x[0]->[1] <+delete> [return] ok 3693 - my @x; exists $x[0]->[1] <+delete> [variable] ok 3694 - our @x; local @x; use strict; exists $x[0]->[1] <+delete> [exception] ok 3695 - our @x; local @x; use strict; exists $x[0]->[1] <+delete> [return] ok 3696 - our @x; local @x; use strict; exists $x[0]->[1] <+delete> [variable] ok 3697 - our @x; local @x; no strict; exists $x[0]->[1] <+delete> [exception] ok 3698 - our @x; local @x; no strict; exists $x[0]->[1] <+delete> [return] ok 3699 - our @x; local @x; no strict; exists $x[0]->[1] <+delete> [variable] ok 3700 - my $x; exists $x->[0]->[1] <+store> [exception] ok 3701 - my $x; exists $x->[0]->[1] <+store> [return] ok 3702 - my $x; exists $x->[0]->[1] <+store> [variable] ok 3703 - our $x; local $x; use strict; exists $x->[0]->[1] <+store> [exception] ok 3704 - our $x; local $x; use strict; exists $x->[0]->[1] <+store> [return] ok 3705 - our $x; local $x; use strict; exists $x->[0]->[1] <+store> [variable] ok 3706 - our $x; local $x; no strict; exists $x->[0]->[1] <+store> [exception] ok 3707 - our $x; local $x; no strict; exists $x->[0]->[1] <+store> [return] ok 3708 - our $x; local $x; no strict; exists $x->[0]->[1] <+store> [variable] ok 3709 - my $x; exists $$x[0]->[1] <+store> [exception] ok 3710 - my $x; exists $$x[0]->[1] <+store> [return] ok 3711 - my $x; exists $$x[0]->[1] <+store> [variable] ok 3712 - our $x; local $x; use strict; exists $$x[0]->[1] <+store> [exception] ok 3713 - our $x; local $x; use strict; exists $$x[0]->[1] <+store> [return] ok 3714 - our $x; local $x; use strict; exists $$x[0]->[1] <+store> [variable] ok 3715 - our $x; local $x; no strict; exists $$x[0]->[1] <+store> [exception] ok 3716 - our $x; local $x; no strict; exists $$x[0]->[1] <+store> [return] ok 3717 - our $x; local $x; no strict; exists $$x[0]->[1] <+store> [variable] ok 3718 - my @x; exists $x[0]->[1] <+store> [exception] ok 3719 - my @x; exists $x[0]->[1] <+store> [return] ok 3720 - my @x; exists $x[0]->[1] <+store> [variable] ok 3721 - our @x; local @x; use strict; exists $x[0]->[1] <+store> [exception] ok 3722 - our @x; local @x; use strict; exists $x[0]->[1] <+store> [return] ok 3723 - our @x; local @x; use strict; exists $x[0]->[1] <+store> [variable] ok 3724 - our @x; local @x; no strict; exists $x[0]->[1] <+store> [exception] ok 3725 - our @x; local @x; no strict; exists $x[0]->[1] <+store> [return] ok 3726 - our @x; local @x; no strict; exists $x[0]->[1] <+store> [variable] ok 3727 - my $x; exists $x->[0]->[1] <+strict +fetch> [exception] ok 3728 - my $x; exists $x->[0]->[1] <+strict +fetch> [return] ok 3729 - my $x; exists $x->[0]->[1] <+strict +fetch> [variable] ok 3730 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +fetch> [exception] ok 3731 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +fetch> [return] ok 3732 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +fetch> [variable] ok 3733 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +fetch> [exception] ok 3734 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +fetch> [return] ok 3735 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +fetch> [variable] ok 3736 - my $x; exists $$x[0]->[1] <+strict +fetch> [exception] ok 3737 - my $x; exists $$x[0]->[1] <+strict +fetch> [return] ok 3738 - my $x; exists $$x[0]->[1] <+strict +fetch> [variable] ok 3739 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +fetch> [exception] ok 3740 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +fetch> [return] ok 3741 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +fetch> [variable] ok 3742 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +fetch> [exception] ok 3743 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +fetch> [return] ok 3744 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +fetch> [variable] ok 3745 - my @x; exists $x[0]->[1] <+strict +fetch> [exception] ok 3746 - my @x; exists $x[0]->[1] <+strict +fetch> [return] ok 3747 - my @x; exists $x[0]->[1] <+strict +fetch> [variable] ok 3748 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +fetch> [exception] ok 3749 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +fetch> [return] ok 3750 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +fetch> [variable] ok 3751 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +fetch> [exception] ok 3752 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +fetch> [return] ok 3753 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +fetch> [variable] ok 3754 - my $x; exists $x->[0]->[1] <+strict +exists> [exception] ok 3755 - my $x; exists $x->[0]->[1] <+strict +exists> [return] ok 3756 - my $x; exists $x->[0]->[1] <+strict +exists> [variable] ok 3757 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +exists> [exception] ok 3758 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +exists> [return] ok 3759 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +exists> [variable] ok 3760 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +exists> [exception] ok 3761 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +exists> [return] ok 3762 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +exists> [variable] ok 3763 - my $x; exists $$x[0]->[1] <+strict +exists> [exception] ok 3764 - my $x; exists $$x[0]->[1] <+strict +exists> [return] ok 3765 - my $x; exists $$x[0]->[1] <+strict +exists> [variable] ok 3766 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +exists> [exception] ok 3767 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +exists> [return] ok 3768 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +exists> [variable] ok 3769 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +exists> [exception] ok 3770 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +exists> [return] ok 3771 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +exists> [variable] ok 3772 - my @x; exists $x[0]->[1] <+strict +exists> [exception] ok 3773 - my @x; exists $x[0]->[1] <+strict +exists> [return] ok 3774 - my @x; exists $x[0]->[1] <+strict +exists> [variable] ok 3775 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +exists> [exception] ok 3776 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +exists> [return] ok 3777 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +exists> [variable] ok 3778 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +exists> [exception] ok 3779 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +exists> [return] ok 3780 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +exists> [variable] ok 3781 - my $x; exists $x->[0]->[1] <+strict +delete> [exception] ok 3782 - my $x; exists $x->[0]->[1] <+strict +delete> [return] ok 3783 - my $x; exists $x->[0]->[1] <+strict +delete> [variable] ok 3784 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +delete> [exception] ok 3785 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +delete> [return] ok 3786 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +delete> [variable] ok 3787 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +delete> [exception] ok 3788 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +delete> [return] ok 3789 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +delete> [variable] ok 3790 - my $x; exists $$x[0]->[1] <+strict +delete> [exception] ok 3791 - my $x; exists $$x[0]->[1] <+strict +delete> [return] ok 3792 - my $x; exists $$x[0]->[1] <+strict +delete> [variable] ok 3793 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +delete> [exception] ok 3794 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +delete> [return] ok 3795 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +delete> [variable] ok 3796 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +delete> [exception] ok 3797 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +delete> [return] ok 3798 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +delete> [variable] ok 3799 - my @x; exists $x[0]->[1] <+strict +delete> [exception] ok 3800 - my @x; exists $x[0]->[1] <+strict +delete> [return] ok 3801 - my @x; exists $x[0]->[1] <+strict +delete> [variable] ok 3802 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +delete> [exception] ok 3803 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +delete> [return] ok 3804 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +delete> [variable] ok 3805 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +delete> [exception] ok 3806 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +delete> [return] ok 3807 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +delete> [variable] ok 3808 - my $x; exists $x->[0]->[1] <+strict +store> [exception] ok 3809 - my $x; exists $x->[0]->[1] <+strict +store> [return] ok 3810 - my $x; exists $x->[0]->[1] <+strict +store> [variable] ok 3811 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +store> [exception] ok 3812 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +store> [return] ok 3813 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +store> [variable] ok 3814 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +store> [exception] ok 3815 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +store> [return] ok 3816 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +store> [variable] ok 3817 - my $x; exists $$x[0]->[1] <+strict +store> [exception] ok 3818 - my $x; exists $$x[0]->[1] <+strict +store> [return] ok 3819 - my $x; exists $$x[0]->[1] <+strict +store> [variable] ok 3820 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +store> [exception] ok 3821 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +store> [return] ok 3822 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +store> [variable] ok 3823 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +store> [exception] ok 3824 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +store> [return] ok 3825 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +store> [variable] ok 3826 - my @x; exists $x[0]->[1] <+strict +store> [exception] ok 3827 - my @x; exists $x[0]->[1] <+strict +store> [return] ok 3828 - my @x; exists $x[0]->[1] <+strict +store> [variable] ok 3829 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +store> [exception] ok 3830 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +store> [return] ok 3831 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +store> [variable] ok 3832 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +store> [exception] ok 3833 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +store> [return] ok 3834 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +store> [variable] ok 3835 - my $x; $x->[0] = 1; exists $x->[0] <+fetch> [exception] ok 3836 - my $x; $x->[0] = 1; exists $x->[0] <+fetch> [return] ok 3837 - my $x; $x->[0] = 1; exists $x->[0] <+fetch> [variable] ok 3838 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+fetch> [exception] ok 3839 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+fetch> [return] ok 3840 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+fetch> [variable] ok 3841 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+fetch> [exception] ok 3842 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+fetch> [return] ok 3843 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+fetch> [variable] ok 3844 - my $x; $x->[0] = 1; exists $$x[0] <+fetch> [exception] ok 3845 - my $x; $x->[0] = 1; exists $$x[0] <+fetch> [return] ok 3846 - my $x; $x->[0] = 1; exists $$x[0] <+fetch> [variable] ok 3847 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+fetch> [exception] ok 3848 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+fetch> [return] ok 3849 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+fetch> [variable] ok 3850 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+fetch> [exception] ok 3851 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+fetch> [return] ok 3852 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+fetch> [variable] ok 3853 - my @x; $x[0] = 1; exists $x[0] <+fetch> [exception] ok 3854 - my @x; $x[0] = 1; exists $x[0] <+fetch> [return] ok 3855 - my @x; $x[0] = 1; exists $x[0] <+fetch> [variable] ok 3856 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+fetch> [exception] ok 3857 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+fetch> [return] ok 3858 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+fetch> [variable] ok 3859 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+fetch> [exception] ok 3860 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+fetch> [return] ok 3861 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+fetch> [variable] ok 3862 - my $x; $x->[0] = 1; exists $x->[1] <+fetch> [exception] ok 3863 - my $x; $x->[0] = 1; exists $x->[1] <+fetch> [return] ok 3864 - my $x; $x->[0] = 1; exists $x->[1] <+fetch> [variable] ok 3865 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+fetch> [exception] ok 3866 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+fetch> [return] ok 3867 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+fetch> [variable] ok 3868 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+fetch> [exception] ok 3869 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+fetch> [return] ok 3870 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+fetch> [variable] ok 3871 - my $x; $x->[0] = 1; exists $$x[1] <+fetch> [exception] ok 3872 - my $x; $x->[0] = 1; exists $$x[1] <+fetch> [return] ok 3873 - my $x; $x->[0] = 1; exists $$x[1] <+fetch> [variable] ok 3874 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+fetch> [exception] ok 3875 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+fetch> [return] ok 3876 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+fetch> [variable] ok 3877 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+fetch> [exception] ok 3878 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+fetch> [return] ok 3879 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+fetch> [variable] ok 3880 - my @x; $x[0] = 1; exists $x[1] <+fetch> [exception] ok 3881 - my @x; $x[0] = 1; exists $x[1] <+fetch> [return] ok 3882 - my @x; $x[0] = 1; exists $x[1] <+fetch> [variable] ok 3883 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+fetch> [exception] ok 3884 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+fetch> [return] ok 3885 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+fetch> [variable] ok 3886 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+fetch> [exception] ok 3887 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+fetch> [return] ok 3888 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+fetch> [variable] ok 3889 - my $x; $x->[0] = 1; exists $x->[0] <+exists> [exception] ok 3890 - my $x; $x->[0] = 1; exists $x->[0] <+exists> [return] ok 3891 - my $x; $x->[0] = 1; exists $x->[0] <+exists> [variable] ok 3892 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+exists> [exception] ok 3893 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+exists> [return] ok 3894 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+exists> [variable] ok 3895 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+exists> [exception] ok 3896 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+exists> [return] ok 3897 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+exists> [variable] ok 3898 - my $x; $x->[0] = 1; exists $$x[0] <+exists> [exception] ok 3899 - my $x; $x->[0] = 1; exists $$x[0] <+exists> [return] ok 3900 - my $x; $x->[0] = 1; exists $$x[0] <+exists> [variable] ok 3901 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+exists> [exception] ok 3902 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+exists> [return] ok 3903 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+exists> [variable] ok 3904 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+exists> [exception] ok 3905 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+exists> [return] ok 3906 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+exists> [variable] ok 3907 - my @x; $x[0] = 1; exists $x[0] <+exists> [exception] ok 3908 - my @x; $x[0] = 1; exists $x[0] <+exists> [return] ok 3909 - my @x; $x[0] = 1; exists $x[0] <+exists> [variable] ok 3910 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+exists> [exception] ok 3911 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+exists> [return] ok 3912 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+exists> [variable] ok 3913 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+exists> [exception] ok 3914 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+exists> [return] ok 3915 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+exists> [variable] ok 3916 - my $x; $x->[0] = 1; exists $x->[1] <+exists> [exception] ok 3917 - my $x; $x->[0] = 1; exists $x->[1] <+exists> [return] ok 3918 - my $x; $x->[0] = 1; exists $x->[1] <+exists> [variable] ok 3919 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+exists> [exception] ok 3920 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+exists> [return] ok 3921 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+exists> [variable] ok 3922 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+exists> [exception] ok 3923 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+exists> [return] ok 3924 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+exists> [variable] ok 3925 - my $x; $x->[0] = 1; exists $$x[1] <+exists> [exception] ok 3926 - my $x; $x->[0] = 1; exists $$x[1] <+exists> [return] ok 3927 - my $x; $x->[0] = 1; exists $$x[1] <+exists> [variable] ok 3928 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+exists> [exception] ok 3929 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+exists> [return] ok 3930 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+exists> [variable] ok 3931 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+exists> [exception] ok 3932 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+exists> [return] ok 3933 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+exists> [variable] ok 3934 - my @x; $x[0] = 1; exists $x[1] <+exists> [exception] ok 3935 - my @x; $x[0] = 1; exists $x[1] <+exists> [return] ok 3936 - my @x; $x[0] = 1; exists $x[1] <+exists> [variable] ok 3937 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+exists> [exception] ok 3938 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+exists> [return] ok 3939 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+exists> [variable] ok 3940 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+exists> [exception] ok 3941 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+exists> [return] ok 3942 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+exists> [variable] ok 3943 - my $x; $x->[0] = 1; exists $x->[0] <+delete> [exception] ok 3944 - my $x; $x->[0] = 1; exists $x->[0] <+delete> [return] ok 3945 - my $x; $x->[0] = 1; exists $x->[0] <+delete> [variable] ok 3946 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+delete> [exception] ok 3947 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+delete> [return] ok 3948 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+delete> [variable] ok 3949 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+delete> [exception] ok 3950 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+delete> [return] ok 3951 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+delete> [variable] ok 3952 - my $x; $x->[0] = 1; exists $$x[0] <+delete> [exception] ok 3953 - my $x; $x->[0] = 1; exists $$x[0] <+delete> [return] ok 3954 - my $x; $x->[0] = 1; exists $$x[0] <+delete> [variable] ok 3955 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+delete> [exception] ok 3956 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+delete> [return] ok 3957 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+delete> [variable] ok 3958 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+delete> [exception] ok 3959 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+delete> [return] ok 3960 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+delete> [variable] ok 3961 - my @x; $x[0] = 1; exists $x[0] <+delete> [exception] ok 3962 - my @x; $x[0] = 1; exists $x[0] <+delete> [return] ok 3963 - my @x; $x[0] = 1; exists $x[0] <+delete> [variable] ok 3964 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+delete> [exception] ok 3965 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+delete> [return] ok 3966 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+delete> [variable] ok 3967 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+delete> [exception] ok 3968 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+delete> [return] ok 3969 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+delete> [variable] ok 3970 - my $x; $x->[0] = 1; exists $x->[1] <+delete> [exception] ok 3971 - my $x; $x->[0] = 1; exists $x->[1] <+delete> [return] ok 3972 - my $x; $x->[0] = 1; exists $x->[1] <+delete> [variable] ok 3973 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+delete> [exception] ok 3974 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+delete> [return] ok 3975 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+delete> [variable] ok 3976 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+delete> [exception] ok 3977 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+delete> [return] ok 3978 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+delete> [variable] ok 3979 - my $x; $x->[0] = 1; exists $$x[1] <+delete> [exception] ok 3980 - my $x; $x->[0] = 1; exists $$x[1] <+delete> [return] ok 3981 - my $x; $x->[0] = 1; exists $$x[1] <+delete> [variable] ok 3982 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+delete> [exception] ok 3983 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+delete> [return] ok 3984 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+delete> [variable] ok 3985 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+delete> [exception] ok 3986 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+delete> [return] ok 3987 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+delete> [variable] ok 3988 - my @x; $x[0] = 1; exists $x[1] <+delete> [exception] ok 3989 - my @x; $x[0] = 1; exists $x[1] <+delete> [return] ok 3990 - my @x; $x[0] = 1; exists $x[1] <+delete> [variable] ok 3991 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+delete> [exception] ok 3992 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+delete> [return] ok 3993 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+delete> [variable] ok 3994 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+delete> [exception] ok 3995 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+delete> [return] ok 3996 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+delete> [variable] ok 3997 - my $x; $x->[0] = 1; exists $x->[0] <+store> [exception] ok 3998 - my $x; $x->[0] = 1; exists $x->[0] <+store> [return] ok 3999 - my $x; $x->[0] = 1; exists $x->[0] <+store> [variable] ok 4000 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+store> [exception] ok 4001 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+store> [return] ok 4002 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+store> [variable] ok 4003 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+store> [exception] ok 4004 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+store> [return] ok 4005 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+store> [variable] ok 4006 - my $x; $x->[0] = 1; exists $$x[0] <+store> [exception] ok 4007 - my $x; $x->[0] = 1; exists $$x[0] <+store> [return] ok 4008 - my $x; $x->[0] = 1; exists $$x[0] <+store> [variable] ok 4009 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+store> [exception] ok 4010 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+store> [return] ok 4011 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+store> [variable] ok 4012 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+store> [exception] ok 4013 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+store> [return] ok 4014 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+store> [variable] ok 4015 - my @x; $x[0] = 1; exists $x[0] <+store> [exception] ok 4016 - my @x; $x[0] = 1; exists $x[0] <+store> [return] ok 4017 - my @x; $x[0] = 1; exists $x[0] <+store> [variable] ok 4018 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+store> [exception] ok 4019 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+store> [return] ok 4020 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+store> [variable] ok 4021 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+store> [exception] ok 4022 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+store> [return] ok 4023 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+store> [variable] ok 4024 - my $x; $x->[0] = 1; exists $x->[1] <+store> [exception] ok 4025 - my $x; $x->[0] = 1; exists $x->[1] <+store> [return] ok 4026 - my $x; $x->[0] = 1; exists $x->[1] <+store> [variable] ok 4027 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+store> [exception] ok 4028 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+store> [return] ok 4029 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+store> [variable] ok 4030 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+store> [exception] ok 4031 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+store> [return] ok 4032 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+store> [variable] ok 4033 - my $x; $x->[0] = 1; exists $$x[1] <+store> [exception] ok 4034 - my $x; $x->[0] = 1; exists $$x[1] <+store> [return] ok 4035 - my $x; $x->[0] = 1; exists $$x[1] <+store> [variable] ok 4036 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+store> [exception] ok 4037 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+store> [return] ok 4038 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+store> [variable] ok 4039 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+store> [exception] ok 4040 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+store> [return] ok 4041 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+store> [variable] ok 4042 - my @x; $x[0] = 1; exists $x[1] <+store> [exception] ok 4043 - my @x; $x[0] = 1; exists $x[1] <+store> [return] ok 4044 - my @x; $x[0] = 1; exists $x[1] <+store> [variable] ok 4045 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+store> [exception] ok 4046 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+store> [return] ok 4047 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+store> [variable] ok 4048 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+store> [exception] ok 4049 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+store> [return] ok 4050 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+store> [variable] ok 4051 - my $x; $x->[0] = 1; exists $x->[0] <+strict +fetch> [exception] ok 4052 - my $x; $x->[0] = 1; exists $x->[0] <+strict +fetch> [return] ok 4053 - my $x; $x->[0] = 1; exists $x->[0] <+strict +fetch> [variable] ok 4054 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +fetch> [exception] ok 4055 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +fetch> [return] ok 4056 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +fetch> [variable] ok 4057 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +fetch> [exception] ok 4058 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +fetch> [return] ok 4059 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +fetch> [variable] ok 4060 - my $x; $x->[0] = 1; exists $$x[0] <+strict +fetch> [exception] ok 4061 - my $x; $x->[0] = 1; exists $$x[0] <+strict +fetch> [return] ok 4062 - my $x; $x->[0] = 1; exists $$x[0] <+strict +fetch> [variable] ok 4063 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +fetch> [exception] ok 4064 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +fetch> [return] ok 4065 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +fetch> [variable] ok 4066 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +fetch> [exception] ok 4067 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +fetch> [return] ok 4068 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +fetch> [variable] ok 4069 - my @x; $x[0] = 1; exists $x[0] <+strict +fetch> [exception] ok 4070 - my @x; $x[0] = 1; exists $x[0] <+strict +fetch> [return] ok 4071 - my @x; $x[0] = 1; exists $x[0] <+strict +fetch> [variable] ok 4072 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +fetch> [exception] ok 4073 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +fetch> [return] ok 4074 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +fetch> [variable] ok 4075 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +fetch> [exception] ok 4076 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +fetch> [return] ok 4077 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +fetch> [variable] ok 4078 - my $x; $x->[0] = 1; exists $x->[1] <+strict +fetch> [exception] ok 4079 - my $x; $x->[0] = 1; exists $x->[1] <+strict +fetch> [return] ok 4080 - my $x; $x->[0] = 1; exists $x->[1] <+strict +fetch> [variable] ok 4081 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +fetch> [exception] ok 4082 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +fetch> [return] ok 4083 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +fetch> [variable] ok 4084 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +fetch> [exception] ok 4085 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +fetch> [return] ok 4086 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +fetch> [variable] ok 4087 - my $x; $x->[0] = 1; exists $$x[1] <+strict +fetch> [exception] ok 4088 - my $x; $x->[0] = 1; exists $$x[1] <+strict +fetch> [return] ok 4089 - my $x; $x->[0] = 1; exists $$x[1] <+strict +fetch> [variable] ok 4090 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +fetch> [exception] ok 4091 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +fetch> [return] ok 4092 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +fetch> [variable] ok 4093 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +fetch> [exception] ok 4094 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +fetch> [return] ok 4095 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +fetch> [variable] ok 4096 - my @x; $x[0] = 1; exists $x[1] <+strict +fetch> [exception] ok 4097 - my @x; $x[0] = 1; exists $x[1] <+strict +fetch> [return] ok 4098 - my @x; $x[0] = 1; exists $x[1] <+strict +fetch> [variable] ok 4099 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +fetch> [exception] ok 4100 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +fetch> [return] ok 4101 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +fetch> [variable] ok 4102 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +fetch> [exception] ok 4103 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +fetch> [return] ok 4104 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +fetch> [variable] ok 4105 - my $x; $x->[0] = 1; exists $x->[0] <+strict +exists> [exception] ok 4106 - my $x; $x->[0] = 1; exists $x->[0] <+strict +exists> [return] ok 4107 - my $x; $x->[0] = 1; exists $x->[0] <+strict +exists> [variable] ok 4108 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +exists> [exception] ok 4109 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +exists> [return] ok 4110 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +exists> [variable] ok 4111 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +exists> [exception] ok 4112 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +exists> [return] ok 4113 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +exists> [variable] ok 4114 - my $x; $x->[0] = 1; exists $$x[0] <+strict +exists> [exception] ok 4115 - my $x; $x->[0] = 1; exists $$x[0] <+strict +exists> [return] ok 4116 - my $x; $x->[0] = 1; exists $$x[0] <+strict +exists> [variable] ok 4117 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +exists> [exception] ok 4118 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +exists> [return] ok 4119 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +exists> [variable] ok 4120 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +exists> [exception] ok 4121 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +exists> [return] ok 4122 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +exists> [variable] ok 4123 - my @x; $x[0] = 1; exists $x[0] <+strict +exists> [exception] ok 4124 - my @x; $x[0] = 1; exists $x[0] <+strict +exists> [return] ok 4125 - my @x; $x[0] = 1; exists $x[0] <+strict +exists> [variable] ok 4126 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +exists> [exception] ok 4127 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +exists> [return] ok 4128 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +exists> [variable] ok 4129 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +exists> [exception] ok 4130 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +exists> [return] ok 4131 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +exists> [variable] ok 4132 - my $x; $x->[0] = 1; exists $x->[1] <+strict +exists> [exception] ok 4133 - my $x; $x->[0] = 1; exists $x->[1] <+strict +exists> [return] ok 4134 - my $x; $x->[0] = 1; exists $x->[1] <+strict +exists> [variable] ok 4135 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +exists> [exception] ok 4136 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +exists> [return] ok 4137 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +exists> [variable] ok 4138 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +exists> [exception] ok 4139 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +exists> [return] ok 4140 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +exists> [variable] ok 4141 - my $x; $x->[0] = 1; exists $$x[1] <+strict +exists> [exception] ok 4142 - my $x; $x->[0] = 1; exists $$x[1] <+strict +exists> [return] ok 4143 - my $x; $x->[0] = 1; exists $$x[1] <+strict +exists> [variable] ok 4144 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +exists> [exception] ok 4145 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +exists> [return] ok 4146 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +exists> [variable] ok 4147 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +exists> [exception] ok 4148 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +exists> [return] ok 4149 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +exists> [variable] ok 4150 - my @x; $x[0] = 1; exists $x[1] <+strict +exists> [exception] ok 4151 - my @x; $x[0] = 1; exists $x[1] <+strict +exists> [return] ok 4152 - my @x; $x[0] = 1; exists $x[1] <+strict +exists> [variable] ok 4153 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +exists> [exception] ok 4154 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +exists> [return] ok 4155 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +exists> [variable] ok 4156 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +exists> [exception] ok 4157 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +exists> [return] ok 4158 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +exists> [variable] ok 4159 - my $x; $x->[0] = 1; exists $x->[0] <+strict +delete> [exception] ok 4160 - my $x; $x->[0] = 1; exists $x->[0] <+strict +delete> [return] ok 4161 - my $x; $x->[0] = 1; exists $x->[0] <+strict +delete> [variable] ok 4162 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +delete> [exception] ok 4163 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +delete> [return] ok 4164 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +delete> [variable] ok 4165 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +delete> [exception] ok 4166 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +delete> [return] ok 4167 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +delete> [variable] ok 4168 - my $x; $x->[0] = 1; exists $$x[0] <+strict +delete> [exception] ok 4169 - my $x; $x->[0] = 1; exists $$x[0] <+strict +delete> [return] ok 4170 - my $x; $x->[0] = 1; exists $$x[0] <+strict +delete> [variable] ok 4171 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +delete> [exception] ok 4172 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +delete> [return] ok 4173 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +delete> [variable] ok 4174 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +delete> [exception] ok 4175 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +delete> [return] ok 4176 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +delete> [variable] ok 4177 - my @x; $x[0] = 1; exists $x[0] <+strict +delete> [exception] ok 4178 - my @x; $x[0] = 1; exists $x[0] <+strict +delete> [return] ok 4179 - my @x; $x[0] = 1; exists $x[0] <+strict +delete> [variable] ok 4180 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +delete> [exception] ok 4181 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +delete> [return] ok 4182 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +delete> [variable] ok 4183 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +delete> [exception] ok 4184 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +delete> [return] ok 4185 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +delete> [variable] ok 4186 - my $x; $x->[0] = 1; exists $x->[1] <+strict +delete> [exception] ok 4187 - my $x; $x->[0] = 1; exists $x->[1] <+strict +delete> [return] ok 4188 - my $x; $x->[0] = 1; exists $x->[1] <+strict +delete> [variable] ok 4189 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +delete> [exception] ok 4190 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +delete> [return] ok 4191 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +delete> [variable] ok 4192 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +delete> [exception] ok 4193 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +delete> [return] ok 4194 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +delete> [variable] ok 4195 - my $x; $x->[0] = 1; exists $$x[1] <+strict +delete> [exception] ok 4196 - my $x; $x->[0] = 1; exists $$x[1] <+strict +delete> [return] ok 4197 - my $x; $x->[0] = 1; exists $$x[1] <+strict +delete> [variable] ok 4198 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +delete> [exception] ok 4199 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +delete> [return] ok 4200 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +delete> [variable] ok 4201 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +delete> [exception] ok 4202 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +delete> [return] ok 4203 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +delete> [variable] ok 4204 - my @x; $x[0] = 1; exists $x[1] <+strict +delete> [exception] ok 4205 - my @x; $x[0] = 1; exists $x[1] <+strict +delete> [return] ok 4206 - my @x; $x[0] = 1; exists $x[1] <+strict +delete> [variable] ok 4207 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +delete> [exception] ok 4208 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +delete> [return] ok 4209 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +delete> [variable] ok 4210 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +delete> [exception] ok 4211 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +delete> [return] ok 4212 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +delete> [variable] ok 4213 - my $x; $x->[0] = 1; exists $x->[0] <+strict +store> [exception] ok 4214 - my $x; $x->[0] = 1; exists $x->[0] <+strict +store> [return] ok 4215 - my $x; $x->[0] = 1; exists $x->[0] <+strict +store> [variable] ok 4216 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +store> [exception] ok 4217 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +store> [return] ok 4218 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +store> [variable] ok 4219 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +store> [exception] ok 4220 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +store> [return] ok 4221 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +store> [variable] ok 4222 - my $x; $x->[0] = 1; exists $$x[0] <+strict +store> [exception] ok 4223 - my $x; $x->[0] = 1; exists $$x[0] <+strict +store> [return] ok 4224 - my $x; $x->[0] = 1; exists $$x[0] <+strict +store> [variable] ok 4225 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +store> [exception] ok 4226 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +store> [return] ok 4227 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +store> [variable] ok 4228 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +store> [exception] ok 4229 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +store> [return] ok 4230 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +store> [variable] ok 4231 - my @x; $x[0] = 1; exists $x[0] <+strict +store> [exception] ok 4232 - my @x; $x[0] = 1; exists $x[0] <+strict +store> [return] ok 4233 - my @x; $x[0] = 1; exists $x[0] <+strict +store> [variable] ok 4234 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +store> [exception] ok 4235 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +store> [return] ok 4236 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +store> [variable] ok 4237 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +store> [exception] ok 4238 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +store> [return] ok 4239 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +store> [variable] ok 4240 - my $x; $x->[0] = 1; exists $x->[1] <+strict +store> [exception] ok 4241 - my $x; $x->[0] = 1; exists $x->[1] <+strict +store> [return] ok 4242 - my $x; $x->[0] = 1; exists $x->[1] <+strict +store> [variable] ok 4243 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +store> [exception] ok 4244 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +store> [return] ok 4245 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +store> [variable] ok 4246 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +store> [exception] ok 4247 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +store> [return] ok 4248 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +store> [variable] ok 4249 - my $x; $x->[0] = 1; exists $$x[1] <+strict +store> [exception] ok 4250 - my $x; $x->[0] = 1; exists $$x[1] <+strict +store> [return] ok 4251 - my $x; $x->[0] = 1; exists $$x[1] <+strict +store> [variable] ok 4252 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +store> [exception] ok 4253 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +store> [return] ok 4254 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +store> [variable] ok 4255 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +store> [exception] ok 4256 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +store> [return] ok 4257 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +store> [variable] ok 4258 - my @x; $x[0] = 1; exists $x[1] <+strict +store> [exception] ok 4259 - my @x; $x[0] = 1; exists $x[1] <+strict +store> [return] ok 4260 - my @x; $x[0] = 1; exists $x[1] <+strict +store> [variable] ok 4261 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +store> [exception] ok 4262 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +store> [return] ok 4263 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +store> [variable] ok 4264 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +store> [exception] ok 4265 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +store> [return] ok 4266 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +store> [variable] ok 4267 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [exception] ok 4268 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [return] ok 4269 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [variable] ok 4270 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [exception] ok 4271 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [return] ok 4272 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [variable] ok 4273 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [exception] ok 4274 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [return] ok 4275 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [variable] ok 4276 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [exception] ok 4277 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [return] ok 4278 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [variable] ok 4279 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [exception] ok 4280 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [return] ok 4281 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [variable] ok 4282 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [exception] ok 4283 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [return] ok 4284 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [variable] ok 4285 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [exception] ok 4286 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [return] ok 4287 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [variable] ok 4288 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [exception] ok 4289 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [return] ok 4290 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [variable] ok 4291 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [exception] ok 4292 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [return] ok 4293 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [variable] ok 4294 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [exception] ok 4295 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [return] ok 4296 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [variable] ok 4297 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [exception] ok 4298 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [return] ok 4299 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [variable] ok 4300 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [exception] ok 4301 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [return] ok 4302 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [variable] ok 4303 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [exception] ok 4304 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [return] ok 4305 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [variable] ok 4306 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [exception] ok 4307 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [return] ok 4308 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [variable] ok 4309 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [exception] ok 4310 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [return] ok 4311 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [variable] ok 4312 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [exception] ok 4313 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [return] ok 4314 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [variable] ok 4315 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [exception] ok 4316 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [return] ok 4317 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [variable] ok 4318 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [exception] ok 4319 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [return] ok 4320 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [variable] ok 4321 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [exception] ok 4322 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [return] ok 4323 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [variable] ok 4324 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [exception] ok 4325 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [return] ok 4326 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [variable] ok 4327 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [exception] ok 4328 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [return] ok 4329 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [variable] ok 4330 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [exception] ok 4331 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [return] ok 4332 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [variable] ok 4333 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [exception] ok 4334 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [return] ok 4335 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [variable] ok 4336 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [exception] ok 4337 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [return] ok 4338 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [variable] ok 4339 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [exception] ok 4340 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [return] ok 4341 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [variable] ok 4342 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [exception] ok 4343 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [return] ok 4344 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [variable] ok 4345 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [exception] ok 4346 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [return] ok 4347 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [variable] ok 4348 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [exception] ok 4349 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [return] ok 4350 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [variable] ok 4351 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [exception] ok 4352 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [return] ok 4353 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [variable] ok 4354 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [exception] ok 4355 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [return] ok 4356 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [variable] ok 4357 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [exception] ok 4358 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [return] ok 4359 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [variable] ok 4360 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [exception] ok 4361 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [return] ok 4362 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [variable] ok 4363 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [exception] ok 4364 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [return] ok 4365 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [variable] ok 4366 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [exception] ok 4367 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [return] ok 4368 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [variable] ok 4369 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [exception] ok 4370 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [return] ok 4371 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [variable] ok 4372 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [exception] ok 4373 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [return] ok 4374 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [variable] ok 4375 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [exception] ok 4376 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [return] ok 4377 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [variable] ok 4378 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [exception] ok 4379 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [return] ok 4380 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [variable] ok 4381 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [exception] ok 4382 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [return] ok 4383 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [variable] ok 4384 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [exception] ok 4385 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [return] ok 4386 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [variable] ok 4387 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [exception] ok 4388 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [return] ok 4389 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [variable] ok 4390 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [exception] ok 4391 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [return] ok 4392 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [variable] ok 4393 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [exception] ok 4394 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [return] ok 4395 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [variable] ok 4396 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [exception] ok 4397 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [return] ok 4398 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [variable] ok 4399 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [exception] ok 4400 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [return] ok 4401 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [variable] ok 4402 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [exception] ok 4403 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [return] ok 4404 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [variable] ok 4405 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [exception] ok 4406 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [return] ok 4407 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [variable] ok 4408 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [exception] ok 4409 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [return] ok 4410 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [variable] ok 4411 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [exception] ok 4412 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [return] ok 4413 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [variable] ok 4414 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [exception] ok 4415 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [return] ok 4416 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [variable] ok 4417 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [exception] ok 4418 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [return] ok 4419 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [variable] ok 4420 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [exception] ok 4421 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [return] ok 4422 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [variable] ok 4423 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [exception] ok 4424 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [return] ok 4425 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [variable] ok 4426 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [exception] ok 4427 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [return] ok 4428 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [variable] ok 4429 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [exception] ok 4430 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [return] ok 4431 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [variable] ok 4432 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [exception] ok 4433 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [return] ok 4434 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [variable] ok 4435 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [exception] ok 4436 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [return] ok 4437 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [variable] ok 4438 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [exception] ok 4439 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [return] ok 4440 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [variable] ok 4441 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [exception] ok 4442 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [return] ok 4443 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [variable] ok 4444 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [exception] ok 4445 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [return] ok 4446 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [variable] ok 4447 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [exception] ok 4448 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [return] ok 4449 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [variable] ok 4450 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [exception] ok 4451 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [return] ok 4452 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [variable] ok 4453 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [exception] ok 4454 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [return] ok 4455 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [variable] ok 4456 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [exception] ok 4457 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [return] ok 4458 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [variable] ok 4459 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [exception] ok 4460 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [return] ok 4461 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [variable] ok 4462 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [exception] ok 4463 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [return] ok 4464 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [variable] ok 4465 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [exception] ok 4466 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [return] ok 4467 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [variable] ok 4468 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [exception] ok 4469 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [return] ok 4470 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [variable] ok 4471 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [exception] ok 4472 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [return] ok 4473 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [variable] ok 4474 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [exception] ok 4475 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [return] ok 4476 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [variable] ok 4477 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [exception] ok 4478 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [return] ok 4479 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [variable] ok 4480 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [exception] ok 4481 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [return] ok 4482 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [variable] ok 4483 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [exception] ok 4484 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [return] ok 4485 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [variable] ok 4486 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [exception] ok 4487 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [return] ok 4488 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [variable] ok 4489 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [exception] ok 4490 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [return] ok 4491 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [variable] ok 4492 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [exception] ok 4493 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [return] ok 4494 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [variable] ok 4495 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [exception] ok 4496 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [return] ok 4497 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [variable] ok 4498 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [exception] ok 4499 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [return] ok 4500 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [variable] ok 4501 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [exception] ok 4502 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [return] ok 4503 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [variable] ok 4504 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [exception] ok 4505 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [return] ok 4506 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [variable] ok 4507 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [exception] ok 4508 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [return] ok 4509 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [variable] ok 4510 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [exception] ok 4511 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [return] ok 4512 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [variable] ok 4513 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [exception] ok 4514 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [return] ok 4515 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [variable] ok 4516 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [exception] ok 4517 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [return] ok 4518 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [variable] ok 4519 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [exception] ok 4520 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [return] ok 4521 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [variable] ok 4522 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [exception] ok 4523 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [return] ok 4524 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [variable] ok 4525 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [exception] ok 4526 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [return] ok 4527 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [variable] ok 4528 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [exception] ok 4529 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [return] ok 4530 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [variable] ok 4531 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [exception] ok 4532 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [return] ok 4533 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [variable] ok 4534 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [exception] ok 4535 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [return] ok 4536 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [variable] ok 4537 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [exception] ok 4538 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [return] ok 4539 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [variable] ok 4540 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [exception] ok 4541 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [return] ok 4542 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [variable] ok 4543 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [exception] ok 4544 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [return] ok 4545 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [variable] ok 4546 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [exception] ok 4547 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [return] ok 4548 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [variable] ok 4549 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [exception] ok 4550 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [return] ok 4551 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [variable] ok 4552 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [exception] ok 4553 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [return] ok 4554 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [variable] ok 4555 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [exception] ok 4556 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [return] ok 4557 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [variable] ok 4558 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [exception] ok 4559 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [return] ok 4560 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [variable] ok 4561 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [exception] ok 4562 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [return] ok 4563 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [variable] ok 4564 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [exception] ok 4565 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [return] ok 4566 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [variable] ok 4567 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [exception] ok 4568 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [return] ok 4569 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [variable] ok 4570 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [exception] ok 4571 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [return] ok 4572 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [variable] ok 4573 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [exception] ok 4574 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [return] ok 4575 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [variable] ok 4576 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [exception] ok 4577 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [return] ok 4578 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [variable] ok 4579 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [exception] ok 4580 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [return] ok 4581 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [variable] ok 4582 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [exception] ok 4583 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [return] ok 4584 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [variable] ok 4585 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [exception] ok 4586 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [return] ok 4587 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [variable] ok 4588 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [exception] ok 4589 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [return] ok 4590 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [variable] ok 4591 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [exception] ok 4592 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [return] ok 4593 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [variable] ok 4594 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [exception] ok 4595 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [return] ok 4596 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [variable] ok 4597 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [exception] ok 4598 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [return] ok 4599 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [variable] ok 4600 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [exception] ok 4601 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [return] ok 4602 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [variable] ok 4603 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [exception] ok 4604 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [return] ok 4605 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [variable] ok 4606 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [exception] ok 4607 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [return] ok 4608 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [variable] ok 4609 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [exception] ok 4610 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [return] ok 4611 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [variable] ok 4612 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [exception] ok 4613 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [return] ok 4614 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [variable] ok 4615 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [exception] ok 4616 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [return] ok 4617 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [variable] ok 4618 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [exception] ok 4619 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [return] ok 4620 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [variable] ok 4621 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [exception] ok 4622 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [return] ok 4623 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [variable] ok 4624 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [exception] ok 4625 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [return] ok 4626 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [variable] ok 4627 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [exception] ok 4628 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [return] ok 4629 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [variable] ok 4630 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [exception] ok 4631 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [return] ok 4632 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [variable] ok 4633 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [exception] ok 4634 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [return] ok 4635 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [variable] ok 4636 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [exception] ok 4637 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [return] ok 4638 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [variable] ok 4639 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [exception] ok 4640 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [return] ok 4641 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [variable] ok 4642 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [exception] ok 4643 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [return] ok 4644 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [variable] ok 4645 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [exception] ok 4646 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [return] ok 4647 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [variable] ok 4648 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [exception] ok 4649 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [return] ok 4650 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [variable] ok 4651 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [exception] ok 4652 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [return] ok 4653 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [variable] ok 4654 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [exception] ok 4655 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [return] ok 4656 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [variable] ok 4657 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [exception] ok 4658 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [return] ok 4659 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [variable] ok 4660 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [exception] ok 4661 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [return] ok 4662 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [variable] ok 4663 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [exception] ok 4664 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [return] ok 4665 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [variable] ok 4666 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [exception] ok 4667 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [return] ok 4668 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [variable] ok 4669 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [exception] ok 4670 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [return] ok 4671 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [variable] ok 4672 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [exception] ok 4673 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [return] ok 4674 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [variable] ok 4675 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [exception] ok 4676 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [return] ok 4677 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [variable] ok 4678 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [exception] ok 4679 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [return] ok 4680 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [variable] ok 4681 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [exception] ok 4682 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [return] ok 4683 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [variable] ok 4684 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [exception] ok 4685 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [return] ok 4686 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [variable] ok 4687 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [exception] ok 4688 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [return] ok 4689 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [variable] ok 4690 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [exception] ok 4691 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [return] ok 4692 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [variable] ok 4693 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [exception] ok 4694 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [return] ok 4695 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [variable] ok 4696 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [exception] ok 4697 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [return] ok 4698 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [variable] ok 4699 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [exception] ok 4700 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [return] ok 4701 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [variable] ok 4702 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [exception] ok 4703 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [return] ok 4704 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [variable] ok 4705 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [exception] ok 4706 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [return] ok 4707 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [variable] ok 4708 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [exception] ok 4709 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [return] ok 4710 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [variable] ok 4711 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [exception] ok 4712 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [return] ok 4713 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [variable] ok 4714 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [exception] ok 4715 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [return] ok 4716 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [variable] ok 4717 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [exception] ok 4718 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [return] ok 4719 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [variable] ok 4720 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [exception] ok 4721 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [return] ok 4722 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [variable] ok 4723 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [exception] ok 4724 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [return] ok 4725 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [variable] ok 4726 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [exception] ok 4727 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [return] ok 4728 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [variable] ok 4729 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [exception] ok 4730 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [return] ok 4731 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [variable] ok 4732 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [exception] ok 4733 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [return] ok 4734 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [variable] ok 4735 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [exception] ok 4736 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [return] ok 4737 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [variable] ok 4738 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [exception] ok 4739 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [return] ok 4740 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [variable] ok 4741 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [exception] ok 4742 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [return] ok 4743 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [variable] ok 4744 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [exception] ok 4745 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [return] ok 4746 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [variable] ok 4747 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [exception] ok 4748 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [return] ok 4749 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [variable] ok 4750 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [exception] ok 4751 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [return] ok 4752 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [variable] ok 4753 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [exception] ok 4754 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [return] ok 4755 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [variable] ok 4756 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [exception] ok 4757 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [return] ok 4758 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [variable] ok 4759 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [exception] ok 4760 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [return] ok 4761 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [variable] ok 4762 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [exception] ok 4763 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [return] ok 4764 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [variable] ok 4765 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [exception] ok 4766 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [return] ok 4767 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [variable] ok 4768 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [exception] ok 4769 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [return] ok 4770 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [variable] ok 4771 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [exception] ok 4772 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [return] ok 4773 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [variable] ok 4774 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [exception] ok 4775 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [return] ok 4776 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [variable] ok 4777 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [exception] ok 4778 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [return] ok 4779 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [variable] ok 4780 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [exception] ok 4781 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [return] ok 4782 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [variable] ok 4783 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [exception] ok 4784 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [return] ok 4785 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [variable] ok 4786 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [exception] ok 4787 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [return] ok 4788 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [variable] ok 4789 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [exception] ok 4790 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [return] ok 4791 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [variable] ok 4792 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [exception] ok 4793 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [return] ok 4794 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [variable] ok 4795 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [exception] ok 4796 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [return] ok 4797 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [variable] ok 4798 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [exception] ok 4799 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [return] ok 4800 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [variable] ok 4801 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [exception] ok 4802 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [return] ok 4803 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [variable] ok 4804 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [exception] ok 4805 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [return] ok 4806 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [variable] ok 4807 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [exception] ok 4808 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [return] ok 4809 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [variable] ok 4810 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [exception] ok 4811 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [return] ok 4812 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [variable] ok 4813 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [exception] ok 4814 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [return] ok 4815 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [variable] ok 4816 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [exception] ok 4817 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [return] ok 4818 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [variable] ok 4819 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [exception] ok 4820 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [return] ok 4821 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [variable] ok 4822 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [exception] ok 4823 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [return] ok 4824 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [variable] ok 4825 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [exception] ok 4826 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [return] ok 4827 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [variable] ok 4828 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [exception] ok 4829 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [return] ok 4830 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [variable] ok 4831 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [exception] ok 4832 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [return] ok 4833 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [variable] ok 4834 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [exception] ok 4835 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [return] ok 4836 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [variable] ok 4837 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [exception] ok 4838 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [return] ok 4839 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [variable] ok 4840 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [exception] ok 4841 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [return] ok 4842 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [variable] ok 4843 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [exception] ok 4844 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [return] ok 4845 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [variable] ok 4846 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [exception] ok 4847 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [return] ok 4848 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [variable] ok 4849 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [exception] ok 4850 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [return] ok 4851 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [variable] ok 4852 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [exception] ok 4853 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [return] ok 4854 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [variable] ok 4855 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [exception] ok 4856 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [return] ok 4857 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [variable] ok 4858 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [exception] ok 4859 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [return] ok 4860 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [variable] ok 4861 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [exception] ok 4862 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [return] ok 4863 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [variable] ok 4864 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [exception] ok 4865 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [return] ok 4866 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [variable] ok 4867 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [exception] ok 4868 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [return] ok 4869 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [variable] ok 4870 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [exception] ok 4871 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [return] ok 4872 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [variable] ok 4873 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [exception] ok 4874 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [return] ok 4875 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [variable] ok 4876 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [exception] ok 4877 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [return] ok 4878 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [variable] ok 4879 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [exception] ok 4880 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [return] ok 4881 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [variable] ok 4882 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [exception] ok 4883 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [return] ok 4884 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [variable] ok 4885 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [exception] ok 4886 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [return] ok 4887 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [variable] ok 4888 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [exception] ok 4889 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [return] ok 4890 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [variable] ok 4891 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [exception] ok 4892 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [return] ok 4893 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [variable] ok 4894 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [exception] ok 4895 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [return] ok 4896 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [variable] ok 4897 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [exception] ok 4898 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [return] ok 4899 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [variable] ok 4900 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [exception] ok 4901 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [return] ok 4902 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [variable] ok 4903 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [exception] ok 4904 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [return] ok 4905 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [variable] ok 4906 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [exception] ok 4907 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [return] ok 4908 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [variable] ok 4909 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [exception] ok 4910 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [return] ok 4911 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [variable] ok 4912 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [exception] ok 4913 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [return] ok 4914 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [variable] ok 4915 - my $x; delete $x->[0] [exception] ok 4916 - my $x; delete $x->[0] [return] ok 4917 - my $x; delete $x->[0] [variable] ok 4918 - our $x; local $x; use strict; delete $x->[0] [exception] ok 4919 - our $x; local $x; use strict; delete $x->[0] [return] ok 4920 - our $x; local $x; use strict; delete $x->[0] [variable] ok 4921 - our $x; local $x; no strict; delete $x->[0] [exception] ok 4922 - our $x; local $x; no strict; delete $x->[0] [return] ok 4923 - our $x; local $x; no strict; delete $x->[0] [variable] ok 4924 - my $x; delete $$x[0] [exception] ok 4925 - my $x; delete $$x[0] [return] ok 4926 - my $x; delete $$x[0] [variable] ok 4927 - our $x; local $x; use strict; delete $$x[0] [exception] ok 4928 - our $x; local $x; use strict; delete $$x[0] [return] ok 4929 - our $x; local $x; use strict; delete $$x[0] [variable] ok 4930 - our $x; local $x; no strict; delete $$x[0] [exception] ok 4931 - our $x; local $x; no strict; delete $$x[0] [return] ok 4932 - our $x; local $x; no strict; delete $$x[0] [variable] ok 4933 - my @x; delete $x[0] [exception] ok 4934 - my @x; delete $x[0] [return] ok 4935 - my @x; delete $x[0] [variable] ok 4936 - our @x; local @x; use strict; delete $x[0] [exception] ok 4937 - our @x; local @x; use strict; delete $x[0] [return] ok 4938 - our @x; local @x; use strict; delete $x[0] [variable] ok 4939 - our @x; local @x; no strict; delete $x[0] [exception] ok 4940 - our @x; local @x; no strict; delete $x[0] [return] ok 4941 - our @x; local @x; no strict; delete $x[0] [variable] ok 4942 - my $x; delete $x->[0] [exception] ok 4943 - my $x; delete $x->[0] [return] ok 4944 - my $x; delete $x->[0] [variable] ok 4945 - our $x; local $x; use strict; delete $x->[0] [exception] ok 4946 - our $x; local $x; use strict; delete $x->[0] [return] ok 4947 - our $x; local $x; use strict; delete $x->[0] [variable] ok 4948 - our $x; local $x; no strict; delete $x->[0] [exception] ok 4949 - our $x; local $x; no strict; delete $x->[0] [return] ok 4950 - our $x; local $x; no strict; delete $x->[0] [variable] ok 4951 - my $x; delete $$x[0] [exception] ok 4952 - my $x; delete $$x[0] [return] ok 4953 - my $x; delete $$x[0] [variable] ok 4954 - our $x; local $x; use strict; delete $$x[0] [exception] ok 4955 - our $x; local $x; use strict; delete $$x[0] [return] ok 4956 - our $x; local $x; use strict; delete $$x[0] [variable] ok 4957 - our $x; local $x; no strict; delete $$x[0] [exception] ok 4958 - our $x; local $x; no strict; delete $$x[0] [return] ok 4959 - our $x; local $x; no strict; delete $$x[0] [variable] ok 4960 - my @x; delete $x[0] [exception] ok 4961 - my @x; delete $x[0] [return] ok 4962 - my @x; delete $x[0] [variable] ok 4963 - our @x; local @x; use strict; delete $x[0] [exception] ok 4964 - our @x; local @x; use strict; delete $x[0] [return] ok 4965 - our @x; local @x; use strict; delete $x[0] [variable] ok 4966 - our @x; local @x; no strict; delete $x[0] [exception] ok 4967 - our @x; local @x; no strict; delete $x[0] [return] ok 4968 - our @x; local @x; no strict; delete $x[0] [variable] ok 4969 - my $x; delete $x->[0] <+fetch> [exception] ok 4970 - my $x; delete $x->[0] <+fetch> [return] ok 4971 - my $x; delete $x->[0] <+fetch> [variable] ok 4972 - our $x; local $x; use strict; delete $x->[0] <+fetch> [exception] ok 4973 - our $x; local $x; use strict; delete $x->[0] <+fetch> [return] ok 4974 - our $x; local $x; use strict; delete $x->[0] <+fetch> [variable] ok 4975 - our $x; local $x; no strict; delete $x->[0] <+fetch> [exception] ok 4976 - our $x; local $x; no strict; delete $x->[0] <+fetch> [return] ok 4977 - our $x; local $x; no strict; delete $x->[0] <+fetch> [variable] ok 4978 - my $x; delete $$x[0] <+fetch> [exception] ok 4979 - my $x; delete $$x[0] <+fetch> [return] ok 4980 - my $x; delete $$x[0] <+fetch> [variable] ok 4981 - our $x; local $x; use strict; delete $$x[0] <+fetch> [exception] ok 4982 - our $x; local $x; use strict; delete $$x[0] <+fetch> [return] ok 4983 - our $x; local $x; use strict; delete $$x[0] <+fetch> [variable] ok 4984 - our $x; local $x; no strict; delete $$x[0] <+fetch> [exception] ok 4985 - our $x; local $x; no strict; delete $$x[0] <+fetch> [return] ok 4986 - our $x; local $x; no strict; delete $$x[0] <+fetch> [variable] ok 4987 - my @x; delete $x[0] <+fetch> [exception] ok 4988 - my @x; delete $x[0] <+fetch> [return] ok 4989 - my @x; delete $x[0] <+fetch> [variable] ok 4990 - our @x; local @x; use strict; delete $x[0] <+fetch> [exception] ok 4991 - our @x; local @x; use strict; delete $x[0] <+fetch> [return] ok 4992 - our @x; local @x; use strict; delete $x[0] <+fetch> [variable] ok 4993 - our @x; local @x; no strict; delete $x[0] <+fetch> [exception] ok 4994 - our @x; local @x; no strict; delete $x[0] <+fetch> [return] ok 4995 - our @x; local @x; no strict; delete $x[0] <+fetch> [variable] ok 4996 - my $x; delete $x->[0] <+exists> [exception] ok 4997 - my $x; delete $x->[0] <+exists> [return] ok 4998 - my $x; delete $x->[0] <+exists> [variable] ok 4999 - our $x; local $x; use strict; delete $x->[0] <+exists> [exception] ok 5000 - our $x; local $x; use strict; delete $x->[0] <+exists> [return] ok 5001 - our $x; local $x; use strict; delete $x->[0] <+exists> [variable] ok 5002 - our $x; local $x; no strict; delete $x->[0] <+exists> [exception] ok 5003 - our $x; local $x; no strict; delete $x->[0] <+exists> [return] ok 5004 - our $x; local $x; no strict; delete $x->[0] <+exists> [variable] ok 5005 - my $x; delete $$x[0] <+exists> [exception] ok 5006 - my $x; delete $$x[0] <+exists> [return] ok 5007 - my $x; delete $$x[0] <+exists> [variable] ok 5008 - our $x; local $x; use strict; delete $$x[0] <+exists> [exception] ok 5009 - our $x; local $x; use strict; delete $$x[0] <+exists> [return] ok 5010 - our $x; local $x; use strict; delete $$x[0] <+exists> [variable] ok 5011 - our $x; local $x; no strict; delete $$x[0] <+exists> [exception] ok 5012 - our $x; local $x; no strict; delete $$x[0] <+exists> [return] ok 5013 - our $x; local $x; no strict; delete $$x[0] <+exists> [variable] ok 5014 - my @x; delete $x[0] <+exists> [exception] ok 5015 - my @x; delete $x[0] <+exists> [return] ok 5016 - my @x; delete $x[0] <+exists> [variable] ok 5017 - our @x; local @x; use strict; delete $x[0] <+exists> [exception] ok 5018 - our @x; local @x; use strict; delete $x[0] <+exists> [return] ok 5019 - our @x; local @x; use strict; delete $x[0] <+exists> [variable] ok 5020 - our @x; local @x; no strict; delete $x[0] <+exists> [exception] ok 5021 - our @x; local @x; no strict; delete $x[0] <+exists> [return] ok 5022 - our @x; local @x; no strict; delete $x[0] <+exists> [variable] ok 5023 - my $x; delete $x->[0] <+delete> [exception] ok 5024 - my $x; delete $x->[0] <+delete> [return] ok 5025 - my $x; delete $x->[0] <+delete> [variable] ok 5026 - our $x; local $x; use strict; delete $x->[0] <+delete> [exception] ok 5027 - our $x; local $x; use strict; delete $x->[0] <+delete> [return] ok 5028 - our $x; local $x; use strict; delete $x->[0] <+delete> [variable] ok 5029 - our $x; local $x; no strict; delete $x->[0] <+delete> [exception] ok 5030 - our $x; local $x; no strict; delete $x->[0] <+delete> [return] ok 5031 - our $x; local $x; no strict; delete $x->[0] <+delete> [variable] ok 5032 - my $x; delete $$x[0] <+delete> [exception] ok 5033 - my $x; delete $$x[0] <+delete> [return] ok 5034 - my $x; delete $$x[0] <+delete> [variable] ok 5035 - our $x; local $x; use strict; delete $$x[0] <+delete> [exception] ok 5036 - our $x; local $x; use strict; delete $$x[0] <+delete> [return] ok 5037 - our $x; local $x; use strict; delete $$x[0] <+delete> [variable] ok 5038 - our $x; local $x; no strict; delete $$x[0] <+delete> [exception] ok 5039 - our $x; local $x; no strict; delete $$x[0] <+delete> [return] ok 5040 - our $x; local $x; no strict; delete $$x[0] <+delete> [variable] ok 5041 - my @x; delete $x[0] <+delete> [exception] ok 5042 - my @x; delete $x[0] <+delete> [return] ok 5043 - my @x; delete $x[0] <+delete> [variable] ok 5044 - our @x; local @x; use strict; delete $x[0] <+delete> [exception] ok 5045 - our @x; local @x; use strict; delete $x[0] <+delete> [return] ok 5046 - our @x; local @x; use strict; delete $x[0] <+delete> [variable] ok 5047 - our @x; local @x; no strict; delete $x[0] <+delete> [exception] ok 5048 - our @x; local @x; no strict; delete $x[0] <+delete> [return] ok 5049 - our @x; local @x; no strict; delete $x[0] <+delete> [variable] ok 5050 - my $x; delete $x->[0] <+store> [exception] ok 5051 - my $x; delete $x->[0] <+store> [return] ok 5052 - my $x; delete $x->[0] <+store> [variable] ok 5053 - our $x; local $x; use strict; delete $x->[0] <+store> [exception] ok 5054 - our $x; local $x; use strict; delete $x->[0] <+store> [return] ok 5055 - our $x; local $x; use strict; delete $x->[0] <+store> [variable] ok 5056 - our $x; local $x; no strict; delete $x->[0] <+store> [exception] ok 5057 - our $x; local $x; no strict; delete $x->[0] <+store> [return] ok 5058 - our $x; local $x; no strict; delete $x->[0] <+store> [variable] ok 5059 - my $x; delete $$x[0] <+store> [exception] ok 5060 - my $x; delete $$x[0] <+store> [return] ok 5061 - my $x; delete $$x[0] <+store> [variable] ok 5062 - our $x; local $x; use strict; delete $$x[0] <+store> [exception] ok 5063 - our $x; local $x; use strict; delete $$x[0] <+store> [return] ok 5064 - our $x; local $x; use strict; delete $$x[0] <+store> [variable] ok 5065 - our $x; local $x; no strict; delete $$x[0] <+store> [exception] ok 5066 - our $x; local $x; no strict; delete $$x[0] <+store> [return] ok 5067 - our $x; local $x; no strict; delete $$x[0] <+store> [variable] ok 5068 - my @x; delete $x[0] <+store> [exception] ok 5069 - my @x; delete $x[0] <+store> [return] ok 5070 - my @x; delete $x[0] <+store> [variable] ok 5071 - our @x; local @x; use strict; delete $x[0] <+store> [exception] ok 5072 - our @x; local @x; use strict; delete $x[0] <+store> [return] ok 5073 - our @x; local @x; use strict; delete $x[0] <+store> [variable] ok 5074 - our @x; local @x; no strict; delete $x[0] <+store> [exception] ok 5075 - our @x; local @x; no strict; delete $x[0] <+store> [return] ok 5076 - our @x; local @x; no strict; delete $x[0] <+store> [variable] ok 5077 - my $x; delete $x->[0] <+strict +fetch> [exception] ok 5078 - my $x; delete $x->[0] <+strict +fetch> [return] ok 5079 - my $x; delete $x->[0] <+strict +fetch> [variable] ok 5080 - our $x; local $x; use strict; delete $x->[0] <+strict +fetch> [exception] ok 5081 - our $x; local $x; use strict; delete $x->[0] <+strict +fetch> [return] ok 5082 - our $x; local $x; use strict; delete $x->[0] <+strict +fetch> [variable] ok 5083 - our $x; local $x; no strict; delete $x->[0] <+strict +fetch> [exception] ok 5084 - our $x; local $x; no strict; delete $x->[0] <+strict +fetch> [return] ok 5085 - our $x; local $x; no strict; delete $x->[0] <+strict +fetch> [variable] ok 5086 - my $x; delete $$x[0] <+strict +fetch> [exception] ok 5087 - my $x; delete $$x[0] <+strict +fetch> [return] ok 5088 - my $x; delete $$x[0] <+strict +fetch> [variable] ok 5089 - our $x; local $x; use strict; delete $$x[0] <+strict +fetch> [exception] ok 5090 - our $x; local $x; use strict; delete $$x[0] <+strict +fetch> [return] ok 5091 - our $x; local $x; use strict; delete $$x[0] <+strict +fetch> [variable] ok 5092 - our $x; local $x; no strict; delete $$x[0] <+strict +fetch> [exception] ok 5093 - our $x; local $x; no strict; delete $$x[0] <+strict +fetch> [return] ok 5094 - our $x; local $x; no strict; delete $$x[0] <+strict +fetch> [variable] ok 5095 - my @x; delete $x[0] <+strict +fetch> [exception] ok 5096 - my @x; delete $x[0] <+strict +fetch> [return] ok 5097 - my @x; delete $x[0] <+strict +fetch> [variable] ok 5098 - our @x; local @x; use strict; delete $x[0] <+strict +fetch> [exception] ok 5099 - our @x; local @x; use strict; delete $x[0] <+strict +fetch> [return] ok 5100 - our @x; local @x; use strict; delete $x[0] <+strict +fetch> [variable] ok 5101 - our @x; local @x; no strict; delete $x[0] <+strict +fetch> [exception] ok 5102 - our @x; local @x; no strict; delete $x[0] <+strict +fetch> [return] ok 5103 - our @x; local @x; no strict; delete $x[0] <+strict +fetch> [variable] ok 5104 - my $x; delete $x->[0] <+strict +exists> [exception] ok 5105 - my $x; delete $x->[0] <+strict +exists> [return] ok 5106 - my $x; delete $x->[0] <+strict +exists> [variable] ok 5107 - our $x; local $x; use strict; delete $x->[0] <+strict +exists> [exception] ok 5108 - our $x; local $x; use strict; delete $x->[0] <+strict +exists> [return] ok 5109 - our $x; local $x; use strict; delete $x->[0] <+strict +exists> [variable] ok 5110 - our $x; local $x; no strict; delete $x->[0] <+strict +exists> [exception] ok 5111 - our $x; local $x; no strict; delete $x->[0] <+strict +exists> [return] ok 5112 - our $x; local $x; no strict; delete $x->[0] <+strict +exists> [variable] ok 5113 - my $x; delete $$x[0] <+strict +exists> [exception] ok 5114 - my $x; delete $$x[0] <+strict +exists> [return] ok 5115 - my $x; delete $$x[0] <+strict +exists> [variable] ok 5116 - our $x; local $x; use strict; delete $$x[0] <+strict +exists> [exception] ok 5117 - our $x; local $x; use strict; delete $$x[0] <+strict +exists> [return] ok 5118 - our $x; local $x; use strict; delete $$x[0] <+strict +exists> [variable] ok 5119 - our $x; local $x; no strict; delete $$x[0] <+strict +exists> [exception] ok 5120 - our $x; local $x; no strict; delete $$x[0] <+strict +exists> [return] ok 5121 - our $x; local $x; no strict; delete $$x[0] <+strict +exists> [variable] ok 5122 - my @x; delete $x[0] <+strict +exists> [exception] ok 5123 - my @x; delete $x[0] <+strict +exists> [return] ok 5124 - my @x; delete $x[0] <+strict +exists> [variable] ok 5125 - our @x; local @x; use strict; delete $x[0] <+strict +exists> [exception] ok 5126 - our @x; local @x; use strict; delete $x[0] <+strict +exists> [return] ok 5127 - our @x; local @x; use strict; delete $x[0] <+strict +exists> [variable] ok 5128 - our @x; local @x; no strict; delete $x[0] <+strict +exists> [exception] ok 5129 - our @x; local @x; no strict; delete $x[0] <+strict +exists> [return] ok 5130 - our @x; local @x; no strict; delete $x[0] <+strict +exists> [variable] ok 5131 - my $x; delete $x->[0] <+strict +delete> [exception] ok 5132 - my $x; delete $x->[0] <+strict +delete> [return] ok 5133 - my $x; delete $x->[0] <+strict +delete> [variable] ok 5134 - our $x; local $x; use strict; delete $x->[0] <+strict +delete> [exception] ok 5135 - our $x; local $x; use strict; delete $x->[0] <+strict +delete> [return] ok 5136 - our $x; local $x; use strict; delete $x->[0] <+strict +delete> [variable] ok 5137 - our $x; local $x; no strict; delete $x->[0] <+strict +delete> [exception] ok 5138 - our $x; local $x; no strict; delete $x->[0] <+strict +delete> [return] ok 5139 - our $x; local $x; no strict; delete $x->[0] <+strict +delete> [variable] ok 5140 - my $x; delete $$x[0] <+strict +delete> [exception] ok 5141 - my $x; delete $$x[0] <+strict +delete> [return] ok 5142 - my $x; delete $$x[0] <+strict +delete> [variable] ok 5143 - our $x; local $x; use strict; delete $$x[0] <+strict +delete> [exception] ok 5144 - our $x; local $x; use strict; delete $$x[0] <+strict +delete> [return] ok 5145 - our $x; local $x; use strict; delete $$x[0] <+strict +delete> [variable] ok 5146 - our $x; local $x; no strict; delete $$x[0] <+strict +delete> [exception] ok 5147 - our $x; local $x; no strict; delete $$x[0] <+strict +delete> [return] ok 5148 - our $x; local $x; no strict; delete $$x[0] <+strict +delete> [variable] ok 5149 - my @x; 1 <+strict +delete> [exception] ok 5150 - my @x; 1 <+strict +delete> [return] ok 5151 - my @x; 1 <+strict +delete> [variable] ok 5152 - our @x; local @x; use strict; 1 <+strict +delete> [exception] ok 5153 - our @x; local @x; use strict; 1 <+strict +delete> [return] ok 5154 - our @x; local @x; use strict; 1 <+strict +delete> [variable] ok 5155 - our @x; local @x; no strict; 1 <+strict +delete> [exception] ok 5156 - our @x; local @x; no strict; 1 <+strict +delete> [return] ok 5157 - our @x; local @x; no strict; 1 <+strict +delete> [variable] ok 5158 - my $x; delete $x->[0] <+strict +store> [exception] ok 5159 - my $x; delete $x->[0] <+strict +store> [return] ok 5160 - my $x; delete $x->[0] <+strict +store> [variable] ok 5161 - our $x; local $x; use strict; delete $x->[0] <+strict +store> [exception] ok 5162 - our $x; local $x; use strict; delete $x->[0] <+strict +store> [return] ok 5163 - our $x; local $x; use strict; delete $x->[0] <+strict +store> [variable] ok 5164 - our $x; local $x; no strict; delete $x->[0] <+strict +store> [exception] ok 5165 - our $x; local $x; no strict; delete $x->[0] <+strict +store> [return] ok 5166 - our $x; local $x; no strict; delete $x->[0] <+strict +store> [variable] ok 5167 - my $x; delete $$x[0] <+strict +store> [exception] ok 5168 - my $x; delete $$x[0] <+strict +store> [return] ok 5169 - my $x; delete $$x[0] <+strict +store> [variable] ok 5170 - our $x; local $x; use strict; delete $$x[0] <+strict +store> [exception] ok 5171 - our $x; local $x; use strict; delete $$x[0] <+strict +store> [return] ok 5172 - our $x; local $x; use strict; delete $$x[0] <+strict +store> [variable] ok 5173 - our $x; local $x; no strict; delete $$x[0] <+strict +store> [exception] ok 5174 - our $x; local $x; no strict; delete $$x[0] <+strict +store> [return] ok 5175 - our $x; local $x; no strict; delete $$x[0] <+strict +store> [variable] ok 5176 - my @x; delete $x[0] <+strict +store> [exception] ok 5177 - my @x; delete $x[0] <+strict +store> [return] ok 5178 - my @x; delete $x[0] <+strict +store> [variable] ok 5179 - our @x; local @x; use strict; delete $x[0] <+strict +store> [exception] ok 5180 - our @x; local @x; use strict; delete $x[0] <+strict +store> [return] ok 5181 - our @x; local @x; use strict; delete $x[0] <+strict +store> [variable] ok 5182 - our @x; local @x; no strict; delete $x[0] <+strict +store> [exception] ok 5183 - our @x; local @x; no strict; delete $x[0] <+strict +store> [return] ok 5184 - our @x; local @x; no strict; delete $x[0] <+strict +store> [variable] ok 5185 - my $x; delete $x->[0]->[1] [exception] ok 5186 - my $x; delete $x->[0]->[1] [return] ok 5187 - my $x; delete $x->[0]->[1] [variable] ok 5188 - our $x; local $x; use strict; delete $x->[0]->[1] [exception] ok 5189 - our $x; local $x; use strict; delete $x->[0]->[1] [return] ok 5190 - our $x; local $x; use strict; delete $x->[0]->[1] [variable] ok 5191 - our $x; local $x; no strict; delete $x->[0]->[1] [exception] ok 5192 - our $x; local $x; no strict; delete $x->[0]->[1] [return] ok 5193 - our $x; local $x; no strict; delete $x->[0]->[1] [variable] ok 5194 - my $x; delete $$x[0]->[1] [exception] ok 5195 - my $x; delete $$x[0]->[1] [return] ok 5196 - my $x; delete $$x[0]->[1] [variable] ok 5197 - our $x; local $x; use strict; delete $$x[0]->[1] [exception] ok 5198 - our $x; local $x; use strict; delete $$x[0]->[1] [return] ok 5199 - our $x; local $x; use strict; delete $$x[0]->[1] [variable] ok 5200 - our $x; local $x; no strict; delete $$x[0]->[1] [exception] ok 5201 - our $x; local $x; no strict; delete $$x[0]->[1] [return] ok 5202 - our $x; local $x; no strict; delete $$x[0]->[1] [variable] ok 5203 - my @x; delete $x[0]->[1] [exception] ok 5204 - my @x; delete $x[0]->[1] [return] ok 5205 - my @x; delete $x[0]->[1] [variable] ok 5206 - our @x; local @x; use strict; delete $x[0]->[1] [exception] ok 5207 - our @x; local @x; use strict; delete $x[0]->[1] [return] ok 5208 - our @x; local @x; use strict; delete $x[0]->[1] [variable] ok 5209 - our @x; local @x; no strict; delete $x[0]->[1] [exception] ok 5210 - our @x; local @x; no strict; delete $x[0]->[1] [return] ok 5211 - our @x; local @x; no strict; delete $x[0]->[1] [variable] ok 5212 - my $x; delete $x->[0]->[1] [exception] ok 5213 - my $x; delete $x->[0]->[1] [return] ok 5214 - my $x; delete $x->[0]->[1] [variable] ok 5215 - our $x; local $x; use strict; delete $x->[0]->[1] [exception] ok 5216 - our $x; local $x; use strict; delete $x->[0]->[1] [return] ok 5217 - our $x; local $x; use strict; delete $x->[0]->[1] [variable] ok 5218 - our $x; local $x; no strict; delete $x->[0]->[1] [exception] ok 5219 - our $x; local $x; no strict; delete $x->[0]->[1] [return] ok 5220 - our $x; local $x; no strict; delete $x->[0]->[1] [variable] ok 5221 - my $x; delete $$x[0]->[1] [exception] ok 5222 - my $x; delete $$x[0]->[1] [return] ok 5223 - my $x; delete $$x[0]->[1] [variable] ok 5224 - our $x; local $x; use strict; delete $$x[0]->[1] [exception] ok 5225 - our $x; local $x; use strict; delete $$x[0]->[1] [return] ok 5226 - our $x; local $x; use strict; delete $$x[0]->[1] [variable] ok 5227 - our $x; local $x; no strict; delete $$x[0]->[1] [exception] ok 5228 - our $x; local $x; no strict; delete $$x[0]->[1] [return] ok 5229 - our $x; local $x; no strict; delete $$x[0]->[1] [variable] ok 5230 - my @x; delete $x[0]->[1] [exception] ok 5231 - my @x; delete $x[0]->[1] [return] ok 5232 - my @x; delete $x[0]->[1] [variable] ok 5233 - our @x; local @x; use strict; delete $x[0]->[1] [exception] ok 5234 - our @x; local @x; use strict; delete $x[0]->[1] [return] ok 5235 - our @x; local @x; use strict; delete $x[0]->[1] [variable] ok 5236 - our @x; local @x; no strict; delete $x[0]->[1] [exception] ok 5237 - our @x; local @x; no strict; delete $x[0]->[1] [return] ok 5238 - our @x; local @x; no strict; delete $x[0]->[1] [variable] ok 5239 - my $x; delete $x->[0]->[1] <+fetch> [exception] ok 5240 - my $x; delete $x->[0]->[1] <+fetch> [return] ok 5241 - my $x; delete $x->[0]->[1] <+fetch> [variable] ok 5242 - our $x; local $x; use strict; delete $x->[0]->[1] <+fetch> [exception] ok 5243 - our $x; local $x; use strict; delete $x->[0]->[1] <+fetch> [return] ok 5244 - our $x; local $x; use strict; delete $x->[0]->[1] <+fetch> [variable] ok 5245 - our $x; local $x; no strict; delete $x->[0]->[1] <+fetch> [exception] ok 5246 - our $x; local $x; no strict; delete $x->[0]->[1] <+fetch> [return] ok 5247 - our $x; local $x; no strict; delete $x->[0]->[1] <+fetch> [variable] ok 5248 - my $x; delete $$x[0]->[1] <+fetch> [exception] ok 5249 - my $x; delete $$x[0]->[1] <+fetch> [return] ok 5250 - my $x; delete $$x[0]->[1] <+fetch> [variable] ok 5251 - our $x; local $x; use strict; delete $$x[0]->[1] <+fetch> [exception] ok 5252 - our $x; local $x; use strict; delete $$x[0]->[1] <+fetch> [return] ok 5253 - our $x; local $x; use strict; delete $$x[0]->[1] <+fetch> [variable] ok 5254 - our $x; local $x; no strict; delete $$x[0]->[1] <+fetch> [exception] ok 5255 - our $x; local $x; no strict; delete $$x[0]->[1] <+fetch> [return] ok 5256 - our $x; local $x; no strict; delete $$x[0]->[1] <+fetch> [variable] ok 5257 - my @x; delete $x[0]->[1] <+fetch> [exception] ok 5258 - my @x; delete $x[0]->[1] <+fetch> [return] ok 5259 - my @x; delete $x[0]->[1] <+fetch> [variable] ok 5260 - our @x; local @x; use strict; delete $x[0]->[1] <+fetch> [exception] ok 5261 - our @x; local @x; use strict; delete $x[0]->[1] <+fetch> [return] ok 5262 - our @x; local @x; use strict; delete $x[0]->[1] <+fetch> [variable] ok 5263 - our @x; local @x; no strict; delete $x[0]->[1] <+fetch> [exception] ok 5264 - our @x; local @x; no strict; delete $x[0]->[1] <+fetch> [return] ok 5265 - our @x; local @x; no strict; delete $x[0]->[1] <+fetch> [variable] ok 5266 - my $x; delete $x->[0]->[1] <+exists> [exception] ok 5267 - my $x; delete $x->[0]->[1] <+exists> [return] ok 5268 - my $x; delete $x->[0]->[1] <+exists> [variable] ok 5269 - our $x; local $x; use strict; delete $x->[0]->[1] <+exists> [exception] ok 5270 - our $x; local $x; use strict; delete $x->[0]->[1] <+exists> [return] ok 5271 - our $x; local $x; use strict; delete $x->[0]->[1] <+exists> [variable] ok 5272 - our $x; local $x; no strict; delete $x->[0]->[1] <+exists> [exception] ok 5273 - our $x; local $x; no strict; delete $x->[0]->[1] <+exists> [return] ok 5274 - our $x; local $x; no strict; delete $x->[0]->[1] <+exists> [variable] ok 5275 - my $x; delete $$x[0]->[1] <+exists> [exception] ok 5276 - my $x; delete $$x[0]->[1] <+exists> [return] ok 5277 - my $x; delete $$x[0]->[1] <+exists> [variable] ok 5278 - our $x; local $x; use strict; delete $$x[0]->[1] <+exists> [exception] ok 5279 - our $x; local $x; use strict; delete $$x[0]->[1] <+exists> [return] ok 5280 - our $x; local $x; use strict; delete $$x[0]->[1] <+exists> [variable] ok 5281 - our $x; local $x; no strict; delete $$x[0]->[1] <+exists> [exception] ok 5282 - our $x; local $x; no strict; delete $$x[0]->[1] <+exists> [return] ok 5283 - our $x; local $x; no strict; delete $$x[0]->[1] <+exists> [variable] ok 5284 - my @x; delete $x[0]->[1] <+exists> [exception] ok 5285 - my @x; delete $x[0]->[1] <+exists> [return] ok 5286 - my @x; delete $x[0]->[1] <+exists> [variable] ok 5287 - our @x; local @x; use strict; delete $x[0]->[1] <+exists> [exception] ok 5288 - our @x; local @x; use strict; delete $x[0]->[1] <+exists> [return] ok 5289 - our @x; local @x; use strict; delete $x[0]->[1] <+exists> [variable] ok 5290 - our @x; local @x; no strict; delete $x[0]->[1] <+exists> [exception] ok 5291 - our @x; local @x; no strict; delete $x[0]->[1] <+exists> [return] ok 5292 - our @x; local @x; no strict; delete $x[0]->[1] <+exists> [variable] ok 5293 - my $x; delete $x->[0]->[1] <+delete> [exception] ok 5294 - my $x; delete $x->[0]->[1] <+delete> [return] ok 5295 - my $x; delete $x->[0]->[1] <+delete> [variable] ok 5296 - our $x; local $x; use strict; delete $x->[0]->[1] <+delete> [exception] ok 5297 - our $x; local $x; use strict; delete $x->[0]->[1] <+delete> [return] ok 5298 - our $x; local $x; use strict; delete $x->[0]->[1] <+delete> [variable] ok 5299 - our $x; local $x; no strict; delete $x->[0]->[1] <+delete> [exception] ok 5300 - our $x; local $x; no strict; delete $x->[0]->[1] <+delete> [return] ok 5301 - our $x; local $x; no strict; delete $x->[0]->[1] <+delete> [variable] ok 5302 - my $x; delete $$x[0]->[1] <+delete> [exception] ok 5303 - my $x; delete $$x[0]->[1] <+delete> [return] ok 5304 - my $x; delete $$x[0]->[1] <+delete> [variable] ok 5305 - our $x; local $x; use strict; delete $$x[0]->[1] <+delete> [exception] ok 5306 - our $x; local $x; use strict; delete $$x[0]->[1] <+delete> [return] ok 5307 - our $x; local $x; use strict; delete $$x[0]->[1] <+delete> [variable] ok 5308 - our $x; local $x; no strict; delete $$x[0]->[1] <+delete> [exception] ok 5309 - our $x; local $x; no strict; delete $$x[0]->[1] <+delete> [return] ok 5310 - our $x; local $x; no strict; delete $$x[0]->[1] <+delete> [variable] ok 5311 - my @x; delete $x[0]->[1] <+delete> [exception] ok 5312 - my @x; delete $x[0]->[1] <+delete> [return] ok 5313 - my @x; delete $x[0]->[1] <+delete> [variable] ok 5314 - our @x; local @x; use strict; delete $x[0]->[1] <+delete> [exception] ok 5315 - our @x; local @x; use strict; delete $x[0]->[1] <+delete> [return] ok 5316 - our @x; local @x; use strict; delete $x[0]->[1] <+delete> [variable] ok 5317 - our @x; local @x; no strict; delete $x[0]->[1] <+delete> [exception] ok 5318 - our @x; local @x; no strict; delete $x[0]->[1] <+delete> [return] ok 5319 - our @x; local @x; no strict; delete $x[0]->[1] <+delete> [variable] ok 5320 - my $x; delete $x->[0]->[1] <+store> [exception] ok 5321 - my $x; delete $x->[0]->[1] <+store> [return] ok 5322 - my $x; delete $x->[0]->[1] <+store> [variable] ok 5323 - our $x; local $x; use strict; delete $x->[0]->[1] <+store> [exception] ok 5324 - our $x; local $x; use strict; delete $x->[0]->[1] <+store> [return] ok 5325 - our $x; local $x; use strict; delete $x->[0]->[1] <+store> [variable] ok 5326 - our $x; local $x; no strict; delete $x->[0]->[1] <+store> [exception] ok 5327 - our $x; local $x; no strict; delete $x->[0]->[1] <+store> [return] ok 5328 - our $x; local $x; no strict; delete $x->[0]->[1] <+store> [variable] ok 5329 - my $x; delete $$x[0]->[1] <+store> [exception] ok 5330 - my $x; delete $$x[0]->[1] <+store> [return] ok 5331 - my $x; delete $$x[0]->[1] <+store> [variable] ok 5332 - our $x; local $x; use strict; delete $$x[0]->[1] <+store> [exception] ok 5333 - our $x; local $x; use strict; delete $$x[0]->[1] <+store> [return] ok 5334 - our $x; local $x; use strict; delete $$x[0]->[1] <+store> [variable] ok 5335 - our $x; local $x; no strict; delete $$x[0]->[1] <+store> [exception] ok 5336 - our $x; local $x; no strict; delete $$x[0]->[1] <+store> [return] ok 5337 - our $x; local $x; no strict; delete $$x[0]->[1] <+store> [variable] ok 5338 - my @x; delete $x[0]->[1] <+store> [exception] ok 5339 - my @x; delete $x[0]->[1] <+store> [return] ok 5340 - my @x; delete $x[0]->[1] <+store> [variable] ok 5341 - our @x; local @x; use strict; delete $x[0]->[1] <+store> [exception] ok 5342 - our @x; local @x; use strict; delete $x[0]->[1] <+store> [return] ok 5343 - our @x; local @x; use strict; delete $x[0]->[1] <+store> [variable] ok 5344 - our @x; local @x; no strict; delete $x[0]->[1] <+store> [exception] ok 5345 - our @x; local @x; no strict; delete $x[0]->[1] <+store> [return] ok 5346 - our @x; local @x; no strict; delete $x[0]->[1] <+store> [variable] ok 5347 - my $x; delete $x->[0]->[1] <+strict +fetch> [exception] ok 5348 - my $x; delete $x->[0]->[1] <+strict +fetch> [return] ok 5349 - my $x; delete $x->[0]->[1] <+strict +fetch> [variable] ok 5350 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +fetch> [exception] ok 5351 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +fetch> [return] ok 5352 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +fetch> [variable] ok 5353 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +fetch> [exception] ok 5354 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +fetch> [return] ok 5355 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +fetch> [variable] ok 5356 - my $x; delete $$x[0]->[1] <+strict +fetch> [exception] ok 5357 - my $x; delete $$x[0]->[1] <+strict +fetch> [return] ok 5358 - my $x; delete $$x[0]->[1] <+strict +fetch> [variable] ok 5359 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +fetch> [exception] ok 5360 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +fetch> [return] ok 5361 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +fetch> [variable] ok 5362 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +fetch> [exception] ok 5363 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +fetch> [return] ok 5364 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +fetch> [variable] ok 5365 - my @x; delete $x[0]->[1] <+strict +fetch> [exception] ok 5366 - my @x; delete $x[0]->[1] <+strict +fetch> [return] ok 5367 - my @x; delete $x[0]->[1] <+strict +fetch> [variable] ok 5368 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +fetch> [exception] ok 5369 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +fetch> [return] ok 5370 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +fetch> [variable] ok 5371 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +fetch> [exception] ok 5372 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +fetch> [return] ok 5373 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +fetch> [variable] ok 5374 - my $x; delete $x->[0]->[1] <+strict +exists> [exception] ok 5375 - my $x; delete $x->[0]->[1] <+strict +exists> [return] ok 5376 - my $x; delete $x->[0]->[1] <+strict +exists> [variable] ok 5377 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +exists> [exception] ok 5378 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +exists> [return] ok 5379 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +exists> [variable] ok 5380 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +exists> [exception] ok 5381 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +exists> [return] ok 5382 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +exists> [variable] ok 5383 - my $x; delete $$x[0]->[1] <+strict +exists> [exception] ok 5384 - my $x; delete $$x[0]->[1] <+strict +exists> [return] ok 5385 - my $x; delete $$x[0]->[1] <+strict +exists> [variable] ok 5386 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +exists> [exception] ok 5387 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +exists> [return] ok 5388 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +exists> [variable] ok 5389 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +exists> [exception] ok 5390 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +exists> [return] ok 5391 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +exists> [variable] ok 5392 - my @x; delete $x[0]->[1] <+strict +exists> [exception] ok 5393 - my @x; delete $x[0]->[1] <+strict +exists> [return] ok 5394 - my @x; delete $x[0]->[1] <+strict +exists> [variable] ok 5395 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +exists> [exception] ok 5396 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +exists> [return] ok 5397 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +exists> [variable] ok 5398 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +exists> [exception] ok 5399 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +exists> [return] ok 5400 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +exists> [variable] ok 5401 - my $x; delete $x->[0]->[1] <+strict +delete> [exception] ok 5402 - my $x; delete $x->[0]->[1] <+strict +delete> [return] ok 5403 - my $x; delete $x->[0]->[1] <+strict +delete> [variable] ok 5404 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +delete> [exception] ok 5405 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +delete> [return] ok 5406 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +delete> [variable] ok 5407 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +delete> [exception] ok 5408 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +delete> [return] ok 5409 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +delete> [variable] ok 5410 - my $x; delete $$x[0]->[1] <+strict +delete> [exception] ok 5411 - my $x; delete $$x[0]->[1] <+strict +delete> [return] ok 5412 - my $x; delete $$x[0]->[1] <+strict +delete> [variable] ok 5413 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +delete> [exception] ok 5414 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +delete> [return] ok 5415 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +delete> [variable] ok 5416 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +delete> [exception] ok 5417 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +delete> [return] ok 5418 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +delete> [variable] ok 5419 - my @x; delete $x[0]->[1] <+strict +delete> [exception] ok 5420 - my @x; delete $x[0]->[1] <+strict +delete> [return] ok 5421 - my @x; delete $x[0]->[1] <+strict +delete> [variable] ok 5422 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +delete> [exception] ok 5423 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +delete> [return] ok 5424 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +delete> [variable] ok 5425 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +delete> [exception] ok 5426 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +delete> [return] ok 5427 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +delete> [variable] ok 5428 - my $x; delete $x->[0]->[1] <+strict +store> [exception] ok 5429 - my $x; delete $x->[0]->[1] <+strict +store> [return] ok 5430 - my $x; delete $x->[0]->[1] <+strict +store> [variable] ok 5431 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +store> [exception] ok 5432 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +store> [return] ok 5433 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +store> [variable] ok 5434 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +store> [exception] ok 5435 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +store> [return] ok 5436 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +store> [variable] ok 5437 - my $x; delete $$x[0]->[1] <+strict +store> [exception] ok 5438 - my $x; delete $$x[0]->[1] <+strict +store> [return] ok 5439 - my $x; delete $$x[0]->[1] <+strict +store> [variable] ok 5440 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +store> [exception] ok 5441 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +store> [return] ok 5442 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +store> [variable] ok 5443 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +store> [exception] ok 5444 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +store> [return] ok 5445 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +store> [variable] ok 5446 - my @x; delete $x[0]->[1] <+strict +store> [exception] ok 5447 - my @x; delete $x[0]->[1] <+strict +store> [return] ok 5448 - my @x; delete $x[0]->[1] <+strict +store> [variable] ok 5449 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +store> [exception] ok 5450 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +store> [return] ok 5451 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +store> [variable] ok 5452 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +store> [exception] ok 5453 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +store> [return] ok 5454 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +store> [variable] ok 5455 - my $x; $x->[0] = 1; delete $x->[0] <+fetch> [exception] ok 5456 - my $x; $x->[0] = 1; delete $x->[0] <+fetch> [return] ok 5457 - my $x; $x->[0] = 1; delete $x->[0] <+fetch> [variable] ok 5458 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+fetch> [exception] ok 5459 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+fetch> [return] ok 5460 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+fetch> [variable] ok 5461 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+fetch> [exception] ok 5462 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+fetch> [return] ok 5463 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+fetch> [variable] ok 5464 - my $x; $x->[0] = 1; delete $$x[0] <+fetch> [exception] ok 5465 - my $x; $x->[0] = 1; delete $$x[0] <+fetch> [return] ok 5466 - my $x; $x->[0] = 1; delete $$x[0] <+fetch> [variable] ok 5467 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+fetch> [exception] ok 5468 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+fetch> [return] ok 5469 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+fetch> [variable] ok 5470 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+fetch> [exception] ok 5471 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+fetch> [return] ok 5472 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+fetch> [variable] ok 5473 - my @x; $x[0] = 1; delete $x[0] <+fetch> [exception] ok 5474 - my @x; $x[0] = 1; delete $x[0] <+fetch> [return] ok 5475 - my @x; $x[0] = 1; delete $x[0] <+fetch> [variable] ok 5476 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+fetch> [exception] ok 5477 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+fetch> [return] ok 5478 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+fetch> [variable] ok 5479 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+fetch> [exception] ok 5480 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+fetch> [return] ok 5481 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+fetch> [variable] ok 5482 - my $x; $x->[0] = 1; delete $x->[1] <+fetch> [exception] ok 5483 - my $x; $x->[0] = 1; delete $x->[1] <+fetch> [return] ok 5484 - my $x; $x->[0] = 1; delete $x->[1] <+fetch> [variable] ok 5485 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+fetch> [exception] ok 5486 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+fetch> [return] ok 5487 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+fetch> [variable] ok 5488 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+fetch> [exception] ok 5489 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+fetch> [return] ok 5490 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+fetch> [variable] ok 5491 - my $x; $x->[0] = 1; delete $$x[1] <+fetch> [exception] ok 5492 - my $x; $x->[0] = 1; delete $$x[1] <+fetch> [return] ok 5493 - my $x; $x->[0] = 1; delete $$x[1] <+fetch> [variable] ok 5494 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+fetch> [exception] ok 5495 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+fetch> [return] ok 5496 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+fetch> [variable] ok 5497 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+fetch> [exception] ok 5498 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+fetch> [return] ok 5499 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+fetch> [variable] ok 5500 - my @x; $x[0] = 1; delete $x[1] <+fetch> [exception] ok 5501 - my @x; $x[0] = 1; delete $x[1] <+fetch> [return] ok 5502 - my @x; $x[0] = 1; delete $x[1] <+fetch> [variable] ok 5503 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+fetch> [exception] ok 5504 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+fetch> [return] ok 5505 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+fetch> [variable] ok 5506 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+fetch> [exception] ok 5507 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+fetch> [return] ok 5508 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+fetch> [variable] ok 5509 - my $x; $x->[0] = 1; delete $x->[0] <+exists> [exception] ok 5510 - my $x; $x->[0] = 1; delete $x->[0] <+exists> [return] ok 5511 - my $x; $x->[0] = 1; delete $x->[0] <+exists> [variable] ok 5512 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+exists> [exception] ok 5513 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+exists> [return] ok 5514 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+exists> [variable] ok 5515 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+exists> [exception] ok 5516 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+exists> [return] ok 5517 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+exists> [variable] ok 5518 - my $x; $x->[0] = 1; delete $$x[0] <+exists> [exception] ok 5519 - my $x; $x->[0] = 1; delete $$x[0] <+exists> [return] ok 5520 - my $x; $x->[0] = 1; delete $$x[0] <+exists> [variable] ok 5521 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+exists> [exception] ok 5522 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+exists> [return] ok 5523 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+exists> [variable] ok 5524 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+exists> [exception] ok 5525 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+exists> [return] ok 5526 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+exists> [variable] ok 5527 - my @x; $x[0] = 1; delete $x[0] <+exists> [exception] ok 5528 - my @x; $x[0] = 1; delete $x[0] <+exists> [return] ok 5529 - my @x; $x[0] = 1; delete $x[0] <+exists> [variable] ok 5530 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+exists> [exception] ok 5531 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+exists> [return] ok 5532 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+exists> [variable] ok 5533 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+exists> [exception] ok 5534 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+exists> [return] ok 5535 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+exists> [variable] ok 5536 - my $x; $x->[0] = 1; delete $x->[1] <+exists> [exception] ok 5537 - my $x; $x->[0] = 1; delete $x->[1] <+exists> [return] ok 5538 - my $x; $x->[0] = 1; delete $x->[1] <+exists> [variable] ok 5539 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+exists> [exception] ok 5540 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+exists> [return] ok 5541 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+exists> [variable] ok 5542 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+exists> [exception] ok 5543 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+exists> [return] ok 5544 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+exists> [variable] ok 5545 - my $x; $x->[0] = 1; delete $$x[1] <+exists> [exception] ok 5546 - my $x; $x->[0] = 1; delete $$x[1] <+exists> [return] ok 5547 - my $x; $x->[0] = 1; delete $$x[1] <+exists> [variable] ok 5548 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+exists> [exception] ok 5549 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+exists> [return] ok 5550 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+exists> [variable] ok 5551 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+exists> [exception] ok 5552 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+exists> [return] ok 5553 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+exists> [variable] ok 5554 - my @x; $x[0] = 1; delete $x[1] <+exists> [exception] ok 5555 - my @x; $x[0] = 1; delete $x[1] <+exists> [return] ok 5556 - my @x; $x[0] = 1; delete $x[1] <+exists> [variable] ok 5557 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+exists> [exception] ok 5558 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+exists> [return] ok 5559 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+exists> [variable] ok 5560 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+exists> [exception] ok 5561 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+exists> [return] ok 5562 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+exists> [variable] ok 5563 - my $x; $x->[0] = 1; delete $x->[0] <+delete> [exception] ok 5564 - my $x; $x->[0] = 1; delete $x->[0] <+delete> [return] ok 5565 - my $x; $x->[0] = 1; delete $x->[0] <+delete> [variable] ok 5566 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+delete> [exception] ok 5567 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+delete> [return] ok 5568 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+delete> [variable] ok 5569 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+delete> [exception] ok 5570 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+delete> [return] ok 5571 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+delete> [variable] ok 5572 - my $x; $x->[0] = 1; delete $$x[0] <+delete> [exception] ok 5573 - my $x; $x->[0] = 1; delete $$x[0] <+delete> [return] ok 5574 - my $x; $x->[0] = 1; delete $$x[0] <+delete> [variable] ok 5575 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+delete> [exception] ok 5576 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+delete> [return] ok 5577 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+delete> [variable] ok 5578 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+delete> [exception] ok 5579 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+delete> [return] ok 5580 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+delete> [variable] ok 5581 - my @x; $x[0] = 1; delete $x[0] <+delete> [exception] ok 5582 - my @x; $x[0] = 1; delete $x[0] <+delete> [return] ok 5583 - my @x; $x[0] = 1; delete $x[0] <+delete> [variable] ok 5584 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+delete> [exception] ok 5585 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+delete> [return] ok 5586 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+delete> [variable] ok 5587 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+delete> [exception] ok 5588 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+delete> [return] ok 5589 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+delete> [variable] ok 5590 - my $x; $x->[0] = 1; delete $x->[1] <+delete> [exception] ok 5591 - my $x; $x->[0] = 1; delete $x->[1] <+delete> [return] ok 5592 - my $x; $x->[0] = 1; delete $x->[1] <+delete> [variable] ok 5593 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+delete> [exception] ok 5594 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+delete> [return] ok 5595 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+delete> [variable] ok 5596 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+delete> [exception] ok 5597 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+delete> [return] ok 5598 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+delete> [variable] ok 5599 - my $x; $x->[0] = 1; delete $$x[1] <+delete> [exception] ok 5600 - my $x; $x->[0] = 1; delete $$x[1] <+delete> [return] ok 5601 - my $x; $x->[0] = 1; delete $$x[1] <+delete> [variable] ok 5602 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+delete> [exception] ok 5603 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+delete> [return] ok 5604 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+delete> [variable] ok 5605 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+delete> [exception] ok 5606 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+delete> [return] ok 5607 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+delete> [variable] ok 5608 - my @x; $x[0] = 1; delete $x[1] <+delete> [exception] ok 5609 - my @x; $x[0] = 1; delete $x[1] <+delete> [return] ok 5610 - my @x; $x[0] = 1; delete $x[1] <+delete> [variable] ok 5611 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+delete> [exception] ok 5612 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+delete> [return] ok 5613 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+delete> [variable] ok 5614 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+delete> [exception] ok 5615 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+delete> [return] ok 5616 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+delete> [variable] ok 5617 - my $x; $x->[0] = 1; delete $x->[0] <+store> [exception] ok 5618 - my $x; $x->[0] = 1; delete $x->[0] <+store> [return] ok 5619 - my $x; $x->[0] = 1; delete $x->[0] <+store> [variable] ok 5620 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+store> [exception] ok 5621 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+store> [return] ok 5622 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+store> [variable] ok 5623 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+store> [exception] ok 5624 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+store> [return] ok 5625 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+store> [variable] ok 5626 - my $x; $x->[0] = 1; delete $$x[0] <+store> [exception] ok 5627 - my $x; $x->[0] = 1; delete $$x[0] <+store> [return] ok 5628 - my $x; $x->[0] = 1; delete $$x[0] <+store> [variable] ok 5629 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+store> [exception] ok 5630 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+store> [return] ok 5631 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+store> [variable] ok 5632 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+store> [exception] ok 5633 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+store> [return] ok 5634 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+store> [variable] ok 5635 - my @x; $x[0] = 1; delete $x[0] <+store> [exception] ok 5636 - my @x; $x[0] = 1; delete $x[0] <+store> [return] ok 5637 - my @x; $x[0] = 1; delete $x[0] <+store> [variable] ok 5638 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+store> [exception] ok 5639 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+store> [return] ok 5640 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+store> [variable] ok 5641 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+store> [exception] ok 5642 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+store> [return] ok 5643 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+store> [variable] ok 5644 - my $x; $x->[0] = 1; delete $x->[1] <+store> [exception] ok 5645 - my $x; $x->[0] = 1; delete $x->[1] <+store> [return] ok 5646 - my $x; $x->[0] = 1; delete $x->[1] <+store> [variable] ok 5647 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+store> [exception] ok 5648 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+store> [return] ok 5649 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+store> [variable] ok 5650 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+store> [exception] ok 5651 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+store> [return] ok 5652 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+store> [variable] ok 5653 - my $x; $x->[0] = 1; delete $$x[1] <+store> [exception] ok 5654 - my $x; $x->[0] = 1; delete $$x[1] <+store> [return] ok 5655 - my $x; $x->[0] = 1; delete $$x[1] <+store> [variable] ok 5656 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+store> [exception] ok 5657 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+store> [return] ok 5658 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+store> [variable] ok 5659 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+store> [exception] ok 5660 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+store> [return] ok 5661 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+store> [variable] ok 5662 - my @x; $x[0] = 1; delete $x[1] <+store> [exception] ok 5663 - my @x; $x[0] = 1; delete $x[1] <+store> [return] ok 5664 - my @x; $x[0] = 1; delete $x[1] <+store> [variable] ok 5665 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+store> [exception] ok 5666 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+store> [return] ok 5667 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+store> [variable] ok 5668 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+store> [exception] ok 5669 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+store> [return] ok 5670 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+store> [variable] ok 5671 - my $x; $x->[0] = 1; delete $x->[0] <+strict +fetch> [exception] ok 5672 - my $x; $x->[0] = 1; delete $x->[0] <+strict +fetch> [return] ok 5673 - my $x; $x->[0] = 1; delete $x->[0] <+strict +fetch> [variable] ok 5674 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +fetch> [exception] ok 5675 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +fetch> [return] ok 5676 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +fetch> [variable] ok 5677 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +fetch> [exception] ok 5678 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +fetch> [return] ok 5679 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +fetch> [variable] ok 5680 - my $x; $x->[0] = 1; delete $$x[0] <+strict +fetch> [exception] ok 5681 - my $x; $x->[0] = 1; delete $$x[0] <+strict +fetch> [return] ok 5682 - my $x; $x->[0] = 1; delete $$x[0] <+strict +fetch> [variable] ok 5683 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +fetch> [exception] ok 5684 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +fetch> [return] ok 5685 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +fetch> [variable] ok 5686 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +fetch> [exception] ok 5687 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +fetch> [return] ok 5688 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +fetch> [variable] ok 5689 - my @x; $x[0] = 1; delete $x[0] <+strict +fetch> [exception] ok 5690 - my @x; $x[0] = 1; delete $x[0] <+strict +fetch> [return] ok 5691 - my @x; $x[0] = 1; delete $x[0] <+strict +fetch> [variable] ok 5692 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +fetch> [exception] ok 5693 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +fetch> [return] ok 5694 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +fetch> [variable] ok 5695 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +fetch> [exception] ok 5696 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +fetch> [return] ok 5697 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +fetch> [variable] ok 5698 - my $x; $x->[0] = 1; delete $x->[1] <+strict +fetch> [exception] ok 5699 - my $x; $x->[0] = 1; delete $x->[1] <+strict +fetch> [return] ok 5700 - my $x; $x->[0] = 1; delete $x->[1] <+strict +fetch> [variable] ok 5701 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +fetch> [exception] ok 5702 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +fetch> [return] ok 5703 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +fetch> [variable] ok 5704 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +fetch> [exception] ok 5705 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +fetch> [return] ok 5706 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +fetch> [variable] ok 5707 - my $x; $x->[0] = 1; delete $$x[1] <+strict +fetch> [exception] ok 5708 - my $x; $x->[0] = 1; delete $$x[1] <+strict +fetch> [return] ok 5709 - my $x; $x->[0] = 1; delete $$x[1] <+strict +fetch> [variable] ok 5710 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +fetch> [exception] ok 5711 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +fetch> [return] ok 5712 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +fetch> [variable] ok 5713 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +fetch> [exception] ok 5714 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +fetch> [return] ok 5715 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +fetch> [variable] ok 5716 - my @x; $x[0] = 1; delete $x[1] <+strict +fetch> [exception] ok 5717 - my @x; $x[0] = 1; delete $x[1] <+strict +fetch> [return] ok 5718 - my @x; $x[0] = 1; delete $x[1] <+strict +fetch> [variable] ok 5719 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +fetch> [exception] ok 5720 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +fetch> [return] ok 5721 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +fetch> [variable] ok 5722 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +fetch> [exception] ok 5723 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +fetch> [return] ok 5724 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +fetch> [variable] ok 5725 - my $x; $x->[0] = 1; delete $x->[0] <+strict +exists> [exception] ok 5726 - my $x; $x->[0] = 1; delete $x->[0] <+strict +exists> [return] ok 5727 - my $x; $x->[0] = 1; delete $x->[0] <+strict +exists> [variable] ok 5728 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +exists> [exception] ok 5729 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +exists> [return] ok 5730 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +exists> [variable] ok 5731 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +exists> [exception] ok 5732 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +exists> [return] ok 5733 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +exists> [variable] ok 5734 - my $x; $x->[0] = 1; delete $$x[0] <+strict +exists> [exception] ok 5735 - my $x; $x->[0] = 1; delete $$x[0] <+strict +exists> [return] ok 5736 - my $x; $x->[0] = 1; delete $$x[0] <+strict +exists> [variable] ok 5737 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +exists> [exception] ok 5738 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +exists> [return] ok 5739 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +exists> [variable] ok 5740 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +exists> [exception] ok 5741 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +exists> [return] ok 5742 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +exists> [variable] ok 5743 - my @x; $x[0] = 1; delete $x[0] <+strict +exists> [exception] ok 5744 - my @x; $x[0] = 1; delete $x[0] <+strict +exists> [return] ok 5745 - my @x; $x[0] = 1; delete $x[0] <+strict +exists> [variable] ok 5746 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +exists> [exception] ok 5747 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +exists> [return] ok 5748 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +exists> [variable] ok 5749 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +exists> [exception] ok 5750 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +exists> [return] ok 5751 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +exists> [variable] ok 5752 - my $x; $x->[0] = 1; delete $x->[1] <+strict +exists> [exception] ok 5753 - my $x; $x->[0] = 1; delete $x->[1] <+strict +exists> [return] ok 5754 - my $x; $x->[0] = 1; delete $x->[1] <+strict +exists> [variable] ok 5755 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +exists> [exception] ok 5756 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +exists> [return] ok 5757 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +exists> [variable] ok 5758 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +exists> [exception] ok 5759 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +exists> [return] ok 5760 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +exists> [variable] ok 5761 - my $x; $x->[0] = 1; delete $$x[1] <+strict +exists> [exception] ok 5762 - my $x; $x->[0] = 1; delete $$x[1] <+strict +exists> [return] ok 5763 - my $x; $x->[0] = 1; delete $$x[1] <+strict +exists> [variable] ok 5764 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +exists> [exception] ok 5765 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +exists> [return] ok 5766 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +exists> [variable] ok 5767 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +exists> [exception] ok 5768 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +exists> [return] ok 5769 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +exists> [variable] ok 5770 - my @x; $x[0] = 1; delete $x[1] <+strict +exists> [exception] ok 5771 - my @x; $x[0] = 1; delete $x[1] <+strict +exists> [return] ok 5772 - my @x; $x[0] = 1; delete $x[1] <+strict +exists> [variable] ok 5773 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +exists> [exception] ok 5774 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +exists> [return] ok 5775 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +exists> [variable] ok 5776 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +exists> [exception] ok 5777 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +exists> [return] ok 5778 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +exists> [variable] ok 5779 - my $x; $x->[0] = 1; delete $x->[0] <+strict +delete> [exception] ok 5780 - my $x; $x->[0] = 1; delete $x->[0] <+strict +delete> [return] ok 5781 - my $x; $x->[0] = 1; delete $x->[0] <+strict +delete> [variable] ok 5782 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +delete> [exception] ok 5783 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +delete> [return] ok 5784 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +delete> [variable] ok 5785 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +delete> [exception] ok 5786 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +delete> [return] ok 5787 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +delete> [variable] ok 5788 - my $x; $x->[0] = 1; delete $$x[0] <+strict +delete> [exception] ok 5789 - my $x; $x->[0] = 1; delete $$x[0] <+strict +delete> [return] ok 5790 - my $x; $x->[0] = 1; delete $$x[0] <+strict +delete> [variable] ok 5791 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +delete> [exception] ok 5792 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +delete> [return] ok 5793 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +delete> [variable] ok 5794 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +delete> [exception] ok 5795 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +delete> [return] ok 5796 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +delete> [variable] ok 5797 - my @x; $x[0] = 1; delete $x[0] <+strict +delete> [exception] ok 5798 - my @x; $x[0] = 1; delete $x[0] <+strict +delete> [return] ok 5799 - my @x; $x[0] = 1; delete $x[0] <+strict +delete> [variable] ok 5800 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +delete> [exception] ok 5801 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +delete> [return] ok 5802 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +delete> [variable] ok 5803 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +delete> [exception] ok 5804 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +delete> [return] ok 5805 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +delete> [variable] ok 5806 - my $x; $x->[0] = 1; delete $x->[1] <+strict +delete> [exception] ok 5807 - my $x; $x->[0] = 1; delete $x->[1] <+strict +delete> [return] ok 5808 - my $x; $x->[0] = 1; delete $x->[1] <+strict +delete> [variable] ok 5809 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +delete> [exception] ok 5810 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +delete> [return] ok 5811 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +delete> [variable] ok 5812 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +delete> [exception] ok 5813 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +delete> [return] ok 5814 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +delete> [variable] ok 5815 - my $x; $x->[0] = 1; delete $$x[1] <+strict +delete> [exception] ok 5816 - my $x; $x->[0] = 1; delete $$x[1] <+strict +delete> [return] ok 5817 - my $x; $x->[0] = 1; delete $$x[1] <+strict +delete> [variable] ok 5818 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +delete> [exception] ok 5819 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +delete> [return] ok 5820 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +delete> [variable] ok 5821 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +delete> [exception] ok 5822 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +delete> [return] ok 5823 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +delete> [variable] ok 5824 - my @x; $x[0] = 1; delete $x[1] <+strict +delete> [exception] ok 5825 - my @x; $x[0] = 1; delete $x[1] <+strict +delete> [return] ok 5826 - my @x; $x[0] = 1; delete $x[1] <+strict +delete> [variable] ok 5827 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +delete> [exception] ok 5828 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +delete> [return] ok 5829 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +delete> [variable] ok 5830 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +delete> [exception] ok 5831 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +delete> [return] ok 5832 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +delete> [variable] ok 5833 - my $x; $x->[0] = 1; delete $x->[0] <+strict +store> [exception] ok 5834 - my $x; $x->[0] = 1; delete $x->[0] <+strict +store> [return] ok 5835 - my $x; $x->[0] = 1; delete $x->[0] <+strict +store> [variable] ok 5836 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +store> [exception] ok 5837 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +store> [return] ok 5838 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +store> [variable] ok 5839 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +store> [exception] ok 5840 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +store> [return] ok 5841 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +store> [variable] ok 5842 - my $x; $x->[0] = 1; delete $$x[0] <+strict +store> [exception] ok 5843 - my $x; $x->[0] = 1; delete $$x[0] <+strict +store> [return] ok 5844 - my $x; $x->[0] = 1; delete $$x[0] <+strict +store> [variable] ok 5845 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +store> [exception] ok 5846 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +store> [return] ok 5847 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +store> [variable] ok 5848 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +store> [exception] ok 5849 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +store> [return] ok 5850 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +store> [variable] ok 5851 - my @x; $x[0] = 1; delete $x[0] <+strict +store> [exception] ok 5852 - my @x; $x[0] = 1; delete $x[0] <+strict +store> [return] ok 5853 - my @x; $x[0] = 1; delete $x[0] <+strict +store> [variable] ok 5854 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +store> [exception] ok 5855 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +store> [return] ok 5856 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +store> [variable] ok 5857 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +store> [exception] ok 5858 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +store> [return] ok 5859 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +store> [variable] ok 5860 - my $x; $x->[0] = 1; delete $x->[1] <+strict +store> [exception] ok 5861 - my $x; $x->[0] = 1; delete $x->[1] <+strict +store> [return] ok 5862 - my $x; $x->[0] = 1; delete $x->[1] <+strict +store> [variable] ok 5863 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +store> [exception] ok 5864 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +store> [return] ok 5865 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +store> [variable] ok 5866 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +store> [exception] ok 5867 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +store> [return] ok 5868 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +store> [variable] ok 5869 - my $x; $x->[0] = 1; delete $$x[1] <+strict +store> [exception] ok 5870 - my $x; $x->[0] = 1; delete $$x[1] <+strict +store> [return] ok 5871 - my $x; $x->[0] = 1; delete $$x[1] <+strict +store> [variable] ok 5872 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +store> [exception] ok 5873 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +store> [return] ok 5874 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +store> [variable] ok 5875 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +store> [exception] ok 5876 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +store> [return] ok 5877 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +store> [variable] ok 5878 - my @x; $x[0] = 1; delete $x[1] <+strict +store> [exception] ok 5879 - my @x; $x[0] = 1; delete $x[1] <+strict +store> [return] ok 5880 - my @x; $x[0] = 1; delete $x[1] <+strict +store> [variable] ok 5881 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +store> [exception] ok 5882 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +store> [return] ok 5883 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +store> [variable] ok 5884 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +store> [exception] ok 5885 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +store> [return] ok 5886 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +store> [variable] ok 5887 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [exception] ok 5888 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [return] ok 5889 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [variable] ok 5890 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [exception] ok 5891 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [return] ok 5892 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [variable] ok 5893 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [exception] ok 5894 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [return] ok 5895 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [variable] ok 5896 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [exception] ok 5897 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [return] ok 5898 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [variable] ok 5899 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [exception] ok 5900 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [return] ok 5901 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [variable] ok 5902 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [exception] ok 5903 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [return] ok 5904 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [variable] ok 5905 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [exception] ok 5906 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [return] ok 5907 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [variable] ok 5908 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [exception] ok 5909 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [return] ok 5910 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [variable] ok 5911 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [exception] ok 5912 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [return] ok 5913 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [variable] ok 5914 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [exception] ok 5915 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [return] ok 5916 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [variable] ok 5917 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [exception] ok 5918 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [return] ok 5919 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [variable] ok 5920 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [exception] ok 5921 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [return] ok 5922 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [variable] ok 5923 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [exception] ok 5924 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [return] ok 5925 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [variable] ok 5926 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [exception] ok 5927 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [return] ok 5928 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [variable] ok 5929 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [exception] ok 5930 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [return] ok 5931 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [variable] ok 5932 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [exception] ok 5933 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [return] ok 5934 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [variable] ok 5935 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [exception] ok 5936 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [return] ok 5937 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [variable] ok 5938 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [exception] ok 5939 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [return] ok 5940 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [variable] ok 5941 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [exception] ok 5942 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [return] ok 5943 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [variable] ok 5944 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [exception] ok 5945 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [return] ok 5946 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [variable] ok 5947 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [exception] ok 5948 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [return] ok 5949 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [variable] ok 5950 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [exception] ok 5951 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [return] ok 5952 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [variable] ok 5953 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [exception] ok 5954 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [return] ok 5955 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [variable] ok 5956 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [exception] ok 5957 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [return] ok 5958 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [variable] ok 5959 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [exception] ok 5960 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [return] ok 5961 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [variable] ok 5962 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [exception] ok 5963 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [return] ok 5964 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [variable] ok 5965 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [exception] ok 5966 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [return] ok 5967 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [variable] ok 5968 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [exception] ok 5969 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [return] ok 5970 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [variable] ok 5971 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [exception] ok 5972 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [return] ok 5973 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [variable] ok 5974 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [exception] ok 5975 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [return] ok 5976 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [variable] ok 5977 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [exception] ok 5978 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [return] ok 5979 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [variable] ok 5980 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [exception] ok 5981 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [return] ok 5982 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [variable] ok 5983 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [exception] ok 5984 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [return] ok 5985 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [variable] ok 5986 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [exception] ok 5987 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [return] ok 5988 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [variable] ok 5989 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [exception] ok 5990 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [return] ok 5991 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [variable] ok 5992 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [exception] ok 5993 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [return] ok 5994 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [variable] ok 5995 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [exception] ok 5996 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [return] ok 5997 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [variable] ok 5998 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [exception] ok 5999 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [return] ok 6000 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [variable] ok 6001 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [exception] ok 6002 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [return] ok 6003 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [variable] ok 6004 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [exception] ok 6005 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [return] ok 6006 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [variable] ok 6007 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [exception] ok 6008 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [return] ok 6009 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [variable] ok 6010 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [exception] ok 6011 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [return] ok 6012 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [variable] ok 6013 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [exception] ok 6014 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [return] ok 6015 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [variable] ok 6016 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [exception] ok 6017 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [return] ok 6018 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [variable] ok 6019 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [exception] ok 6020 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [return] ok 6021 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [variable] ok 6022 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [exception] ok 6023 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [return] ok 6024 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [variable] ok 6025 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [exception] ok 6026 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [return] ok 6027 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [variable] ok 6028 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [exception] ok 6029 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [return] ok 6030 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [variable] ok 6031 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [exception] ok 6032 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [return] ok 6033 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [variable] ok 6034 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [exception] ok 6035 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [return] ok 6036 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [variable] ok 6037 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [exception] ok 6038 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [return] ok 6039 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [variable] ok 6040 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [exception] ok 6041 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [return] ok 6042 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [variable] ok 6043 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [exception] ok 6044 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [return] ok 6045 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [variable] ok 6046 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [exception] ok 6047 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [return] ok 6048 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [variable] ok 6049 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [exception] ok 6050 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [return] ok 6051 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [variable] ok 6052 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [exception] ok 6053 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [return] ok 6054 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [variable] ok 6055 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [exception] ok 6056 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [return] ok 6057 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [variable] ok 6058 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [exception] ok 6059 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [return] ok 6060 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [variable] ok 6061 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [exception] ok 6062 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [return] ok 6063 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [variable] ok 6064 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [exception] ok 6065 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [return] ok 6066 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [variable] ok 6067 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [exception] ok 6068 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [return] ok 6069 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [variable] ok 6070 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [exception] ok 6071 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [return] ok 6072 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [variable] ok 6073 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [exception] ok 6074 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [return] ok 6075 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [variable] ok 6076 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [exception] ok 6077 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [return] ok 6078 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [variable] ok 6079 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [exception] ok 6080 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [return] ok 6081 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [variable] ok 6082 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [exception] ok 6083 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [return] ok 6084 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [variable] ok 6085 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [exception] ok 6086 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [return] ok 6087 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [variable] ok 6088 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [exception] ok 6089 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [return] ok 6090 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [variable] ok 6091 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [exception] ok 6092 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [return] ok 6093 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [variable] ok 6094 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [exception] ok 6095 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [return] ok 6096 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [variable] ok 6097 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [exception] ok 6098 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [return] ok 6099 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [variable] ok 6100 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [exception] ok 6101 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [return] ok 6102 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [variable] ok 6103 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [exception] ok 6104 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [return] ok 6105 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [variable] ok 6106 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [exception] ok 6107 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [return] ok 6108 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [variable] ok 6109 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [exception] ok 6110 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [return] ok 6111 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [variable] ok 6112 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [exception] ok 6113 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [return] ok 6114 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [variable] ok 6115 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [exception] ok 6116 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [return] ok 6117 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [variable] ok 6118 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [exception] ok 6119 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [return] ok 6120 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [variable] ok 6121 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [exception] ok 6122 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [return] ok 6123 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [variable] ok 6124 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [exception] ok 6125 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [return] ok 6126 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [variable] ok 6127 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [exception] ok 6128 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [return] ok 6129 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [variable] ok 6130 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [exception] ok 6131 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [return] ok 6132 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [variable] ok 6133 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [exception] ok 6134 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [return] ok 6135 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [variable] ok 6136 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [exception] ok 6137 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [return] ok 6138 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [variable] ok 6139 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [exception] ok 6140 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [return] ok 6141 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [variable] ok 6142 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [exception] ok 6143 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [return] ok 6144 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [variable] ok 6145 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [exception] ok 6146 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [return] ok 6147 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [variable] ok 6148 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [exception] ok 6149 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [return] ok 6150 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [variable] ok 6151 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [exception] ok 6152 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [return] ok 6153 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [variable] ok 6154 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [exception] ok 6155 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [return] ok 6156 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [variable] ok 6157 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [exception] ok 6158 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [return] ok 6159 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [variable] ok 6160 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [exception] ok 6161 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [return] ok 6162 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [variable] ok 6163 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [exception] ok 6164 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [return] ok 6165 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [variable] ok 6166 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [exception] ok 6167 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [return] ok 6168 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [variable] ok 6169 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [exception] ok 6170 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [return] ok 6171 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [variable] ok 6172 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [exception] ok 6173 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [return] ok 6174 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [variable] ok 6175 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [exception] ok 6176 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [return] ok 6177 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [variable] ok 6178 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [exception] ok 6179 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [return] ok 6180 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [variable] ok 6181 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [exception] ok 6182 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [return] ok 6183 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [variable] ok 6184 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [exception] ok 6185 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [return] ok 6186 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [variable] ok 6187 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [exception] ok 6188 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [return] ok 6189 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [variable] ok 6190 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [exception] ok 6191 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [return] ok 6192 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [variable] ok 6193 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [exception] ok 6194 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [return] ok 6195 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [variable] ok 6196 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [exception] ok 6197 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [return] ok 6198 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [variable] ok 6199 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [exception] ok 6200 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [return] ok 6201 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [variable] ok 6202 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [exception] ok 6203 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [return] ok 6204 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [variable] ok 6205 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [exception] ok 6206 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [return] ok 6207 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [variable] ok 6208 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [exception] ok 6209 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [return] ok 6210 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [variable] ok 6211 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [exception] ok 6212 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [return] ok 6213 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [variable] ok 6214 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [exception] ok 6215 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [return] ok 6216 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [variable] ok 6217 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [exception] ok 6218 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [return] ok 6219 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [variable] ok 6220 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [exception] ok 6221 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [return] ok 6222 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [variable] ok 6223 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [exception] ok 6224 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [return] ok 6225 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [variable] ok 6226 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [exception] ok 6227 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [return] ok 6228 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [variable] ok 6229 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [exception] ok 6230 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [return] ok 6231 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [variable] ok 6232 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [exception] ok 6233 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [return] ok 6234 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [variable] ok 6235 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [exception] ok 6236 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [return] ok 6237 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [variable] ok 6238 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [exception] ok 6239 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [return] ok 6240 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [variable] ok 6241 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [exception] ok 6242 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [return] ok 6243 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [variable] ok 6244 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [exception] ok 6245 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [return] ok 6246 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [variable] ok 6247 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [exception] ok 6248 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [return] ok 6249 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [variable] ok 6250 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [exception] ok 6251 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [return] ok 6252 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [variable] ok 6253 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [exception] ok 6254 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [return] ok 6255 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [variable] ok 6256 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [exception] ok 6257 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [return] ok 6258 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [variable] ok 6259 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [exception] ok 6260 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [return] ok 6261 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [variable] ok 6262 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [exception] ok 6263 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [return] ok 6264 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [variable] ok 6265 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [exception] ok 6266 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [return] ok 6267 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [variable] ok 6268 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [exception] ok 6269 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [return] ok 6270 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [variable] ok 6271 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [exception] ok 6272 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [return] ok 6273 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [variable] ok 6274 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [exception] ok 6275 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [return] ok 6276 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [variable] ok 6277 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [exception] ok 6278 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [return] ok 6279 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [variable] ok 6280 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [exception] ok 6281 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [return] ok 6282 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [variable] ok 6283 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [exception] ok 6284 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [return] ok 6285 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [variable] ok 6286 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [exception] ok 6287 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [return] ok 6288 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [variable] ok 6289 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [exception] ok 6290 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [return] ok 6291 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [variable] ok 6292 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [exception] ok 6293 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [return] ok 6294 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [variable] ok 6295 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [exception] ok 6296 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [return] ok 6297 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [variable] ok 6298 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [exception] ok 6299 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [return] ok 6300 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [variable] ok 6301 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [exception] ok 6302 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [return] ok 6303 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [variable] ok 6304 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [exception] ok 6305 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [return] ok 6306 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [variable] ok 6307 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [exception] ok 6308 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [return] ok 6309 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [variable] ok 6310 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [exception] ok 6311 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [return] ok 6312 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [variable] ok 6313 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [exception] ok 6314 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [return] ok 6315 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [variable] ok 6316 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [exception] ok 6317 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [return] ok 6318 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [variable] ok 6319 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [exception] ok 6320 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [return] ok 6321 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [variable] ok 6322 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [exception] ok 6323 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [return] ok 6324 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [variable] ok 6325 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [exception] ok 6326 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [return] ok 6327 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [variable] ok 6328 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [exception] ok 6329 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [return] ok 6330 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [variable] ok 6331 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [exception] ok 6332 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [return] ok 6333 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [variable] ok 6334 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [exception] ok 6335 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [return] ok 6336 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [variable] ok 6337 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [exception] ok 6338 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [return] ok 6339 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [variable] ok 6340 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [exception] ok 6341 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [return] ok 6342 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [variable] ok 6343 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [exception] ok 6344 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [return] ok 6345 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [variable] ok 6346 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [exception] ok 6347 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [return] ok 6348 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [variable] ok 6349 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [exception] ok 6350 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [return] ok 6351 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [variable] ok 6352 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [exception] ok 6353 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [return] ok 6354 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [variable] ok 6355 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [exception] ok 6356 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [return] ok 6357 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [variable] ok 6358 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [exception] ok 6359 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [return] ok 6360 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [variable] ok 6361 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [exception] ok 6362 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [return] ok 6363 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [variable] ok 6364 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [exception] ok 6365 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [return] ok 6366 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [variable] ok 6367 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [exception] ok 6368 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [return] ok 6369 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [variable] ok 6370 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [exception] ok 6371 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [return] ok 6372 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [variable] ok 6373 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [exception] ok 6374 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [return] ok 6375 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [variable] ok 6376 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [exception] ok 6377 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [return] ok 6378 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [variable] ok 6379 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [exception] ok 6380 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [return] ok 6381 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [variable] ok 6382 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [exception] ok 6383 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [return] ok 6384 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [variable] ok 6385 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [exception] ok 6386 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [return] ok 6387 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [variable] ok 6388 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [exception] ok 6389 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [return] ok 6390 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [variable] ok 6391 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [exception] ok 6392 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [return] ok 6393 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [variable] ok 6394 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [exception] ok 6395 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [return] ok 6396 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [variable] ok 6397 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [exception] ok 6398 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [return] ok 6399 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [variable] ok 6400 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [exception] ok 6401 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [return] ok 6402 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [variable] ok 6403 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [exception] ok 6404 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [return] ok 6405 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [variable] ok 6406 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [exception] ok 6407 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [return] ok 6408 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [variable] ok 6409 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [exception] ok 6410 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [return] ok 6411 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [variable] ok 6412 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [exception] ok 6413 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [return] ok 6414 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [variable] ok 6415 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [exception] ok 6416 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [return] ok 6417 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [variable] ok 6418 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [exception] ok 6419 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [return] ok 6420 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [variable] ok 6421 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [exception] ok 6422 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [return] ok 6423 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [variable] ok 6424 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [exception] ok 6425 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [return] ok 6426 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [variable] ok 6427 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [exception] ok 6428 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [return] ok 6429 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [variable] ok 6430 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [exception] ok 6431 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [return] ok 6432 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [variable] ok 6433 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [exception] ok 6434 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [return] ok 6435 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [variable] ok 6436 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [exception] ok 6437 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [return] ok 6438 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [variable] ok 6439 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [exception] ok 6440 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [return] ok 6441 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [variable] ok 6442 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [exception] ok 6443 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [return] ok 6444 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [variable] ok 6445 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [exception] ok 6446 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [return] ok 6447 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [variable] ok 6448 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [exception] ok 6449 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [return] ok 6450 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [variable] ok 6451 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [exception] ok 6452 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [return] ok 6453 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [variable] ok 6454 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [exception] ok 6455 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [return] ok 6456 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [variable] ok 6457 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [exception] ok 6458 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [return] ok 6459 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [variable] ok 6460 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [exception] ok 6461 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [return] ok 6462 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [variable] ok 6463 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [exception] ok 6464 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [return] ok 6465 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [variable] ok 6466 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [exception] ok 6467 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [return] ok 6468 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [variable] ok 6469 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [exception] ok 6470 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [return] ok 6471 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [variable] ok 6472 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [exception] ok 6473 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [return] ok 6474 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [variable] ok 6475 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [exception] ok 6476 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [return] ok 6477 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [variable] ok 6478 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [exception] ok 6479 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [return] ok 6480 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [variable] ok 6481 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [exception] ok 6482 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [return] ok 6483 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [variable] ok 6484 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [exception] ok 6485 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [return] ok 6486 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [variable] ok 6487 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [exception] ok 6488 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [return] ok 6489 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [variable] ok 6490 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [exception] ok 6491 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [return] ok 6492 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [variable] ok 6493 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [exception] ok 6494 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [return] ok 6495 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [variable] ok 6496 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [exception] ok 6497 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [return] ok 6498 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [variable] ok 6499 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [exception] ok 6500 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [return] ok 6501 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [variable] ok 6502 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [exception] ok 6503 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [return] ok 6504 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [variable] ok 6505 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [exception] ok 6506 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [return] ok 6507 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [variable] ok 6508 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [exception] ok 6509 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [return] ok 6510 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [variable] ok 6511 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [exception] ok 6512 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [return] ok 6513 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [variable] ok 6514 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [exception] ok 6515 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [return] ok 6516 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [variable] ok 6517 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [exception] ok 6518 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [return] ok 6519 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [variable] ok 6520 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [exception] ok 6521 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [return] ok 6522 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [variable] ok 6523 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [exception] ok 6524 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [return] ok 6525 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [variable] ok 6526 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [exception] ok 6527 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [return] ok 6528 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [variable] ok 6529 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [exception] ok 6530 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [return] ok 6531 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [variable] ok 6532 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [exception] ok 6533 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [return] ok 6534 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [variable] ok 6535 - my $x; $x->[0] = 1 [exception] ok 6536 - my $x; $x->[0] = 1 [return] ok 6537 - my $x; $x->[0] = 1 [variable] ok 6538 - our $x; local $x; use strict; $x->[0] = 1 [exception] ok 6539 - our $x; local $x; use strict; $x->[0] = 1 [return] ok 6540 - our $x; local $x; use strict; $x->[0] = 1 [variable] ok 6541 - our $x; local $x; no strict; $x->[0] = 1 [exception] ok 6542 - our $x; local $x; no strict; $x->[0] = 1 [return] ok 6543 - our $x; local $x; no strict; $x->[0] = 1 [variable] ok 6544 - my $x; $$x[0] = 1 [exception] ok 6545 - my $x; $$x[0] = 1 [return] ok 6546 - my $x; $$x[0] = 1 [variable] ok 6547 - our $x; local $x; use strict; $$x[0] = 1 [exception] ok 6548 - our $x; local $x; use strict; $$x[0] = 1 [return] ok 6549 - our $x; local $x; use strict; $$x[0] = 1 [variable] ok 6550 - our $x; local $x; no strict; $$x[0] = 1 [exception] ok 6551 - our $x; local $x; no strict; $$x[0] = 1 [return] ok 6552 - our $x; local $x; no strict; $$x[0] = 1 [variable] ok 6553 - my @x; $x[0] = 1 [exception] ok 6554 - my @x; $x[0] = 1 [return] ok 6555 - my @x; $x[0] = 1 [variable] ok 6556 - our @x; local @x; use strict; $x[0] = 1 [exception] ok 6557 - our @x; local @x; use strict; $x[0] = 1 [return] ok 6558 - our @x; local @x; use strict; $x[0] = 1 [variable] ok 6559 - our @x; local @x; no strict; $x[0] = 1 [exception] ok 6560 - our @x; local @x; no strict; $x[0] = 1 [return] ok 6561 - our @x; local @x; no strict; $x[0] = 1 [variable] ok 6562 - my $x; $x->[0] = 1 [exception] ok 6563 - my $x; $x->[0] = 1 [return] ok 6564 - my $x; $x->[0] = 1 [variable] ok 6565 - our $x; local $x; use strict; $x->[0] = 1 [exception] ok 6566 - our $x; local $x; use strict; $x->[0] = 1 [return] ok 6567 - our $x; local $x; use strict; $x->[0] = 1 [variable] ok 6568 - our $x; local $x; no strict; $x->[0] = 1 [exception] ok 6569 - our $x; local $x; no strict; $x->[0] = 1 [return] ok 6570 - our $x; local $x; no strict; $x->[0] = 1 [variable] ok 6571 - my $x; $$x[0] = 1 [exception] ok 6572 - my $x; $$x[0] = 1 [return] ok 6573 - my $x; $$x[0] = 1 [variable] ok 6574 - our $x; local $x; use strict; $$x[0] = 1 [exception] ok 6575 - our $x; local $x; use strict; $$x[0] = 1 [return] ok 6576 - our $x; local $x; use strict; $$x[0] = 1 [variable] ok 6577 - our $x; local $x; no strict; $$x[0] = 1 [exception] ok 6578 - our $x; local $x; no strict; $$x[0] = 1 [return] ok 6579 - our $x; local $x; no strict; $$x[0] = 1 [variable] ok 6580 - my @x; $x[0] = 1 [exception] ok 6581 - my @x; $x[0] = 1 [return] ok 6582 - my @x; $x[0] = 1 [variable] ok 6583 - our @x; local @x; use strict; $x[0] = 1 [exception] ok 6584 - our @x; local @x; use strict; $x[0] = 1 [return] ok 6585 - our @x; local @x; use strict; $x[0] = 1 [variable] ok 6586 - our @x; local @x; no strict; $x[0] = 1 [exception] ok 6587 - our @x; local @x; no strict; $x[0] = 1 [return] ok 6588 - our @x; local @x; no strict; $x[0] = 1 [variable] ok 6589 - my $x; $x->[0] = 1 <+fetch> [exception] ok 6590 - my $x; $x->[0] = 1 <+fetch> [return] ok 6591 - my $x; $x->[0] = 1 <+fetch> [variable] ok 6592 - our $x; local $x; use strict; $x->[0] = 1 <+fetch> [exception] ok 6593 - our $x; local $x; use strict; $x->[0] = 1 <+fetch> [return] ok 6594 - our $x; local $x; use strict; $x->[0] = 1 <+fetch> [variable] ok 6595 - our $x; local $x; no strict; $x->[0] = 1 <+fetch> [exception] ok 6596 - our $x; local $x; no strict; $x->[0] = 1 <+fetch> [return] ok 6597 - our $x; local $x; no strict; $x->[0] = 1 <+fetch> [variable] ok 6598 - my $x; $$x[0] = 1 <+fetch> [exception] ok 6599 - my $x; $$x[0] = 1 <+fetch> [return] ok 6600 - my $x; $$x[0] = 1 <+fetch> [variable] ok 6601 - our $x; local $x; use strict; $$x[0] = 1 <+fetch> [exception] ok 6602 - our $x; local $x; use strict; $$x[0] = 1 <+fetch> [return] ok 6603 - our $x; local $x; use strict; $$x[0] = 1 <+fetch> [variable] ok 6604 - our $x; local $x; no strict; $$x[0] = 1 <+fetch> [exception] ok 6605 - our $x; local $x; no strict; $$x[0] = 1 <+fetch> [return] ok 6606 - our $x; local $x; no strict; $$x[0] = 1 <+fetch> [variable] ok 6607 - my @x; $x[0] = 1 <+fetch> [exception] ok 6608 - my @x; $x[0] = 1 <+fetch> [return] ok 6609 - my @x; $x[0] = 1 <+fetch> [variable] ok 6610 - our @x; local @x; use strict; $x[0] = 1 <+fetch> [exception] ok 6611 - our @x; local @x; use strict; $x[0] = 1 <+fetch> [return] ok 6612 - our @x; local @x; use strict; $x[0] = 1 <+fetch> [variable] ok 6613 - our @x; local @x; no strict; $x[0] = 1 <+fetch> [exception] ok 6614 - our @x; local @x; no strict; $x[0] = 1 <+fetch> [return] ok 6615 - our @x; local @x; no strict; $x[0] = 1 <+fetch> [variable] ok 6616 - my $x; $x->[0] = 1 <+exists> [exception] ok 6617 - my $x; $x->[0] = 1 <+exists> [return] ok 6618 - my $x; $x->[0] = 1 <+exists> [variable] ok 6619 - our $x; local $x; use strict; $x->[0] = 1 <+exists> [exception] ok 6620 - our $x; local $x; use strict; $x->[0] = 1 <+exists> [return] ok 6621 - our $x; local $x; use strict; $x->[0] = 1 <+exists> [variable] ok 6622 - our $x; local $x; no strict; $x->[0] = 1 <+exists> [exception] ok 6623 - our $x; local $x; no strict; $x->[0] = 1 <+exists> [return] ok 6624 - our $x; local $x; no strict; $x->[0] = 1 <+exists> [variable] ok 6625 - my $x; $$x[0] = 1 <+exists> [exception] ok 6626 - my $x; $$x[0] = 1 <+exists> [return] ok 6627 - my $x; $$x[0] = 1 <+exists> [variable] ok 6628 - our $x; local $x; use strict; $$x[0] = 1 <+exists> [exception] ok 6629 - our $x; local $x; use strict; $$x[0] = 1 <+exists> [return] ok 6630 - our $x; local $x; use strict; $$x[0] = 1 <+exists> [variable] ok 6631 - our $x; local $x; no strict; $$x[0] = 1 <+exists> [exception] ok 6632 - our $x; local $x; no strict; $$x[0] = 1 <+exists> [return] ok 6633 - our $x; local $x; no strict; $$x[0] = 1 <+exists> [variable] ok 6634 - my @x; $x[0] = 1 <+exists> [exception] ok 6635 - my @x; $x[0] = 1 <+exists> [return] ok 6636 - my @x; $x[0] = 1 <+exists> [variable] ok 6637 - our @x; local @x; use strict; $x[0] = 1 <+exists> [exception] ok 6638 - our @x; local @x; use strict; $x[0] = 1 <+exists> [return] ok 6639 - our @x; local @x; use strict; $x[0] = 1 <+exists> [variable] ok 6640 - our @x; local @x; no strict; $x[0] = 1 <+exists> [exception] ok 6641 - our @x; local @x; no strict; $x[0] = 1 <+exists> [return] ok 6642 - our @x; local @x; no strict; $x[0] = 1 <+exists> [variable] ok 6643 - my $x; $x->[0] = 1 <+delete> [exception] ok 6644 - my $x; $x->[0] = 1 <+delete> [return] ok 6645 - my $x; $x->[0] = 1 <+delete> [variable] ok 6646 - our $x; local $x; use strict; $x->[0] = 1 <+delete> [exception] ok 6647 - our $x; local $x; use strict; $x->[0] = 1 <+delete> [return] ok 6648 - our $x; local $x; use strict; $x->[0] = 1 <+delete> [variable] ok 6649 - our $x; local $x; no strict; $x->[0] = 1 <+delete> [exception] ok 6650 - our $x; local $x; no strict; $x->[0] = 1 <+delete> [return] ok 6651 - our $x; local $x; no strict; $x->[0] = 1 <+delete> [variable] ok 6652 - my $x; $$x[0] = 1 <+delete> [exception] ok 6653 - my $x; $$x[0] = 1 <+delete> [return] ok 6654 - my $x; $$x[0] = 1 <+delete> [variable] ok 6655 - our $x; local $x; use strict; $$x[0] = 1 <+delete> [exception] ok 6656 - our $x; local $x; use strict; $$x[0] = 1 <+delete> [return] ok 6657 - our $x; local $x; use strict; $$x[0] = 1 <+delete> [variable] ok 6658 - our $x; local $x; no strict; $$x[0] = 1 <+delete> [exception] ok 6659 - our $x; local $x; no strict; $$x[0] = 1 <+delete> [return] ok 6660 - our $x; local $x; no strict; $$x[0] = 1 <+delete> [variable] ok 6661 - my @x; $x[0] = 1 <+delete> [exception] ok 6662 - my @x; $x[0] = 1 <+delete> [return] ok 6663 - my @x; $x[0] = 1 <+delete> [variable] ok 6664 - our @x; local @x; use strict; $x[0] = 1 <+delete> [exception] ok 6665 - our @x; local @x; use strict; $x[0] = 1 <+delete> [return] ok 6666 - our @x; local @x; use strict; $x[0] = 1 <+delete> [variable] ok 6667 - our @x; local @x; no strict; $x[0] = 1 <+delete> [exception] ok 6668 - our @x; local @x; no strict; $x[0] = 1 <+delete> [return] ok 6669 - our @x; local @x; no strict; $x[0] = 1 <+delete> [variable] ok 6670 - my $x; $x->[0] = 1 <+store> [exception] ok 6671 - my $x; $x->[0] = 1 <+store> [return] ok 6672 - my $x; $x->[0] = 1 <+store> [variable] ok 6673 - our $x; local $x; use strict; $x->[0] = 1 <+store> [exception] ok 6674 - our $x; local $x; use strict; $x->[0] = 1 <+store> [return] ok 6675 - our $x; local $x; use strict; $x->[0] = 1 <+store> [variable] ok 6676 - our $x; local $x; no strict; $x->[0] = 1 <+store> [exception] ok 6677 - our $x; local $x; no strict; $x->[0] = 1 <+store> [return] ok 6678 - our $x; local $x; no strict; $x->[0] = 1 <+store> [variable] ok 6679 - my $x; $$x[0] = 1 <+store> [exception] ok 6680 - my $x; $$x[0] = 1 <+store> [return] ok 6681 - my $x; $$x[0] = 1 <+store> [variable] ok 6682 - our $x; local $x; use strict; $$x[0] = 1 <+store> [exception] ok 6683 - our $x; local $x; use strict; $$x[0] = 1 <+store> [return] ok 6684 - our $x; local $x; use strict; $$x[0] = 1 <+store> [variable] ok 6685 - our $x; local $x; no strict; $$x[0] = 1 <+store> [exception] ok 6686 - our $x; local $x; no strict; $$x[0] = 1 <+store> [return] ok 6687 - our $x; local $x; no strict; $$x[0] = 1 <+store> [variable] ok 6688 - my @x; 1 <+store> [exception] ok 6689 - my @x; 1 <+store> [return] ok 6690 - my @x; 1 <+store> [variable] ok 6691 - our @x; local @x; use strict; 1 <+store> [exception] ok 6692 - our @x; local @x; use strict; 1 <+store> [return] ok 6693 - our @x; local @x; use strict; 1 <+store> [variable] ok 6694 - our @x; local @x; no strict; 1 <+store> [exception] ok 6695 - our @x; local @x; no strict; 1 <+store> [return] ok 6696 - our @x; local @x; no strict; 1 <+store> [variable] ok 6697 - my $x; $x->[0] = 1 <+strict +fetch> [exception] ok 6698 - my $x; $x->[0] = 1 <+strict +fetch> [return] ok 6699 - my $x; $x->[0] = 1 <+strict +fetch> [variable] ok 6700 - our $x; local $x; use strict; $x->[0] = 1 <+strict +fetch> [exception] ok 6701 - our $x; local $x; use strict; $x->[0] = 1 <+strict +fetch> [return] ok 6702 - our $x; local $x; use strict; $x->[0] = 1 <+strict +fetch> [variable] ok 6703 - our $x; local $x; no strict; $x->[0] = 1 <+strict +fetch> [exception] ok 6704 - our $x; local $x; no strict; $x->[0] = 1 <+strict +fetch> [return] ok 6705 - our $x; local $x; no strict; $x->[0] = 1 <+strict +fetch> [variable] ok 6706 - my $x; $$x[0] = 1 <+strict +fetch> [exception] ok 6707 - my $x; $$x[0] = 1 <+strict +fetch> [return] ok 6708 - my $x; $$x[0] = 1 <+strict +fetch> [variable] ok 6709 - our $x; local $x; use strict; $$x[0] = 1 <+strict +fetch> [exception] ok 6710 - our $x; local $x; use strict; $$x[0] = 1 <+strict +fetch> [return] ok 6711 - our $x; local $x; use strict; $$x[0] = 1 <+strict +fetch> [variable] ok 6712 - our $x; local $x; no strict; $$x[0] = 1 <+strict +fetch> [exception] ok 6713 - our $x; local $x; no strict; $$x[0] = 1 <+strict +fetch> [return] ok 6714 - our $x; local $x; no strict; $$x[0] = 1 <+strict +fetch> [variable] ok 6715 - my @x; $x[0] = 1 <+strict +fetch> [exception] ok 6716 - my @x; $x[0] = 1 <+strict +fetch> [return] ok 6717 - my @x; $x[0] = 1 <+strict +fetch> [variable] ok 6718 - our @x; local @x; use strict; $x[0] = 1 <+strict +fetch> [exception] ok 6719 - our @x; local @x; use strict; $x[0] = 1 <+strict +fetch> [return] ok 6720 - our @x; local @x; use strict; $x[0] = 1 <+strict +fetch> [variable] ok 6721 - our @x; local @x; no strict; $x[0] = 1 <+strict +fetch> [exception] ok 6722 - our @x; local @x; no strict; $x[0] = 1 <+strict +fetch> [return] ok 6723 - our @x; local @x; no strict; $x[0] = 1 <+strict +fetch> [variable] ok 6724 - my $x; $x->[0] = 1 <+strict +exists> [exception] ok 6725 - my $x; $x->[0] = 1 <+strict +exists> [return] ok 6726 - my $x; $x->[0] = 1 <+strict +exists> [variable] ok 6727 - our $x; local $x; use strict; $x->[0] = 1 <+strict +exists> [exception] ok 6728 - our $x; local $x; use strict; $x->[0] = 1 <+strict +exists> [return] ok 6729 - our $x; local $x; use strict; $x->[0] = 1 <+strict +exists> [variable] ok 6730 - our $x; local $x; no strict; $x->[0] = 1 <+strict +exists> [exception] ok 6731 - our $x; local $x; no strict; $x->[0] = 1 <+strict +exists> [return] ok 6732 - our $x; local $x; no strict; $x->[0] = 1 <+strict +exists> [variable] ok 6733 - my $x; $$x[0] = 1 <+strict +exists> [exception] ok 6734 - my $x; $$x[0] = 1 <+strict +exists> [return] ok 6735 - my $x; $$x[0] = 1 <+strict +exists> [variable] ok 6736 - our $x; local $x; use strict; $$x[0] = 1 <+strict +exists> [exception] ok 6737 - our $x; local $x; use strict; $$x[0] = 1 <+strict +exists> [return] ok 6738 - our $x; local $x; use strict; $$x[0] = 1 <+strict +exists> [variable] ok 6739 - our $x; local $x; no strict; $$x[0] = 1 <+strict +exists> [exception] ok 6740 - our $x; local $x; no strict; $$x[0] = 1 <+strict +exists> [return] ok 6741 - our $x; local $x; no strict; $$x[0] = 1 <+strict +exists> [variable] ok 6742 - my @x; $x[0] = 1 <+strict +exists> [exception] ok 6743 - my @x; $x[0] = 1 <+strict +exists> [return] ok 6744 - my @x; $x[0] = 1 <+strict +exists> [variable] ok 6745 - our @x; local @x; use strict; $x[0] = 1 <+strict +exists> [exception] ok 6746 - our @x; local @x; use strict; $x[0] = 1 <+strict +exists> [return] ok 6747 - our @x; local @x; use strict; $x[0] = 1 <+strict +exists> [variable] ok 6748 - our @x; local @x; no strict; $x[0] = 1 <+strict +exists> [exception] ok 6749 - our @x; local @x; no strict; $x[0] = 1 <+strict +exists> [return] ok 6750 - our @x; local @x; no strict; $x[0] = 1 <+strict +exists> [variable] ok 6751 - my $x; $x->[0] = 1 <+strict +delete> [exception] ok 6752 - my $x; $x->[0] = 1 <+strict +delete> [return] ok 6753 - my $x; $x->[0] = 1 <+strict +delete> [variable] ok 6754 - our $x; local $x; use strict; $x->[0] = 1 <+strict +delete> [exception] ok 6755 - our $x; local $x; use strict; $x->[0] = 1 <+strict +delete> [return] ok 6756 - our $x; local $x; use strict; $x->[0] = 1 <+strict +delete> [variable] ok 6757 - our $x; local $x; no strict; $x->[0] = 1 <+strict +delete> [exception] ok 6758 - our $x; local $x; no strict; $x->[0] = 1 <+strict +delete> [return] ok 6759 - our $x; local $x; no strict; $x->[0] = 1 <+strict +delete> [variable] ok 6760 - my $x; $$x[0] = 1 <+strict +delete> [exception] ok 6761 - my $x; $$x[0] = 1 <+strict +delete> [return] ok 6762 - my $x; $$x[0] = 1 <+strict +delete> [variable] ok 6763 - our $x; local $x; use strict; $$x[0] = 1 <+strict +delete> [exception] ok 6764 - our $x; local $x; use strict; $$x[0] = 1 <+strict +delete> [return] ok 6765 - our $x; local $x; use strict; $$x[0] = 1 <+strict +delete> [variable] ok 6766 - our $x; local $x; no strict; $$x[0] = 1 <+strict +delete> [exception] ok 6767 - our $x; local $x; no strict; $$x[0] = 1 <+strict +delete> [return] ok 6768 - our $x; local $x; no strict; $$x[0] = 1 <+strict +delete> [variable] ok 6769 - my @x; $x[0] = 1 <+strict +delete> [exception] ok 6770 - my @x; $x[0] = 1 <+strict +delete> [return] ok 6771 - my @x; $x[0] = 1 <+strict +delete> [variable] ok 6772 - our @x; local @x; use strict; $x[0] = 1 <+strict +delete> [exception] ok 6773 - our @x; local @x; use strict; $x[0] = 1 <+strict +delete> [return] ok 6774 - our @x; local @x; use strict; $x[0] = 1 <+strict +delete> [variable] ok 6775 - our @x; local @x; no strict; $x[0] = 1 <+strict +delete> [exception] ok 6776 - our @x; local @x; no strict; $x[0] = 1 <+strict +delete> [return] ok 6777 - our @x; local @x; no strict; $x[0] = 1 <+strict +delete> [variable] ok 6778 - my $x; $x->[0] = 1 <+strict +store> [exception] ok 6779 - my $x; $x->[0] = 1 <+strict +store> [return] ok 6780 - my $x; $x->[0] = 1 <+strict +store> [variable] ok 6781 - our $x; local $x; use strict; $x->[0] = 1 <+strict +store> [exception] ok 6782 - our $x; local $x; use strict; $x->[0] = 1 <+strict +store> [return] ok 6783 - our $x; local $x; use strict; $x->[0] = 1 <+strict +store> [variable] ok 6784 - our $x; local $x; no strict; $x->[0] = 1 <+strict +store> [exception] ok 6785 - our $x; local $x; no strict; $x->[0] = 1 <+strict +store> [return] ok 6786 - our $x; local $x; no strict; $x->[0] = 1 <+strict +store> [variable] ok 6787 - my $x; $$x[0] = 1 <+strict +store> [exception] ok 6788 - my $x; $$x[0] = 1 <+strict +store> [return] ok 6789 - my $x; $$x[0] = 1 <+strict +store> [variable] ok 6790 - our $x; local $x; use strict; $$x[0] = 1 <+strict +store> [exception] ok 6791 - our $x; local $x; use strict; $$x[0] = 1 <+strict +store> [return] ok 6792 - our $x; local $x; use strict; $$x[0] = 1 <+strict +store> [variable] ok 6793 - our $x; local $x; no strict; $$x[0] = 1 <+strict +store> [exception] ok 6794 - our $x; local $x; no strict; $$x[0] = 1 <+strict +store> [return] ok 6795 - our $x; local $x; no strict; $$x[0] = 1 <+strict +store> [variable] ok 6796 - my @x; 1 <+strict +store> [exception] ok 6797 - my @x; 1 <+strict +store> [return] ok 6798 - my @x; 1 <+strict +store> [variable] ok 6799 - our @x; local @x; use strict; 1 <+strict +store> [exception] ok 6800 - our @x; local @x; use strict; 1 <+strict +store> [return] ok 6801 - our @x; local @x; use strict; 1 <+strict +store> [variable] ok 6802 - our @x; local @x; no strict; 1 <+strict +store> [exception] ok 6803 - our @x; local @x; no strict; 1 <+strict +store> [return] ok 6804 - our @x; local @x; no strict; 1 <+strict +store> [variable] ok 6805 - my $x; $x->[0]->[1] = 1 [exception] ok 6806 - my $x; $x->[0]->[1] = 1 [return] ok 6807 - my $x; $x->[0]->[1] = 1 [variable] ok 6808 - our $x; local $x; use strict; $x->[0]->[1] = 1 [exception] ok 6809 - our $x; local $x; use strict; $x->[0]->[1] = 1 [return] ok 6810 - our $x; local $x; use strict; $x->[0]->[1] = 1 [variable] ok 6811 - our $x; local $x; no strict; $x->[0]->[1] = 1 [exception] ok 6812 - our $x; local $x; no strict; $x->[0]->[1] = 1 [return] ok 6813 - our $x; local $x; no strict; $x->[0]->[1] = 1 [variable] ok 6814 - my $x; $$x[0]->[1] = 1 [exception] ok 6815 - my $x; $$x[0]->[1] = 1 [return] ok 6816 - my $x; $$x[0]->[1] = 1 [variable] ok 6817 - our $x; local $x; use strict; $$x[0]->[1] = 1 [exception] ok 6818 - our $x; local $x; use strict; $$x[0]->[1] = 1 [return] ok 6819 - our $x; local $x; use strict; $$x[0]->[1] = 1 [variable] ok 6820 - our $x; local $x; no strict; $$x[0]->[1] = 1 [exception] ok 6821 - our $x; local $x; no strict; $$x[0]->[1] = 1 [return] ok 6822 - our $x; local $x; no strict; $$x[0]->[1] = 1 [variable] ok 6823 - my @x; $x[0]->[1] = 1 [exception] ok 6824 - my @x; $x[0]->[1] = 1 [return] ok 6825 - my @x; $x[0]->[1] = 1 [variable] ok 6826 - our @x; local @x; use strict; $x[0]->[1] = 1 [exception] ok 6827 - our @x; local @x; use strict; $x[0]->[1] = 1 [return] ok 6828 - our @x; local @x; use strict; $x[0]->[1] = 1 [variable] ok 6829 - our @x; local @x; no strict; $x[0]->[1] = 1 [exception] ok 6830 - our @x; local @x; no strict; $x[0]->[1] = 1 [return] ok 6831 - our @x; local @x; no strict; $x[0]->[1] = 1 [variable] ok 6832 - my $x; $x->[0]->[1] = 1 [exception] ok 6833 - my $x; $x->[0]->[1] = 1 [return] ok 6834 - my $x; $x->[0]->[1] = 1 [variable] ok 6835 - our $x; local $x; use strict; $x->[0]->[1] = 1 [exception] ok 6836 - our $x; local $x; use strict; $x->[0]->[1] = 1 [return] ok 6837 - our $x; local $x; use strict; $x->[0]->[1] = 1 [variable] ok 6838 - our $x; local $x; no strict; $x->[0]->[1] = 1 [exception] ok 6839 - our $x; local $x; no strict; $x->[0]->[1] = 1 [return] ok 6840 - our $x; local $x; no strict; $x->[0]->[1] = 1 [variable] ok 6841 - my $x; $$x[0]->[1] = 1 [exception] ok 6842 - my $x; $$x[0]->[1] = 1 [return] ok 6843 - my $x; $$x[0]->[1] = 1 [variable] ok 6844 - our $x; local $x; use strict; $$x[0]->[1] = 1 [exception] ok 6845 - our $x; local $x; use strict; $$x[0]->[1] = 1 [return] ok 6846 - our $x; local $x; use strict; $$x[0]->[1] = 1 [variable] ok 6847 - our $x; local $x; no strict; $$x[0]->[1] = 1 [exception] ok 6848 - our $x; local $x; no strict; $$x[0]->[1] = 1 [return] ok 6849 - our $x; local $x; no strict; $$x[0]->[1] = 1 [variable] ok 6850 - my @x; $x[0]->[1] = 1 [exception] ok 6851 - my @x; $x[0]->[1] = 1 [return] ok 6852 - my @x; $x[0]->[1] = 1 [variable] ok 6853 - our @x; local @x; use strict; $x[0]->[1] = 1 [exception] ok 6854 - our @x; local @x; use strict; $x[0]->[1] = 1 [return] ok 6855 - our @x; local @x; use strict; $x[0]->[1] = 1 [variable] ok 6856 - our @x; local @x; no strict; $x[0]->[1] = 1 [exception] ok 6857 - our @x; local @x; no strict; $x[0]->[1] = 1 [return] ok 6858 - our @x; local @x; no strict; $x[0]->[1] = 1 [variable] ok 6859 - my $x; $x->[0]->[1] = 1 <+fetch> [exception] ok 6860 - my $x; $x->[0]->[1] = 1 <+fetch> [return] ok 6861 - my $x; $x->[0]->[1] = 1 <+fetch> [variable] ok 6862 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+fetch> [exception] ok 6863 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+fetch> [return] ok 6864 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+fetch> [variable] ok 6865 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+fetch> [exception] ok 6866 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+fetch> [return] ok 6867 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+fetch> [variable] ok 6868 - my $x; $$x[0]->[1] = 1 <+fetch> [exception] ok 6869 - my $x; $$x[0]->[1] = 1 <+fetch> [return] ok 6870 - my $x; $$x[0]->[1] = 1 <+fetch> [variable] ok 6871 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+fetch> [exception] ok 6872 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+fetch> [return] ok 6873 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+fetch> [variable] ok 6874 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+fetch> [exception] ok 6875 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+fetch> [return] ok 6876 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+fetch> [variable] ok 6877 - my @x; $x[0]->[1] = 1 <+fetch> [exception] ok 6878 - my @x; $x[0]->[1] = 1 <+fetch> [return] ok 6879 - my @x; $x[0]->[1] = 1 <+fetch> [variable] ok 6880 - our @x; local @x; use strict; $x[0]->[1] = 1 <+fetch> [exception] ok 6881 - our @x; local @x; use strict; $x[0]->[1] = 1 <+fetch> [return] ok 6882 - our @x; local @x; use strict; $x[0]->[1] = 1 <+fetch> [variable] ok 6883 - our @x; local @x; no strict; $x[0]->[1] = 1 <+fetch> [exception] ok 6884 - our @x; local @x; no strict; $x[0]->[1] = 1 <+fetch> [return] ok 6885 - our @x; local @x; no strict; $x[0]->[1] = 1 <+fetch> [variable] ok 6886 - my $x; $x->[0]->[1] = 1 <+exists> [exception] ok 6887 - my $x; $x->[0]->[1] = 1 <+exists> [return] ok 6888 - my $x; $x->[0]->[1] = 1 <+exists> [variable] ok 6889 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+exists> [exception] ok 6890 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+exists> [return] ok 6891 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+exists> [variable] ok 6892 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+exists> [exception] ok 6893 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+exists> [return] ok 6894 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+exists> [variable] ok 6895 - my $x; $$x[0]->[1] = 1 <+exists> [exception] ok 6896 - my $x; $$x[0]->[1] = 1 <+exists> [return] ok 6897 - my $x; $$x[0]->[1] = 1 <+exists> [variable] ok 6898 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+exists> [exception] ok 6899 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+exists> [return] ok 6900 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+exists> [variable] ok 6901 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+exists> [exception] ok 6902 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+exists> [return] ok 6903 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+exists> [variable] ok 6904 - my @x; $x[0]->[1] = 1 <+exists> [exception] ok 6905 - my @x; $x[0]->[1] = 1 <+exists> [return] ok 6906 - my @x; $x[0]->[1] = 1 <+exists> [variable] ok 6907 - our @x; local @x; use strict; $x[0]->[1] = 1 <+exists> [exception] ok 6908 - our @x; local @x; use strict; $x[0]->[1] = 1 <+exists> [return] ok 6909 - our @x; local @x; use strict; $x[0]->[1] = 1 <+exists> [variable] ok 6910 - our @x; local @x; no strict; $x[0]->[1] = 1 <+exists> [exception] ok 6911 - our @x; local @x; no strict; $x[0]->[1] = 1 <+exists> [return] ok 6912 - our @x; local @x; no strict; $x[0]->[1] = 1 <+exists> [variable] ok 6913 - my $x; $x->[0]->[1] = 1 <+delete> [exception] ok 6914 - my $x; $x->[0]->[1] = 1 <+delete> [return] ok 6915 - my $x; $x->[0]->[1] = 1 <+delete> [variable] ok 6916 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+delete> [exception] ok 6917 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+delete> [return] ok 6918 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+delete> [variable] ok 6919 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+delete> [exception] ok 6920 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+delete> [return] ok 6921 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+delete> [variable] ok 6922 - my $x; $$x[0]->[1] = 1 <+delete> [exception] ok 6923 - my $x; $$x[0]->[1] = 1 <+delete> [return] ok 6924 - my $x; $$x[0]->[1] = 1 <+delete> [variable] ok 6925 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+delete> [exception] ok 6926 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+delete> [return] ok 6927 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+delete> [variable] ok 6928 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+delete> [exception] ok 6929 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+delete> [return] ok 6930 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+delete> [variable] ok 6931 - my @x; $x[0]->[1] = 1 <+delete> [exception] ok 6932 - my @x; $x[0]->[1] = 1 <+delete> [return] ok 6933 - my @x; $x[0]->[1] = 1 <+delete> [variable] ok 6934 - our @x; local @x; use strict; $x[0]->[1] = 1 <+delete> [exception] ok 6935 - our @x; local @x; use strict; $x[0]->[1] = 1 <+delete> [return] ok 6936 - our @x; local @x; use strict; $x[0]->[1] = 1 <+delete> [variable] ok 6937 - our @x; local @x; no strict; $x[0]->[1] = 1 <+delete> [exception] ok 6938 - our @x; local @x; no strict; $x[0]->[1] = 1 <+delete> [return] ok 6939 - our @x; local @x; no strict; $x[0]->[1] = 1 <+delete> [variable] ok 6940 - my $x; $x->[0]->[1] = 1 <+store> [exception] ok 6941 - my $x; $x->[0]->[1] = 1 <+store> [return] ok 6942 - my $x; $x->[0]->[1] = 1 <+store> [variable] ok 6943 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+store> [exception] ok 6944 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+store> [return] ok 6945 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+store> [variable] ok 6946 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+store> [exception] ok 6947 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+store> [return] ok 6948 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+store> [variable] ok 6949 - my $x; $$x[0]->[1] = 1 <+store> [exception] ok 6950 - my $x; $$x[0]->[1] = 1 <+store> [return] ok 6951 - my $x; $$x[0]->[1] = 1 <+store> [variable] ok 6952 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+store> [exception] ok 6953 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+store> [return] ok 6954 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+store> [variable] ok 6955 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+store> [exception] ok 6956 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+store> [return] ok 6957 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+store> [variable] ok 6958 - my @x; $x[0]->[1] = 1 <+store> [exception] ok 6959 - my @x; $x[0]->[1] = 1 <+store> [return] ok 6960 - my @x; $x[0]->[1] = 1 <+store> [variable] ok 6961 - our @x; local @x; use strict; $x[0]->[1] = 1 <+store> [exception] ok 6962 - our @x; local @x; use strict; $x[0]->[1] = 1 <+store> [return] ok 6963 - our @x; local @x; use strict; $x[0]->[1] = 1 <+store> [variable] ok 6964 - our @x; local @x; no strict; $x[0]->[1] = 1 <+store> [exception] ok 6965 - our @x; local @x; no strict; $x[0]->[1] = 1 <+store> [return] ok 6966 - our @x; local @x; no strict; $x[0]->[1] = 1 <+store> [variable] ok 6967 - my $x; $x->[0]->[1] = 1 <+strict +fetch> [exception] ok 6968 - my $x; $x->[0]->[1] = 1 <+strict +fetch> [return] ok 6969 - my $x; $x->[0]->[1] = 1 <+strict +fetch> [variable] ok 6970 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +fetch> [exception] ok 6971 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +fetch> [return] ok 6972 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +fetch> [variable] ok 6973 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +fetch> [exception] ok 6974 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +fetch> [return] ok 6975 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +fetch> [variable] ok 6976 - my $x; $$x[0]->[1] = 1 <+strict +fetch> [exception] ok 6977 - my $x; $$x[0]->[1] = 1 <+strict +fetch> [return] ok 6978 - my $x; $$x[0]->[1] = 1 <+strict +fetch> [variable] ok 6979 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +fetch> [exception] ok 6980 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +fetch> [return] ok 6981 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +fetch> [variable] ok 6982 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +fetch> [exception] ok 6983 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +fetch> [return] ok 6984 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +fetch> [variable] ok 6985 - my @x; $x[0]->[1] = 1 <+strict +fetch> [exception] ok 6986 - my @x; $x[0]->[1] = 1 <+strict +fetch> [return] ok 6987 - my @x; $x[0]->[1] = 1 <+strict +fetch> [variable] ok 6988 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +fetch> [exception] ok 6989 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +fetch> [return] ok 6990 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +fetch> [variable] ok 6991 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +fetch> [exception] ok 6992 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +fetch> [return] ok 6993 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +fetch> [variable] ok 6994 - my $x; $x->[0]->[1] = 1 <+strict +exists> [exception] ok 6995 - my $x; $x->[0]->[1] = 1 <+strict +exists> [return] ok 6996 - my $x; $x->[0]->[1] = 1 <+strict +exists> [variable] ok 6997 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +exists> [exception] ok 6998 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +exists> [return] ok 6999 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +exists> [variable] ok 7000 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +exists> [exception] ok 7001 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +exists> [return] ok 7002 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +exists> [variable] ok 7003 - my $x; $$x[0]->[1] = 1 <+strict +exists> [exception] ok 7004 - my $x; $$x[0]->[1] = 1 <+strict +exists> [return] ok 7005 - my $x; $$x[0]->[1] = 1 <+strict +exists> [variable] ok 7006 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +exists> [exception] ok 7007 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +exists> [return] ok 7008 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +exists> [variable] ok 7009 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +exists> [exception] ok 7010 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +exists> [return] ok 7011 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +exists> [variable] ok 7012 - my @x; $x[0]->[1] = 1 <+strict +exists> [exception] ok 7013 - my @x; $x[0]->[1] = 1 <+strict +exists> [return] ok 7014 - my @x; $x[0]->[1] = 1 <+strict +exists> [variable] ok 7015 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +exists> [exception] ok 7016 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +exists> [return] ok 7017 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +exists> [variable] ok 7018 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +exists> [exception] ok 7019 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +exists> [return] ok 7020 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +exists> [variable] ok 7021 - my $x; $x->[0]->[1] = 1 <+strict +delete> [exception] ok 7022 - my $x; $x->[0]->[1] = 1 <+strict +delete> [return] ok 7023 - my $x; $x->[0]->[1] = 1 <+strict +delete> [variable] ok 7024 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +delete> [exception] ok 7025 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +delete> [return] ok 7026 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +delete> [variable] ok 7027 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +delete> [exception] ok 7028 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +delete> [return] ok 7029 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +delete> [variable] ok 7030 - my $x; $$x[0]->[1] = 1 <+strict +delete> [exception] ok 7031 - my $x; $$x[0]->[1] = 1 <+strict +delete> [return] ok 7032 - my $x; $$x[0]->[1] = 1 <+strict +delete> [variable] ok 7033 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +delete> [exception] ok 7034 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +delete> [return] ok 7035 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +delete> [variable] ok 7036 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +delete> [exception] ok 7037 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +delete> [return] ok 7038 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +delete> [variable] ok 7039 - my @x; $x[0]->[1] = 1 <+strict +delete> [exception] ok 7040 - my @x; $x[0]->[1] = 1 <+strict +delete> [return] ok 7041 - my @x; $x[0]->[1] = 1 <+strict +delete> [variable] ok 7042 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +delete> [exception] ok 7043 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +delete> [return] ok 7044 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +delete> [variable] ok 7045 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +delete> [exception] ok 7046 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +delete> [return] ok 7047 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +delete> [variable] ok 7048 - my $x; $x->[0]->[1] = 1 <+strict +store> [exception] ok 7049 - my $x; $x->[0]->[1] = 1 <+strict +store> [return] ok 7050 - my $x; $x->[0]->[1] = 1 <+strict +store> [variable] ok 7051 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +store> [exception] ok 7052 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +store> [return] ok 7053 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +store> [variable] ok 7054 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +store> [exception] ok 7055 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +store> [return] ok 7056 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +store> [variable] ok 7057 - my $x; $$x[0]->[1] = 1 <+strict +store> [exception] ok 7058 - my $x; $$x[0]->[1] = 1 <+strict +store> [return] ok 7059 - my $x; $$x[0]->[1] = 1 <+strict +store> [variable] ok 7060 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +store> [exception] ok 7061 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +store> [return] ok 7062 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +store> [variable] ok 7063 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +store> [exception] ok 7064 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +store> [return] ok 7065 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +store> [variable] ok 7066 - my @x; $x[0]->[1] = 1 <+strict +store> [exception] ok 7067 - my @x; $x[0]->[1] = 1 <+strict +store> [return] ok 7068 - my @x; $x[0]->[1] = 1 <+strict +store> [variable] ok 7069 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +store> [exception] ok 7070 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +store> [return] ok 7071 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +store> [variable] ok 7072 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +store> [exception] ok 7073 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +store> [return] ok 7074 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +store> [variable] ok 7075 - my $x; $x->[0] = 1; $x->[0] = 2 <+fetch> [exception] ok 7076 - my $x; $x->[0] = 1; $x->[0] = 2 <+fetch> [return] ok 7077 - my $x; $x->[0] = 1; $x->[0] = 2 <+fetch> [variable] ok 7078 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+fetch> [exception] ok 7079 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+fetch> [return] ok 7080 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+fetch> [variable] ok 7081 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+fetch> [exception] ok 7082 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+fetch> [return] ok 7083 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+fetch> [variable] ok 7084 - my $x; $x->[0] = 1; $$x[0] = 2 <+fetch> [exception] ok 7085 - my $x; $x->[0] = 1; $$x[0] = 2 <+fetch> [return] ok 7086 - my $x; $x->[0] = 1; $$x[0] = 2 <+fetch> [variable] ok 7087 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+fetch> [exception] ok 7088 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+fetch> [return] ok 7089 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+fetch> [variable] ok 7090 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+fetch> [exception] ok 7091 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+fetch> [return] ok 7092 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+fetch> [variable] ok 7093 - my @x; $x[0] = 1; $x[0] = 2 <+fetch> [exception] ok 7094 - my @x; $x[0] = 1; $x[0] = 2 <+fetch> [return] ok 7095 - my @x; $x[0] = 1; $x[0] = 2 <+fetch> [variable] ok 7096 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+fetch> [exception] ok 7097 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+fetch> [return] ok 7098 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+fetch> [variable] ok 7099 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+fetch> [exception] ok 7100 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+fetch> [return] ok 7101 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+fetch> [variable] ok 7102 - my $x; $x->[0] = 1; $x->[1] = 2 <+fetch> [exception] ok 7103 - my $x; $x->[0] = 1; $x->[1] = 2 <+fetch> [return] ok 7104 - my $x; $x->[0] = 1; $x->[1] = 2 <+fetch> [variable] ok 7105 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+fetch> [exception] ok 7106 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+fetch> [return] ok 7107 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+fetch> [variable] ok 7108 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+fetch> [exception] ok 7109 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+fetch> [return] ok 7110 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+fetch> [variable] ok 7111 - my $x; $x->[0] = 1; $$x[1] = 2 <+fetch> [exception] ok 7112 - my $x; $x->[0] = 1; $$x[1] = 2 <+fetch> [return] ok 7113 - my $x; $x->[0] = 1; $$x[1] = 2 <+fetch> [variable] ok 7114 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+fetch> [exception] ok 7115 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+fetch> [return] ok 7116 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+fetch> [variable] ok 7117 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+fetch> [exception] ok 7118 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+fetch> [return] ok 7119 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+fetch> [variable] ok 7120 - my @x; $x[0] = 1; $x[1] = 2 <+fetch> [exception] ok 7121 - my @x; $x[0] = 1; $x[1] = 2 <+fetch> [return] ok 7122 - my @x; $x[0] = 1; $x[1] = 2 <+fetch> [variable] ok 7123 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+fetch> [exception] ok 7124 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+fetch> [return] ok 7125 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+fetch> [variable] ok 7126 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+fetch> [exception] ok 7127 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+fetch> [return] ok 7128 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+fetch> [variable] ok 7129 - my $x; $x->[0] = 1; $x->[0] = 2 <+exists> [exception] ok 7130 - my $x; $x->[0] = 1; $x->[0] = 2 <+exists> [return] ok 7131 - my $x; $x->[0] = 1; $x->[0] = 2 <+exists> [variable] ok 7132 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+exists> [exception] ok 7133 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+exists> [return] ok 7134 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+exists> [variable] ok 7135 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+exists> [exception] ok 7136 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+exists> [return] ok 7137 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+exists> [variable] ok 7138 - my $x; $x->[0] = 1; $$x[0] = 2 <+exists> [exception] ok 7139 - my $x; $x->[0] = 1; $$x[0] = 2 <+exists> [return] ok 7140 - my $x; $x->[0] = 1; $$x[0] = 2 <+exists> [variable] ok 7141 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+exists> [exception] ok 7142 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+exists> [return] ok 7143 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+exists> [variable] ok 7144 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+exists> [exception] ok 7145 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+exists> [return] ok 7146 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+exists> [variable] ok 7147 - my @x; $x[0] = 1; $x[0] = 2 <+exists> [exception] ok 7148 - my @x; $x[0] = 1; $x[0] = 2 <+exists> [return] ok 7149 - my @x; $x[0] = 1; $x[0] = 2 <+exists> [variable] ok 7150 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+exists> [exception] ok 7151 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+exists> [return] ok 7152 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+exists> [variable] ok 7153 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+exists> [exception] ok 7154 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+exists> [return] ok 7155 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+exists> [variable] ok 7156 - my $x; $x->[0] = 1; $x->[1] = 2 <+exists> [exception] ok 7157 - my $x; $x->[0] = 1; $x->[1] = 2 <+exists> [return] ok 7158 - my $x; $x->[0] = 1; $x->[1] = 2 <+exists> [variable] ok 7159 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+exists> [exception] ok 7160 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+exists> [return] ok 7161 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+exists> [variable] ok 7162 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+exists> [exception] ok 7163 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+exists> [return] ok 7164 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+exists> [variable] ok 7165 - my $x; $x->[0] = 1; $$x[1] = 2 <+exists> [exception] ok 7166 - my $x; $x->[0] = 1; $$x[1] = 2 <+exists> [return] ok 7167 - my $x; $x->[0] = 1; $$x[1] = 2 <+exists> [variable] ok 7168 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+exists> [exception] ok 7169 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+exists> [return] ok 7170 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+exists> [variable] ok 7171 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+exists> [exception] ok 7172 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+exists> [return] ok 7173 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+exists> [variable] ok 7174 - my @x; $x[0] = 1; $x[1] = 2 <+exists> [exception] ok 7175 - my @x; $x[0] = 1; $x[1] = 2 <+exists> [return] ok 7176 - my @x; $x[0] = 1; $x[1] = 2 <+exists> [variable] ok 7177 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+exists> [exception] ok 7178 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+exists> [return] ok 7179 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+exists> [variable] ok 7180 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+exists> [exception] ok 7181 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+exists> [return] ok 7182 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+exists> [variable] ok 7183 - my $x; $x->[0] = 1; $x->[0] = 2 <+delete> [exception] ok 7184 - my $x; $x->[0] = 1; $x->[0] = 2 <+delete> [return] ok 7185 - my $x; $x->[0] = 1; $x->[0] = 2 <+delete> [variable] ok 7186 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+delete> [exception] ok 7187 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+delete> [return] ok 7188 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+delete> [variable] ok 7189 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+delete> [exception] ok 7190 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+delete> [return] ok 7191 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+delete> [variable] ok 7192 - my $x; $x->[0] = 1; $$x[0] = 2 <+delete> [exception] ok 7193 - my $x; $x->[0] = 1; $$x[0] = 2 <+delete> [return] ok 7194 - my $x; $x->[0] = 1; $$x[0] = 2 <+delete> [variable] ok 7195 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+delete> [exception] ok 7196 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+delete> [return] ok 7197 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+delete> [variable] ok 7198 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+delete> [exception] ok 7199 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+delete> [return] ok 7200 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+delete> [variable] ok 7201 - my @x; $x[0] = 1; $x[0] = 2 <+delete> [exception] ok 7202 - my @x; $x[0] = 1; $x[0] = 2 <+delete> [return] ok 7203 - my @x; $x[0] = 1; $x[0] = 2 <+delete> [variable] ok 7204 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+delete> [exception] ok 7205 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+delete> [return] ok 7206 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+delete> [variable] ok 7207 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+delete> [exception] ok 7208 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+delete> [return] ok 7209 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+delete> [variable] ok 7210 - my $x; $x->[0] = 1; $x->[1] = 2 <+delete> [exception] ok 7211 - my $x; $x->[0] = 1; $x->[1] = 2 <+delete> [return] ok 7212 - my $x; $x->[0] = 1; $x->[1] = 2 <+delete> [variable] ok 7213 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+delete> [exception] ok 7214 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+delete> [return] ok 7215 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+delete> [variable] ok 7216 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+delete> [exception] ok 7217 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+delete> [return] ok 7218 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+delete> [variable] ok 7219 - my $x; $x->[0] = 1; $$x[1] = 2 <+delete> [exception] ok 7220 - my $x; $x->[0] = 1; $$x[1] = 2 <+delete> [return] ok 7221 - my $x; $x->[0] = 1; $$x[1] = 2 <+delete> [variable] ok 7222 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+delete> [exception] ok 7223 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+delete> [return] ok 7224 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+delete> [variable] ok 7225 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+delete> [exception] ok 7226 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+delete> [return] ok 7227 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+delete> [variable] ok 7228 - my @x; $x[0] = 1; $x[1] = 2 <+delete> [exception] ok 7229 - my @x; $x[0] = 1; $x[1] = 2 <+delete> [return] ok 7230 - my @x; $x[0] = 1; $x[1] = 2 <+delete> [variable] ok 7231 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+delete> [exception] ok 7232 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+delete> [return] ok 7233 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+delete> [variable] ok 7234 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+delete> [exception] ok 7235 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+delete> [return] ok 7236 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+delete> [variable] ok 7237 - my $x; $x->[0] = 1; $x->[0] = 2 <+store> [exception] ok 7238 - my $x; $x->[0] = 1; $x->[0] = 2 <+store> [return] ok 7239 - my $x; $x->[0] = 1; $x->[0] = 2 <+store> [variable] ok 7240 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+store> [exception] ok 7241 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+store> [return] ok 7242 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+store> [variable] ok 7243 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+store> [exception] ok 7244 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+store> [return] ok 7245 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+store> [variable] ok 7246 - my $x; $x->[0] = 1; $$x[0] = 2 <+store> [exception] ok 7247 - my $x; $x->[0] = 1; $$x[0] = 2 <+store> [return] ok 7248 - my $x; $x->[0] = 1; $$x[0] = 2 <+store> [variable] ok 7249 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+store> [exception] ok 7250 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+store> [return] ok 7251 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+store> [variable] ok 7252 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+store> [exception] ok 7253 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+store> [return] ok 7254 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+store> [variable] ok 7255 - my @x; $x[0] = 1; $x[0] = 2 <+store> [exception] ok 7256 - my @x; $x[0] = 1; $x[0] = 2 <+store> [return] ok 7257 - my @x; $x[0] = 1; $x[0] = 2 <+store> [variable] ok 7258 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+store> [exception] ok 7259 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+store> [return] ok 7260 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+store> [variable] ok 7261 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+store> [exception] ok 7262 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+store> [return] ok 7263 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+store> [variable] ok 7264 - my $x; $x->[0] = 1; $x->[1] = 2 <+store> [exception] ok 7265 - my $x; $x->[0] = 1; $x->[1] = 2 <+store> [return] ok 7266 - my $x; $x->[0] = 1; $x->[1] = 2 <+store> [variable] ok 7267 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+store> [exception] ok 7268 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+store> [return] ok 7269 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+store> [variable] ok 7270 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+store> [exception] ok 7271 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+store> [return] ok 7272 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+store> [variable] ok 7273 - my $x; $x->[0] = 1; $$x[1] = 2 <+store> [exception] ok 7274 - my $x; $x->[0] = 1; $$x[1] = 2 <+store> [return] ok 7275 - my $x; $x->[0] = 1; $$x[1] = 2 <+store> [variable] ok 7276 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+store> [exception] ok 7277 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+store> [return] ok 7278 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+store> [variable] ok 7279 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+store> [exception] ok 7280 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+store> [return] ok 7281 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+store> [variable] ok 7282 - my @x; $x[0] = 1; $x[1] = 2 <+store> [exception] ok 7283 - my @x; $x[0] = 1; $x[1] = 2 <+store> [return] ok 7284 - my @x; $x[0] = 1; $x[1] = 2 <+store> [variable] ok 7285 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+store> [exception] ok 7286 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+store> [return] ok 7287 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+store> [variable] ok 7288 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+store> [exception] ok 7289 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+store> [return] ok 7290 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+store> [variable] ok 7291 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [exception] ok 7292 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [return] ok 7293 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [variable] ok 7294 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [exception] ok 7295 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [return] ok 7296 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [variable] ok 7297 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [exception] ok 7298 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [return] ok 7299 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [variable] ok 7300 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [exception] ok 7301 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [return] ok 7302 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [variable] ok 7303 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [exception] ok 7304 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [return] ok 7305 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [variable] ok 7306 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [exception] ok 7307 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [return] ok 7308 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [variable] ok 7309 - my @x; $x[0] = 1; $x[0] = 2 <+strict +fetch> [exception] ok 7310 - my @x; $x[0] = 1; $x[0] = 2 <+strict +fetch> [return] ok 7311 - my @x; $x[0] = 1; $x[0] = 2 <+strict +fetch> [variable] ok 7312 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +fetch> [exception] ok 7313 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +fetch> [return] ok 7314 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +fetch> [variable] ok 7315 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +fetch> [exception] ok 7316 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +fetch> [return] ok 7317 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +fetch> [variable] ok 7318 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [exception] ok 7319 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [return] ok 7320 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [variable] ok 7321 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [exception] ok 7322 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [return] ok 7323 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [variable] ok 7324 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [exception] ok 7325 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [return] ok 7326 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [variable] ok 7327 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [exception] ok 7328 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [return] ok 7329 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [variable] ok 7330 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [exception] ok 7331 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [return] ok 7332 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [variable] ok 7333 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [exception] ok 7334 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [return] ok 7335 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [variable] ok 7336 - my @x; $x[0] = 1; $x[1] = 2 <+strict +fetch> [exception] ok 7337 - my @x; $x[0] = 1; $x[1] = 2 <+strict +fetch> [return] ok 7338 - my @x; $x[0] = 1; $x[1] = 2 <+strict +fetch> [variable] ok 7339 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +fetch> [exception] ok 7340 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +fetch> [return] ok 7341 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +fetch> [variable] ok 7342 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +fetch> [exception] ok 7343 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +fetch> [return] ok 7344 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +fetch> [variable] ok 7345 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [exception] ok 7346 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [return] ok 7347 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [variable] ok 7348 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [exception] ok 7349 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [return] ok 7350 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [variable] ok 7351 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [exception] ok 7352 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [return] ok 7353 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [variable] ok 7354 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [exception] ok 7355 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [return] ok 7356 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [variable] ok 7357 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [exception] ok 7358 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [return] ok 7359 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [variable] ok 7360 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [exception] ok 7361 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [return] ok 7362 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [variable] ok 7363 - my @x; $x[0] = 1; $x[0] = 2 <+strict +exists> [exception] ok 7364 - my @x; $x[0] = 1; $x[0] = 2 <+strict +exists> [return] ok 7365 - my @x; $x[0] = 1; $x[0] = 2 <+strict +exists> [variable] ok 7366 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +exists> [exception] ok 7367 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +exists> [return] ok 7368 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +exists> [variable] ok 7369 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +exists> [exception] ok 7370 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +exists> [return] ok 7371 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +exists> [variable] ok 7372 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [exception] ok 7373 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [return] ok 7374 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [variable] ok 7375 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [exception] ok 7376 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [return] ok 7377 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [variable] ok 7378 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [exception] ok 7379 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [return] ok 7380 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [variable] ok 7381 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [exception] ok 7382 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [return] ok 7383 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [variable] ok 7384 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [exception] ok 7385 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [return] ok 7386 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [variable] ok 7387 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [exception] ok 7388 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [return] ok 7389 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [variable] ok 7390 - my @x; $x[0] = 1; $x[1] = 2 <+strict +exists> [exception] ok 7391 - my @x; $x[0] = 1; $x[1] = 2 <+strict +exists> [return] ok 7392 - my @x; $x[0] = 1; $x[1] = 2 <+strict +exists> [variable] ok 7393 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +exists> [exception] ok 7394 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +exists> [return] ok 7395 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +exists> [variable] ok 7396 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +exists> [exception] ok 7397 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +exists> [return] ok 7398 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +exists> [variable] ok 7399 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [exception] ok 7400 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [return] ok 7401 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [variable] ok 7402 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [exception] ok 7403 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [return] ok 7404 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [variable] ok 7405 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [exception] ok 7406 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [return] ok 7407 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [variable] ok 7408 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [exception] ok 7409 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [return] ok 7410 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [variable] ok 7411 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [exception] ok 7412 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [return] ok 7413 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [variable] ok 7414 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [exception] ok 7415 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [return] ok 7416 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [variable] ok 7417 - my @x; $x[0] = 1; $x[0] = 2 <+strict +delete> [exception] ok 7418 - my @x; $x[0] = 1; $x[0] = 2 <+strict +delete> [return] ok 7419 - my @x; $x[0] = 1; $x[0] = 2 <+strict +delete> [variable] ok 7420 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +delete> [exception] ok 7421 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +delete> [return] ok 7422 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +delete> [variable] ok 7423 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +delete> [exception] ok 7424 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +delete> [return] ok 7425 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +delete> [variable] ok 7426 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [exception] ok 7427 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [return] ok 7428 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [variable] ok 7429 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [exception] ok 7430 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [return] ok 7431 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [variable] ok 7432 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [exception] ok 7433 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [return] ok 7434 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [variable] ok 7435 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [exception] ok 7436 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [return] ok 7437 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [variable] ok 7438 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [exception] ok 7439 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [return] ok 7440 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [variable] ok 7441 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [exception] ok 7442 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [return] ok 7443 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [variable] ok 7444 - my @x; $x[0] = 1; $x[1] = 2 <+strict +delete> [exception] ok 7445 - my @x; $x[0] = 1; $x[1] = 2 <+strict +delete> [return] ok 7446 - my @x; $x[0] = 1; $x[1] = 2 <+strict +delete> [variable] ok 7447 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +delete> [exception] ok 7448 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +delete> [return] ok 7449 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +delete> [variable] ok 7450 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +delete> [exception] ok 7451 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +delete> [return] ok 7452 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +delete> [variable] ok 7453 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +store> [exception] ok 7454 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +store> [return] ok 7455 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +store> [variable] ok 7456 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +store> [exception] ok 7457 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +store> [return] ok 7458 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +store> [variable] ok 7459 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +store> [exception] ok 7460 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +store> [return] ok 7461 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +store> [variable] ok 7462 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +store> [exception] ok 7463 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +store> [return] ok 7464 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +store> [variable] ok 7465 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +store> [exception] ok 7466 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +store> [return] ok 7467 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +store> [variable] ok 7468 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +store> [exception] ok 7469 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +store> [return] ok 7470 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +store> [variable] ok 7471 - my @x; $x[0] = 1; $x[0] = 2 <+strict +store> [exception] ok 7472 - my @x; $x[0] = 1; $x[0] = 2 <+strict +store> [return] ok 7473 - my @x; $x[0] = 1; $x[0] = 2 <+strict +store> [variable] ok 7474 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +store> [exception] ok 7475 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +store> [return] ok 7476 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +store> [variable] ok 7477 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +store> [exception] ok 7478 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +store> [return] ok 7479 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +store> [variable] ok 7480 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +store> [exception] ok 7481 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +store> [return] ok 7482 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +store> [variable] ok 7483 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +store> [exception] ok 7484 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +store> [return] ok 7485 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +store> [variable] ok 7486 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +store> [exception] ok 7487 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +store> [return] ok 7488 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +store> [variable] ok 7489 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +store> [exception] ok 7490 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +store> [return] ok 7491 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +store> [variable] ok 7492 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +store> [exception] ok 7493 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +store> [return] ok 7494 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +store> [variable] ok 7495 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +store> [exception] ok 7496 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +store> [return] ok 7497 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +store> [variable] ok 7498 - my @x; $x[0] = 1; $x[1] = 2 <+strict +store> [exception] ok 7499 - my @x; $x[0] = 1; $x[1] = 2 <+strict +store> [return] ok 7500 - my @x; $x[0] = 1; $x[1] = 2 <+strict +store> [variable] ok 7501 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +store> [exception] ok 7502 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +store> [return] ok 7503 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +store> [variable] ok 7504 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +store> [exception] ok 7505 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +store> [return] ok 7506 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +store> [variable] ok 7507 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [exception] ok 7508 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [return] ok 7509 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [variable] ok 7510 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [exception] ok 7511 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [return] ok 7512 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [variable] ok 7513 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [exception] ok 7514 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [return] ok 7515 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [variable] ok 7516 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [exception] ok 7517 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [return] ok 7518 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [variable] ok 7519 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [exception] ok 7520 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [return] ok 7521 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [variable] ok 7522 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [exception] ok 7523 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [return] ok 7524 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [variable] ok 7525 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [exception] ok 7526 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [return] ok 7527 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [variable] ok 7528 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [exception] ok 7529 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [return] ok 7530 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [variable] ok 7531 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [exception] ok 7532 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [return] ok 7533 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [variable] ok 7534 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [exception] ok 7535 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [return] ok 7536 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [variable] ok 7537 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [exception] ok 7538 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [return] ok 7539 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [variable] ok 7540 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [exception] ok 7541 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [return] ok 7542 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [variable] ok 7543 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [exception] ok 7544 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [return] ok 7545 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [variable] ok 7546 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [exception] ok 7547 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [return] ok 7548 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [variable] ok 7549 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [exception] ok 7550 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [return] ok 7551 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [variable] ok 7552 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [exception] ok 7553 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [return] ok 7554 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [variable] ok 7555 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [exception] ok 7556 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [return] ok 7557 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [variable] ok 7558 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [exception] ok 7559 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [return] ok 7560 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [variable] ok 7561 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [exception] ok 7562 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [return] ok 7563 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [variable] ok 7564 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [exception] ok 7565 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [return] ok 7566 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [variable] ok 7567 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [exception] ok 7568 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [return] ok 7569 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [variable] ok 7570 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [exception] ok 7571 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [return] ok 7572 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [variable] ok 7573 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [exception] ok 7574 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [return] ok 7575 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [variable] ok 7576 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [exception] ok 7577 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [return] ok 7578 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [variable] ok 7579 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [exception] ok 7580 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [return] ok 7581 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [variable] ok 7582 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [exception] ok 7583 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [return] ok 7584 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [variable] ok 7585 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [exception] ok 7586 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [return] ok 7587 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [variable] ok 7588 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [exception] ok 7589 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [return] ok 7590 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [variable] ok 7591 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [exception] ok 7592 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [return] ok 7593 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [variable] ok 7594 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [exception] ok 7595 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [return] ok 7596 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [variable] ok 7597 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [exception] ok 7598 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [return] ok 7599 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [variable] ok 7600 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [exception] ok 7601 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [return] ok 7602 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [variable] ok 7603 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [exception] ok 7604 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [return] ok 7605 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [variable] ok 7606 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [exception] ok 7607 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [return] ok 7608 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [variable] ok 7609 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [exception] ok 7610 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [return] ok 7611 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [variable] ok 7612 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [exception] ok 7613 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [return] ok 7614 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [variable] ok 7615 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [exception] ok 7616 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [return] ok 7617 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [variable] ok 7618 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [exception] ok 7619 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [return] ok 7620 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [variable] ok 7621 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [exception] ok 7622 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [return] ok 7623 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [variable] ok 7624 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [exception] ok 7625 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [return] ok 7626 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [variable] ok 7627 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [exception] ok 7628 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [return] ok 7629 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [variable] ok 7630 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [exception] ok 7631 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [return] ok 7632 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [variable] ok 7633 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [exception] ok 7634 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [return] ok 7635 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [variable] ok 7636 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [exception] ok 7637 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [return] ok 7638 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [variable] ok 7639 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [exception] ok 7640 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [return] ok 7641 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [variable] ok 7642 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [exception] ok 7643 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [return] ok 7644 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [variable] ok 7645 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [exception] ok 7646 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [return] ok 7647 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [variable] ok 7648 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [exception] ok 7649 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [return] ok 7650 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [variable] ok 7651 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [exception] ok 7652 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [return] ok 7653 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [variable] ok 7654 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [exception] ok 7655 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [return] ok 7656 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [variable] ok 7657 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [exception] ok 7658 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [return] ok 7659 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [variable] ok 7660 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [exception] ok 7661 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [return] ok 7662 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [variable] ok 7663 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [exception] ok 7664 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [return] ok 7665 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [variable] ok 7666 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [exception] ok 7667 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [return] ok 7668 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [variable] ok 7669 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [exception] ok 7670 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [return] ok 7671 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [variable] ok 7672 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [exception] ok 7673 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [return] ok 7674 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [variable] ok 7675 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [exception] ok 7676 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [return] ok 7677 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [variable] ok 7678 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [exception] ok 7679 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [return] ok 7680 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [variable] ok 7681 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [exception] ok 7682 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [return] ok 7683 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [variable] ok 7684 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [exception] ok 7685 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [return] ok 7686 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [variable] ok 7687 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [exception] ok 7688 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [return] ok 7689 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [variable] ok 7690 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [exception] ok 7691 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [return] ok 7692 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [variable] ok 7693 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [exception] ok 7694 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [return] ok 7695 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [variable] ok 7696 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [exception] ok 7697 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [return] ok 7698 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [variable] ok 7699 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [exception] ok 7700 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [return] ok 7701 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [variable] ok 7702 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [exception] ok 7703 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [return] ok 7704 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [variable] ok 7705 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [exception] ok 7706 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [return] ok 7707 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [variable] ok 7708 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [exception] ok 7709 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [return] ok 7710 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [variable] ok 7711 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [exception] ok 7712 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [return] ok 7713 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [variable] ok 7714 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [exception] ok 7715 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [return] ok 7716 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [variable] ok 7717 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [exception] ok 7718 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [return] ok 7719 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [variable] ok 7720 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [exception] ok 7721 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [return] ok 7722 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [variable] ok 7723 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [exception] ok 7724 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [return] ok 7725 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [variable] ok 7726 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [exception] ok 7727 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [return] ok 7728 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [variable] ok 7729 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [exception] ok 7730 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [return] ok 7731 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [variable] ok 7732 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [exception] ok 7733 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [return] ok 7734 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [variable] ok 7735 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [exception] ok 7736 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [return] ok 7737 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [variable] ok 7738 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [exception] ok 7739 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [return] ok 7740 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [variable] ok 7741 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [exception] ok 7742 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [return] ok 7743 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [variable] ok 7744 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [exception] ok 7745 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [return] ok 7746 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [variable] ok 7747 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [exception] ok 7748 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [return] ok 7749 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [variable] ok 7750 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [exception] ok 7751 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [return] ok 7752 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [variable] ok 7753 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [exception] ok 7754 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [return] ok 7755 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [variable] ok 7756 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [exception] ok 7757 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [return] ok 7758 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [variable] ok 7759 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [exception] ok 7760 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [return] ok 7761 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [variable] ok 7762 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [exception] ok 7763 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [return] ok 7764 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [variable] ok 7765 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [exception] ok 7766 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [return] ok 7767 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [variable] ok 7768 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [exception] ok 7769 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [return] ok 7770 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [variable] ok 7771 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [exception] ok 7772 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [return] ok 7773 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [variable] ok 7774 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [exception] ok 7775 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [return] ok 7776 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [variable] ok 7777 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [exception] ok 7778 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [return] ok 7779 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [variable] ok 7780 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [exception] ok 7781 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [return] ok 7782 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [variable] ok 7783 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [exception] ok 7784 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [return] ok 7785 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [variable] ok 7786 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [exception] ok 7787 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [return] ok 7788 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [variable] ok 7789 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [exception] ok 7790 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [return] ok 7791 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [variable] ok 7792 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [exception] ok 7793 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [return] ok 7794 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [variable] ok 7795 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [exception] ok 7796 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [return] ok 7797 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [variable] ok 7798 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [exception] ok 7799 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [return] ok 7800 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [variable] ok 7801 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [exception] ok 7802 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [return] ok 7803 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [variable] ok 7804 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [exception] ok 7805 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [return] ok 7806 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [variable] ok 7807 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [exception] ok 7808 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [return] ok 7809 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [variable] ok 7810 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [exception] ok 7811 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [return] ok 7812 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [variable] ok 7813 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [exception] ok 7814 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [return] ok 7815 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [variable] ok 7816 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [exception] ok 7817 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [return] ok 7818 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [variable] ok 7819 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [exception] ok 7820 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [return] ok 7821 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [variable] ok 7822 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [exception] ok 7823 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [return] ok 7824 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [variable] ok 7825 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [exception] ok 7826 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [return] ok 7827 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [variable] ok 7828 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [exception] ok 7829 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [return] ok 7830 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [variable] ok 7831 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [exception] ok 7832 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [return] ok 7833 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [variable] ok 7834 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [exception] ok 7835 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [return] ok 7836 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [variable] ok 7837 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [exception] ok 7838 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [return] ok 7839 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [variable] ok 7840 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [exception] ok 7841 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [return] ok 7842 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [variable] ok 7843 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [exception] ok 7844 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [return] ok 7845 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [variable] ok 7846 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [exception] ok 7847 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [return] ok 7848 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [variable] ok 7849 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [exception] ok 7850 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [return] ok 7851 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [variable] ok 7852 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [exception] ok 7853 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [return] ok 7854 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [variable] ok 7855 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [exception] ok 7856 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [return] ok 7857 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [variable] ok 7858 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [exception] ok 7859 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [return] ok 7860 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [variable] ok 7861 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [exception] ok 7862 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [return] ok 7863 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [variable] ok 7864 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [exception] ok 7865 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [return] ok 7866 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [variable] ok 7867 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [exception] ok 7868 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [return] ok 7869 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [variable] ok 7870 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [exception] ok 7871 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [return] ok 7872 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [variable] ok 7873 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [exception] ok 7874 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [return] ok 7875 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [variable] ok 7876 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [exception] ok 7877 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [return] ok 7878 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [variable] ok 7879 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [exception] ok 7880 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [return] ok 7881 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [variable] ok 7882 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [exception] ok 7883 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [return] ok 7884 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [variable] ok 7885 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [exception] ok 7886 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [return] ok 7887 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [variable] ok 7888 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [exception] ok 7889 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [return] ok 7890 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [variable] ok 7891 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [exception] ok 7892 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [return] ok 7893 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [variable] ok 7894 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [exception] ok 7895 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [return] ok 7896 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [variable] ok 7897 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [exception] ok 7898 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [return] ok 7899 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [variable] ok 7900 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [exception] ok 7901 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [return] ok 7902 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [variable] ok 7903 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [exception] ok 7904 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [return] ok 7905 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [variable] ok 7906 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [exception] ok 7907 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [return] ok 7908 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [variable] ok 7909 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [exception] ok 7910 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [return] ok 7911 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [variable] ok 7912 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [exception] ok 7913 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [return] ok 7914 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [variable] ok 7915 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [exception] ok 7916 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [return] ok 7917 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [variable] ok 7918 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [exception] ok 7919 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [return] ok 7920 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [variable] ok 7921 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [exception] ok 7922 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [return] ok 7923 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [variable] ok 7924 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [exception] ok 7925 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [return] ok 7926 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [variable] ok 7927 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [exception] ok 7928 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [return] ok 7929 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [variable] ok 7930 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [exception] ok 7931 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [return] ok 7932 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [variable] ok 7933 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [exception] ok 7934 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [return] ok 7935 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [variable] ok 7936 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [exception] ok 7937 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [return] ok 7938 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [variable] ok 7939 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [exception] ok 7940 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [return] ok 7941 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [variable] ok 7942 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [exception] ok 7943 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [return] ok 7944 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [variable] ok 7945 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [exception] ok 7946 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [return] ok 7947 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [variable] ok 7948 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [exception] ok 7949 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [return] ok 7950 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [variable] ok 7951 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [exception] ok 7952 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [return] ok 7953 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [variable] ok 7954 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [exception] ok 7955 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [return] ok 7956 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [variable] ok 7957 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [exception] ok 7958 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [return] ok 7959 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [variable] ok 7960 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [exception] ok 7961 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [return] ok 7962 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [variable] ok 7963 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [exception] ok 7964 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [return] ok 7965 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [variable] ok 7966 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [exception] ok 7967 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [return] ok 7968 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [variable] ok 7969 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [exception] ok 7970 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [return] ok 7971 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [variable] ok 7972 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [exception] ok 7973 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [return] ok 7974 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [variable] ok 7975 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [exception] ok 7976 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [return] ok 7977 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [variable] ok 7978 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [exception] ok 7979 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [return] ok 7980 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [variable] ok 7981 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [exception] ok 7982 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [return] ok 7983 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [variable] ok 7984 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [exception] ok 7985 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [return] ok 7986 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [variable] ok 7987 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [exception] ok 7988 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [return] ok 7989 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [variable] ok 7990 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [exception] ok 7991 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [return] ok 7992 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [variable] ok 7993 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [exception] ok 7994 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [return] ok 7995 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [variable] ok 7996 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [exception] ok 7997 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [return] ok 7998 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [variable] ok 7999 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [exception] ok 8000 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [return] ok 8001 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [variable] ok 8002 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [exception] ok 8003 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [return] ok 8004 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [variable] ok 8005 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [exception] ok 8006 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [return] ok 8007 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [variable] ok 8008 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [exception] ok 8009 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [return] ok 8010 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [variable] ok 8011 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [exception] ok 8012 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [return] ok 8013 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [variable] ok 8014 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [exception] ok 8015 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [return] ok 8016 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [variable] ok 8017 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [exception] ok 8018 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [return] ok 8019 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [variable] ok 8020 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [exception] ok 8021 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [return] ok 8022 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [variable] ok 8023 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [exception] ok 8024 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [return] ok 8025 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [variable] ok 8026 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [exception] ok 8027 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [return] ok 8028 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [variable] ok 8029 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [exception] ok 8030 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [return] ok 8031 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [variable] ok 8032 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [exception] ok 8033 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [return] ok 8034 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [variable] ok 8035 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [exception] ok 8036 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [return] ok 8037 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [variable] ok 8038 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [exception] ok 8039 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [return] ok 8040 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [variable] ok 8041 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [exception] ok 8042 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [return] ok 8043 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [variable] ok 8044 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [exception] ok 8045 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [return] ok 8046 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [variable] ok 8047 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [exception] ok 8048 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [return] ok 8049 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [variable] ok 8050 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [exception] ok 8051 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [return] ok 8052 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [variable] ok 8053 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [exception] ok 8054 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [return] ok 8055 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [variable] ok 8056 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [exception] ok 8057 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [return] ok 8058 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [variable] ok 8059 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [exception] ok 8060 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [return] ok 8061 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [variable] ok 8062 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [exception] ok 8063 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [return] ok 8064 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [variable] ok 8065 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [exception] ok 8066 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [return] ok 8067 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [variable] ok 8068 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [exception] ok 8069 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [return] ok 8070 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [variable] ok 8071 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [exception] ok 8072 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [return] ok 8073 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [variable] ok 8074 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [exception] ok 8075 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [return] ok 8076 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [variable] ok 8077 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [exception] ok 8078 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [return] ok 8079 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [variable] ok 8080 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [exception] ok 8081 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [return] ok 8082 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [variable] ok 8083 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [exception] ok 8084 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [return] ok 8085 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [variable] ok 8086 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [exception] ok 8087 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [return] ok 8088 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [variable] ok 8089 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [exception] ok 8090 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [return] ok 8091 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [variable] ok 8092 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [exception] ok 8093 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [return] ok 8094 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [variable] ok 8095 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [exception] ok 8096 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [return] ok 8097 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [variable] ok 8098 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [exception] ok 8099 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [return] ok 8100 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [variable] ok 8101 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [exception] ok 8102 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [return] ok 8103 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [variable] ok 8104 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [exception] ok 8105 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [return] ok 8106 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [variable] ok 8107 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [exception] ok 8108 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [return] ok 8109 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [variable] ok 8110 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [exception] ok 8111 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [return] ok 8112 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [variable] ok 8113 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [exception] ok 8114 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [return] ok 8115 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [variable] ok 8116 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [exception] ok 8117 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [return] ok 8118 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [variable] ok 8119 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [exception] ok 8120 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [return] ok 8121 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [variable] ok 8122 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [exception] ok 8123 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [return] ok 8124 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [variable] ok 8125 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [exception] ok 8126 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [return] ok 8127 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [variable] ok 8128 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [exception] ok 8129 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [return] ok 8130 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [variable] ok 8131 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [exception] ok 8132 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [return] ok 8133 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [variable] ok 8134 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [exception] ok 8135 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [return] ok 8136 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [variable] ok 8137 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [exception] ok 8138 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [return] ok 8139 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [variable] ok 8140 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [exception] ok 8141 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [return] ok 8142 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [variable] ok 8143 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [exception] ok 8144 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [return] ok 8145 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [variable] ok 8146 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [exception] ok 8147 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [return] ok 8148 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [variable] ok 8149 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [exception] ok 8150 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [return] ok 8151 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [variable] ok 8152 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [exception] ok 8153 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [return] ok 8154 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [variable] ok t/32-array-kv.t .......... 1..1728 ok 1 - my $x; keys @$x [exception] ok 2 - my $x; keys @$x [return] ok 3 - my $x; keys @$x [variable] ok 4 - our $x; local $x; use strict; keys @$x [exception] ok 5 - our $x; local $x; use strict; keys @$x [return] ok 6 - our $x; local $x; use strict; keys @$x [variable] ok 7 - our $x; local $x; no strict; keys @$x [exception] ok 8 - our $x; local $x; no strict; keys @$x [return] ok 9 - our $x; local $x; no strict; keys @$x [variable] ok 10 - my $x; keys @$x [exception] ok 11 - my $x; keys @$x [return] ok 12 - my $x; keys @$x [variable] ok 13 - our $x; local $x; use strict; keys @$x [exception] ok 14 - our $x; local $x; use strict; keys @$x [return] ok 15 - our $x; local $x; use strict; keys @$x [variable] ok 16 - our $x; local $x; no strict; keys @$x [exception] ok 17 - our $x; local $x; no strict; keys @$x [return] ok 18 - our $x; local $x; no strict; keys @$x [variable] ok 19 - my @x; keys @x [exception] ok 20 - my @x; keys @x [return] ok 21 - my @x; keys @x [variable] ok 22 - our @x; local @x; use strict; keys @x [exception] ok 23 - our @x; local @x; use strict; keys @x [return] ok 24 - our @x; local @x; use strict; keys @x [variable] ok 25 - our @x; local @x; no strict; keys @x [exception] ok 26 - our @x; local @x; no strict; keys @x [return] ok 27 - our @x; local @x; no strict; keys @x [variable] ok 28 - my $x; keys @$x [exception] ok 29 - my $x; keys @$x [return] ok 30 - my $x; keys @$x [variable] ok 31 - our $x; local $x; use strict; keys @$x [exception] ok 32 - our $x; local $x; use strict; keys @$x [return] ok 33 - our $x; local $x; use strict; keys @$x [variable] ok 34 - our $x; local $x; no strict; keys @$x [exception] ok 35 - our $x; local $x; no strict; keys @$x [return] ok 36 - our $x; local $x; no strict; keys @$x [variable] ok 37 - my $x; keys @$x [exception] ok 38 - my $x; keys @$x [return] ok 39 - my $x; keys @$x [variable] ok 40 - our $x; local $x; use strict; keys @$x [exception] ok 41 - our $x; local $x; use strict; keys @$x [return] ok 42 - our $x; local $x; use strict; keys @$x [variable] ok 43 - our $x; local $x; no strict; keys @$x [exception] ok 44 - our $x; local $x; no strict; keys @$x [return] ok 45 - our $x; local $x; no strict; keys @$x [variable] ok 46 - my @x; keys @x [exception] ok 47 - my @x; keys @x [return] ok 48 - my @x; keys @x [variable] ok 49 - our @x; local @x; use strict; keys @x [exception] ok 50 - our @x; local @x; use strict; keys @x [return] ok 51 - our @x; local @x; use strict; keys @x [variable] ok 52 - our @x; local @x; no strict; keys @x [exception] ok 53 - our @x; local @x; no strict; keys @x [return] ok 54 - our @x; local @x; no strict; keys @x [variable] ok 55 - my $x; keys @$x <+fetch> [exception] ok 56 - my $x; keys @$x <+fetch> [return] ok 57 - my $x; keys @$x <+fetch> [variable] ok 58 - our $x; local $x; use strict; keys @$x <+fetch> [exception] ok 59 - our $x; local $x; use strict; keys @$x <+fetch> [return] ok 60 - our $x; local $x; use strict; keys @$x <+fetch> [variable] ok 61 - our $x; local $x; no strict; keys @$x <+fetch> [exception] ok 62 - our $x; local $x; no strict; keys @$x <+fetch> [return] ok 63 - our $x; local $x; no strict; keys @$x <+fetch> [variable] ok 64 - my $x; keys @$x <+fetch> [exception] ok 65 - my $x; keys @$x <+fetch> [return] ok 66 - my $x; keys @$x <+fetch> [variable] ok 67 - our $x; local $x; use strict; keys @$x <+fetch> [exception] ok 68 - our $x; local $x; use strict; keys @$x <+fetch> [return] ok 69 - our $x; local $x; use strict; keys @$x <+fetch> [variable] ok 70 - our $x; local $x; no strict; keys @$x <+fetch> [exception] ok 71 - our $x; local $x; no strict; keys @$x <+fetch> [return] ok 72 - our $x; local $x; no strict; keys @$x <+fetch> [variable] ok 73 - my @x; keys @x <+fetch> [exception] ok 74 - my @x; keys @x <+fetch> [return] ok 75 - my @x; keys @x <+fetch> [variable] ok 76 - our @x; local @x; use strict; keys @x <+fetch> [exception] ok 77 - our @x; local @x; use strict; keys @x <+fetch> [return] ok 78 - our @x; local @x; use strict; keys @x <+fetch> [variable] ok 79 - our @x; local @x; no strict; keys @x <+fetch> [exception] ok 80 - our @x; local @x; no strict; keys @x <+fetch> [return] ok 81 - our @x; local @x; no strict; keys @x <+fetch> [variable] ok 82 - my $x; keys @$x <+exists> [exception] ok 83 - my $x; keys @$x <+exists> [return] ok 84 - my $x; keys @$x <+exists> [variable] ok 85 - our $x; local $x; use strict; keys @$x <+exists> [exception] ok 86 - our $x; local $x; use strict; keys @$x <+exists> [return] ok 87 - our $x; local $x; use strict; keys @$x <+exists> [variable] ok 88 - our $x; local $x; no strict; keys @$x <+exists> [exception] ok 89 - our $x; local $x; no strict; keys @$x <+exists> [return] ok 90 - our $x; local $x; no strict; keys @$x <+exists> [variable] ok 91 - my $x; keys @$x <+exists> [exception] ok 92 - my $x; keys @$x <+exists> [return] ok 93 - my $x; keys @$x <+exists> [variable] ok 94 - our $x; local $x; use strict; keys @$x <+exists> [exception] ok 95 - our $x; local $x; use strict; keys @$x <+exists> [return] ok 96 - our $x; local $x; use strict; keys @$x <+exists> [variable] ok 97 - our $x; local $x; no strict; keys @$x <+exists> [exception] ok 98 - our $x; local $x; no strict; keys @$x <+exists> [return] ok 99 - our $x; local $x; no strict; keys @$x <+exists> [variable] ok 100 - my @x; keys @x <+exists> [exception] ok 101 - my @x; keys @x <+exists> [return] ok 102 - my @x; keys @x <+exists> [variable] ok 103 - our @x; local @x; use strict; keys @x <+exists> [exception] ok 104 - our @x; local @x; use strict; keys @x <+exists> [return] ok 105 - our @x; local @x; use strict; keys @x <+exists> [variable] ok 106 - our @x; local @x; no strict; keys @x <+exists> [exception] ok 107 - our @x; local @x; no strict; keys @x <+exists> [return] ok 108 - our @x; local @x; no strict; keys @x <+exists> [variable] ok 109 - my $x; keys @$x <+delete> [exception] ok 110 - my $x; keys @$x <+delete> [return] ok 111 - my $x; keys @$x <+delete> [variable] ok 112 - our $x; local $x; use strict; keys @$x <+delete> [exception] ok 113 - our $x; local $x; use strict; keys @$x <+delete> [return] ok 114 - our $x; local $x; use strict; keys @$x <+delete> [variable] ok 115 - our $x; local $x; no strict; keys @$x <+delete> [exception] ok 116 - our $x; local $x; no strict; keys @$x <+delete> [return] ok 117 - our $x; local $x; no strict; keys @$x <+delete> [variable] ok 118 - my $x; keys @$x <+delete> [exception] ok 119 - my $x; keys @$x <+delete> [return] ok 120 - my $x; keys @$x <+delete> [variable] ok 121 - our $x; local $x; use strict; keys @$x <+delete> [exception] ok 122 - our $x; local $x; use strict; keys @$x <+delete> [return] ok 123 - our $x; local $x; use strict; keys @$x <+delete> [variable] ok 124 - our $x; local $x; no strict; keys @$x <+delete> [exception] ok 125 - our $x; local $x; no strict; keys @$x <+delete> [return] ok 126 - our $x; local $x; no strict; keys @$x <+delete> [variable] ok 127 - my @x; keys @x <+delete> [exception] ok 128 - my @x; keys @x <+delete> [return] ok 129 - my @x; keys @x <+delete> [variable] ok 130 - our @x; local @x; use strict; keys @x <+delete> [exception] ok 131 - our @x; local @x; use strict; keys @x <+delete> [return] ok 132 - our @x; local @x; use strict; keys @x <+delete> [variable] ok 133 - our @x; local @x; no strict; keys @x <+delete> [exception] ok 134 - our @x; local @x; no strict; keys @x <+delete> [return] ok 135 - our @x; local @x; no strict; keys @x <+delete> [variable] ok 136 - my $x; keys @$x <+store> [exception] ok 137 - my $x; keys @$x <+store> [return] ok 138 - my $x; keys @$x <+store> [variable] ok 139 - our $x; local $x; use strict; keys @$x <+store> [exception] ok 140 - our $x; local $x; use strict; keys @$x <+store> [return] ok 141 - our $x; local $x; use strict; keys @$x <+store> [variable] ok 142 - our $x; local $x; no strict; keys @$x <+store> [exception] ok 143 - our $x; local $x; no strict; keys @$x <+store> [return] ok 144 - our $x; local $x; no strict; keys @$x <+store> [variable] ok 145 - my $x; keys @$x <+store> [exception] ok 146 - my $x; keys @$x <+store> [return] ok 147 - my $x; keys @$x <+store> [variable] ok 148 - our $x; local $x; use strict; keys @$x <+store> [exception] ok 149 - our $x; local $x; use strict; keys @$x <+store> [return] ok 150 - our $x; local $x; use strict; keys @$x <+store> [variable] ok 151 - our $x; local $x; no strict; keys @$x <+store> [exception] ok 152 - our $x; local $x; no strict; keys @$x <+store> [return] ok 153 - our $x; local $x; no strict; keys @$x <+store> [variable] ok 154 - my @x; keys @x <+store> [exception] ok 155 - my @x; keys @x <+store> [return] ok 156 - my @x; keys @x <+store> [variable] ok 157 - our @x; local @x; use strict; keys @x <+store> [exception] ok 158 - our @x; local @x; use strict; keys @x <+store> [return] ok 159 - our @x; local @x; use strict; keys @x <+store> [variable] ok 160 - our @x; local @x; no strict; keys @x <+store> [exception] ok 161 - our @x; local @x; no strict; keys @x <+store> [return] ok 162 - our @x; local @x; no strict; keys @x <+store> [variable] ok 163 - my $x; keys @$x <+strict +fetch> [exception] ok 164 - my $x; keys @$x <+strict +fetch> [return] ok 165 - my $x; keys @$x <+strict +fetch> [variable] ok 166 - our $x; local $x; use strict; keys @$x <+strict +fetch> [exception] ok 167 - our $x; local $x; use strict; keys @$x <+strict +fetch> [return] ok 168 - our $x; local $x; use strict; keys @$x <+strict +fetch> [variable] ok 169 - our $x; local $x; no strict; keys @$x <+strict +fetch> [exception] ok 170 - our $x; local $x; no strict; keys @$x <+strict +fetch> [return] ok 171 - our $x; local $x; no strict; keys @$x <+strict +fetch> [variable] ok 172 - my $x; keys @$x <+strict +fetch> [exception] ok 173 - my $x; keys @$x <+strict +fetch> [return] ok 174 - my $x; keys @$x <+strict +fetch> [variable] ok 175 - our $x; local $x; use strict; keys @$x <+strict +fetch> [exception] ok 176 - our $x; local $x; use strict; keys @$x <+strict +fetch> [return] ok 177 - our $x; local $x; use strict; keys @$x <+strict +fetch> [variable] ok 178 - our $x; local $x; no strict; keys @$x <+strict +fetch> [exception] ok 179 - our $x; local $x; no strict; keys @$x <+strict +fetch> [return] ok 180 - our $x; local $x; no strict; keys @$x <+strict +fetch> [variable] ok 181 - my @x; 1 <+strict +fetch> [exception] ok 182 - my @x; 1 <+strict +fetch> [return] ok 183 - my @x; 1 <+strict +fetch> [variable] ok 184 - our @x; local @x; use strict; 1 <+strict +fetch> [exception] ok 185 - our @x; local @x; use strict; 1 <+strict +fetch> [return] ok 186 - our @x; local @x; use strict; 1 <+strict +fetch> [variable] ok 187 - our @x; local @x; no strict; 1 <+strict +fetch> [exception] ok 188 - our @x; local @x; no strict; 1 <+strict +fetch> [return] ok 189 - our @x; local @x; no strict; 1 <+strict +fetch> [variable] ok 190 - my $x; keys @$x <+strict +exists> [exception] ok 191 - my $x; keys @$x <+strict +exists> [return] ok 192 - my $x; keys @$x <+strict +exists> [variable] ok 193 - our $x; local $x; use strict; keys @$x <+strict +exists> [exception] ok 194 - our $x; local $x; use strict; keys @$x <+strict +exists> [return] ok 195 - our $x; local $x; use strict; keys @$x <+strict +exists> [variable] ok 196 - our $x; local $x; no strict; keys @$x <+strict +exists> [exception] ok 197 - our $x; local $x; no strict; keys @$x <+strict +exists> [return] ok 198 - our $x; local $x; no strict; keys @$x <+strict +exists> [variable] ok 199 - my $x; keys @$x <+strict +exists> [exception] ok 200 - my $x; keys @$x <+strict +exists> [return] ok 201 - my $x; keys @$x <+strict +exists> [variable] ok 202 - our $x; local $x; use strict; keys @$x <+strict +exists> [exception] ok 203 - our $x; local $x; use strict; keys @$x <+strict +exists> [return] ok 204 - our $x; local $x; use strict; keys @$x <+strict +exists> [variable] ok 205 - our $x; local $x; no strict; keys @$x <+strict +exists> [exception] ok 206 - our $x; local $x; no strict; keys @$x <+strict +exists> [return] ok 207 - our $x; local $x; no strict; keys @$x <+strict +exists> [variable] ok 208 - my @x; keys @x <+strict +exists> [exception] ok 209 - my @x; keys @x <+strict +exists> [return] ok 210 - my @x; keys @x <+strict +exists> [variable] ok 211 - our @x; local @x; use strict; keys @x <+strict +exists> [exception] ok 212 - our @x; local @x; use strict; keys @x <+strict +exists> [return] ok 213 - our @x; local @x; use strict; keys @x <+strict +exists> [variable] ok 214 - our @x; local @x; no strict; keys @x <+strict +exists> [exception] ok 215 - our @x; local @x; no strict; keys @x <+strict +exists> [return] ok 216 - our @x; local @x; no strict; keys @x <+strict +exists> [variable] ok 217 - my $x; keys @$x <+strict +delete> [exception] ok 218 - my $x; keys @$x <+strict +delete> [return] ok 219 - my $x; keys @$x <+strict +delete> [variable] ok 220 - our $x; local $x; use strict; keys @$x <+strict +delete> [exception] ok 221 - our $x; local $x; use strict; keys @$x <+strict +delete> [return] ok 222 - our $x; local $x; use strict; keys @$x <+strict +delete> [variable] ok 223 - our $x; local $x; no strict; keys @$x <+strict +delete> [exception] ok 224 - our $x; local $x; no strict; keys @$x <+strict +delete> [return] ok 225 - our $x; local $x; no strict; keys @$x <+strict +delete> [variable] ok 226 - my $x; keys @$x <+strict +delete> [exception] ok 227 - my $x; keys @$x <+strict +delete> [return] ok 228 - my $x; keys @$x <+strict +delete> [variable] ok 229 - our $x; local $x; use strict; keys @$x <+strict +delete> [exception] ok 230 - our $x; local $x; use strict; keys @$x <+strict +delete> [return] ok 231 - our $x; local $x; use strict; keys @$x <+strict +delete> [variable] ok 232 - our $x; local $x; no strict; keys @$x <+strict +delete> [exception] ok 233 - our $x; local $x; no strict; keys @$x <+strict +delete> [return] ok 234 - our $x; local $x; no strict; keys @$x <+strict +delete> [variable] ok 235 - my @x; keys @x <+strict +delete> [exception] ok 236 - my @x; keys @x <+strict +delete> [return] ok 237 - my @x; keys @x <+strict +delete> [variable] ok 238 - our @x; local @x; use strict; keys @x <+strict +delete> [exception] ok 239 - our @x; local @x; use strict; keys @x <+strict +delete> [return] ok 240 - our @x; local @x; use strict; keys @x <+strict +delete> [variable] ok 241 - our @x; local @x; no strict; keys @x <+strict +delete> [exception] ok 242 - our @x; local @x; no strict; keys @x <+strict +delete> [return] ok 243 - our @x; local @x; no strict; keys @x <+strict +delete> [variable] ok 244 - my $x; keys @$x <+strict +store> [exception] ok 245 - my $x; keys @$x <+strict +store> [return] ok 246 - my $x; keys @$x <+strict +store> [variable] ok 247 - our $x; local $x; use strict; keys @$x <+strict +store> [exception] ok 248 - our $x; local $x; use strict; keys @$x <+strict +store> [return] ok 249 - our $x; local $x; use strict; keys @$x <+strict +store> [variable] ok 250 - our $x; local $x; no strict; keys @$x <+strict +store> [exception] ok 251 - our $x; local $x; no strict; keys @$x <+strict +store> [return] ok 252 - our $x; local $x; no strict; keys @$x <+strict +store> [variable] ok 253 - my $x; keys @$x <+strict +store> [exception] ok 254 - my $x; keys @$x <+strict +store> [return] ok 255 - my $x; keys @$x <+strict +store> [variable] ok 256 - our $x; local $x; use strict; keys @$x <+strict +store> [exception] ok 257 - our $x; local $x; use strict; keys @$x <+strict +store> [return] ok 258 - our $x; local $x; use strict; keys @$x <+strict +store> [variable] ok 259 - our $x; local $x; no strict; keys @$x <+strict +store> [exception] ok 260 - our $x; local $x; no strict; keys @$x <+strict +store> [return] ok 261 - our $x; local $x; no strict; keys @$x <+strict +store> [variable] ok 262 - my @x; keys @x <+strict +store> [exception] ok 263 - my @x; keys @x <+strict +store> [return] ok 264 - my @x; keys @x <+strict +store> [variable] ok 265 - our @x; local @x; use strict; keys @x <+strict +store> [exception] ok 266 - our @x; local @x; use strict; keys @x <+strict +store> [return] ok 267 - our @x; local @x; use strict; keys @x <+strict +store> [variable] ok 268 - our @x; local @x; no strict; keys @x <+strict +store> [exception] ok 269 - our @x; local @x; no strict; keys @x <+strict +store> [return] ok 270 - our @x; local @x; no strict; keys @x <+strict +store> [variable] ok 271 - my $x; [ keys @$x ] [exception] ok 272 - my $x; [ keys @$x ] [return] ok 273 - my $x; [ keys @$x ] [variable] ok 274 - our $x; local $x; use strict; [ keys @$x ] [exception] ok 275 - our $x; local $x; use strict; [ keys @$x ] [return] ok 276 - our $x; local $x; use strict; [ keys @$x ] [variable] ok 277 - our $x; local $x; no strict; [ keys @$x ] [exception] ok 278 - our $x; local $x; no strict; [ keys @$x ] [return] ok 279 - our $x; local $x; no strict; [ keys @$x ] [variable] ok 280 - my $x; [ keys @$x ] [exception] ok 281 - my $x; [ keys @$x ] [return] ok 282 - my $x; [ keys @$x ] [variable] ok 283 - our $x; local $x; use strict; [ keys @$x ] [exception] ok 284 - our $x; local $x; use strict; [ keys @$x ] [return] ok 285 - our $x; local $x; use strict; [ keys @$x ] [variable] ok 286 - our $x; local $x; no strict; [ keys @$x ] [exception] ok 287 - our $x; local $x; no strict; [ keys @$x ] [return] ok 288 - our $x; local $x; no strict; [ keys @$x ] [variable] ok 289 - my @x; [ keys @x ] [exception] ok 290 - my @x; [ keys @x ] [return] ok 291 - my @x; [ keys @x ] [variable] ok 292 - our @x; local @x; use strict; [ keys @x ] [exception] ok 293 - our @x; local @x; use strict; [ keys @x ] [return] ok 294 - our @x; local @x; use strict; [ keys @x ] [variable] ok 295 - our @x; local @x; no strict; [ keys @x ] [exception] ok 296 - our @x; local @x; no strict; [ keys @x ] [return] ok 297 - our @x; local @x; no strict; [ keys @x ] [variable] ok 298 - my $x; [ keys @$x ] [exception] ok 299 - my $x; [ keys @$x ] [return] ok 300 - my $x; [ keys @$x ] [variable] ok 301 - our $x; local $x; use strict; [ keys @$x ] [exception] ok 302 - our $x; local $x; use strict; [ keys @$x ] [return] ok 303 - our $x; local $x; use strict; [ keys @$x ] [variable] ok 304 - our $x; local $x; no strict; [ keys @$x ] [exception] ok 305 - our $x; local $x; no strict; [ keys @$x ] [return] ok 306 - our $x; local $x; no strict; [ keys @$x ] [variable] ok 307 - my $x; [ keys @$x ] [exception] ok 308 - my $x; [ keys @$x ] [return] ok 309 - my $x; [ keys @$x ] [variable] ok 310 - our $x; local $x; use strict; [ keys @$x ] [exception] ok 311 - our $x; local $x; use strict; [ keys @$x ] [return] ok 312 - our $x; local $x; use strict; [ keys @$x ] [variable] ok 313 - our $x; local $x; no strict; [ keys @$x ] [exception] ok 314 - our $x; local $x; no strict; [ keys @$x ] [return] ok 315 - our $x; local $x; no strict; [ keys @$x ] [variable] ok 316 - my @x; [ keys @x ] [exception] ok 317 - my @x; [ keys @x ] [return] ok 318 - my @x; [ keys @x ] [variable] ok 319 - our @x; local @x; use strict; [ keys @x ] [exception] ok 320 - our @x; local @x; use strict; [ keys @x ] [return] ok 321 - our @x; local @x; use strict; [ keys @x ] [variable] ok 322 - our @x; local @x; no strict; [ keys @x ] [exception] ok 323 - our @x; local @x; no strict; [ keys @x ] [return] ok 324 - our @x; local @x; no strict; [ keys @x ] [variable] ok 325 - my $x; [ keys @$x ] <+fetch> [exception] ok 326 - my $x; [ keys @$x ] <+fetch> [return] ok 327 - my $x; [ keys @$x ] <+fetch> [variable] ok 328 - our $x; local $x; use strict; [ keys @$x ] <+fetch> [exception] ok 329 - our $x; local $x; use strict; [ keys @$x ] <+fetch> [return] ok 330 - our $x; local $x; use strict; [ keys @$x ] <+fetch> [variable] ok 331 - our $x; local $x; no strict; [ keys @$x ] <+fetch> [exception] ok 332 - our $x; local $x; no strict; [ keys @$x ] <+fetch> [return] ok 333 - our $x; local $x; no strict; [ keys @$x ] <+fetch> [variable] ok 334 - my $x; [ keys @$x ] <+fetch> [exception] ok 335 - my $x; [ keys @$x ] <+fetch> [return] ok 336 - my $x; [ keys @$x ] <+fetch> [variable] ok 337 - our $x; local $x; use strict; [ keys @$x ] <+fetch> [exception] ok 338 - our $x; local $x; use strict; [ keys @$x ] <+fetch> [return] ok 339 - our $x; local $x; use strict; [ keys @$x ] <+fetch> [variable] ok 340 - our $x; local $x; no strict; [ keys @$x ] <+fetch> [exception] ok 341 - our $x; local $x; no strict; [ keys @$x ] <+fetch> [return] ok 342 - our $x; local $x; no strict; [ keys @$x ] <+fetch> [variable] ok 343 - my @x; [ keys @x ] <+fetch> [exception] ok 344 - my @x; [ keys @x ] <+fetch> [return] ok 345 - my @x; [ keys @x ] <+fetch> [variable] ok 346 - our @x; local @x; use strict; [ keys @x ] <+fetch> [exception] ok 347 - our @x; local @x; use strict; [ keys @x ] <+fetch> [return] ok 348 - our @x; local @x; use strict; [ keys @x ] <+fetch> [variable] ok 349 - our @x; local @x; no strict; [ keys @x ] <+fetch> [exception] ok 350 - our @x; local @x; no strict; [ keys @x ] <+fetch> [return] ok 351 - our @x; local @x; no strict; [ keys @x ] <+fetch> [variable] ok 352 - my $x; [ keys @$x ] <+exists +delete +store> [exception] ok 353 - my $x; [ keys @$x ] <+exists +delete +store> [return] ok 354 - my $x; [ keys @$x ] <+exists +delete +store> [variable] ok 355 - our $x; local $x; use strict; [ keys @$x ] <+exists +delete +store> [exception] ok 356 - our $x; local $x; use strict; [ keys @$x ] <+exists +delete +store> [return] ok 357 - our $x; local $x; use strict; [ keys @$x ] <+exists +delete +store> [variable] ok 358 - our $x; local $x; no strict; [ keys @$x ] <+exists +delete +store> [exception] ok 359 - our $x; local $x; no strict; [ keys @$x ] <+exists +delete +store> [return] ok 360 - our $x; local $x; no strict; [ keys @$x ] <+exists +delete +store> [variable] ok 361 - my $x; [ keys @$x ] <+exists +delete +store> [exception] ok 362 - my $x; [ keys @$x ] <+exists +delete +store> [return] ok 363 - my $x; [ keys @$x ] <+exists +delete +store> [variable] ok 364 - our $x; local $x; use strict; [ keys @$x ] <+exists +delete +store> [exception] ok 365 - our $x; local $x; use strict; [ keys @$x ] <+exists +delete +store> [return] ok 366 - our $x; local $x; use strict; [ keys @$x ] <+exists +delete +store> [variable] ok 367 - our $x; local $x; no strict; [ keys @$x ] <+exists +delete +store> [exception] ok 368 - our $x; local $x; no strict; [ keys @$x ] <+exists +delete +store> [return] ok 369 - our $x; local $x; no strict; [ keys @$x ] <+exists +delete +store> [variable] ok 370 - my @x; [ keys @x ] <+exists +delete +store> [exception] ok 371 - my @x; [ keys @x ] <+exists +delete +store> [return] ok 372 - my @x; [ keys @x ] <+exists +delete +store> [variable] ok 373 - our @x; local @x; use strict; [ keys @x ] <+exists +delete +store> [exception] ok 374 - our @x; local @x; use strict; [ keys @x ] <+exists +delete +store> [return] ok 375 - our @x; local @x; use strict; [ keys @x ] <+exists +delete +store> [variable] ok 376 - our @x; local @x; no strict; [ keys @x ] <+exists +delete +store> [exception] ok 377 - our @x; local @x; no strict; [ keys @x ] <+exists +delete +store> [return] ok 378 - our @x; local @x; no strict; [ keys @x ] <+exists +delete +store> [variable] ok 379 - my $x; $x->[0] = 1; [ keys @$x ] [exception] ok 380 - my $x; $x->[0] = 1; [ keys @$x ] [return] ok 381 - my $x; $x->[0] = 1; [ keys @$x ] [variable] ok 382 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [exception] ok 383 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [return] ok 384 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [variable] ok 385 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [exception] ok 386 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [return] ok 387 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [variable] ok 388 - my $x; $x->[0] = 1; [ keys @$x ] [exception] ok 389 - my $x; $x->[0] = 1; [ keys @$x ] [return] ok 390 - my $x; $x->[0] = 1; [ keys @$x ] [variable] ok 391 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [exception] ok 392 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [return] ok 393 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [variable] ok 394 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [exception] ok 395 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [return] ok 396 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [variable] ok 397 - my @x; $x[0] = 1; [ keys @x ] [exception] ok 398 - my @x; $x[0] = 1; [ keys @x ] [return] ok 399 - my @x; $x[0] = 1; [ keys @x ] [variable] ok 400 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] [exception] ok 401 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] [return] ok 402 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] [variable] ok 403 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] [exception] ok 404 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] [return] ok 405 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] [variable] ok 406 - my $x; $x->[0] = 1; [ keys @$x ] [exception] ok 407 - my $x; $x->[0] = 1; [ keys @$x ] [return] ok 408 - my $x; $x->[0] = 1; [ keys @$x ] [variable] ok 409 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [exception] ok 410 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [return] ok 411 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [variable] ok 412 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [exception] ok 413 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [return] ok 414 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [variable] ok 415 - my $x; $x->[0] = 1; [ keys @$x ] [exception] ok 416 - my $x; $x->[0] = 1; [ keys @$x ] [return] ok 417 - my $x; $x->[0] = 1; [ keys @$x ] [variable] ok 418 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [exception] ok 419 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [return] ok 420 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [variable] ok 421 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [exception] ok 422 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [return] ok 423 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [variable] ok 424 - my @x; $x[0] = 1; [ keys @x ] [exception] ok 425 - my @x; $x[0] = 1; [ keys @x ] [return] ok 426 - my @x; $x[0] = 1; [ keys @x ] [variable] ok 427 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] [exception] ok 428 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] [return] ok 429 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] [variable] ok 430 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] [exception] ok 431 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] [return] ok 432 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] [variable] ok 433 - my $x; $x->[0] = 1; [ keys @$x ] <+fetch> [exception] ok 434 - my $x; $x->[0] = 1; [ keys @$x ] <+fetch> [return] ok 435 - my $x; $x->[0] = 1; [ keys @$x ] <+fetch> [variable] ok 436 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+fetch> [exception] ok 437 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+fetch> [return] ok 438 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+fetch> [variable] ok 439 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+fetch> [exception] ok 440 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+fetch> [return] ok 441 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+fetch> [variable] ok 442 - my $x; $x->[0] = 1; [ keys @$x ] <+fetch> [exception] ok 443 - my $x; $x->[0] = 1; [ keys @$x ] <+fetch> [return] ok 444 - my $x; $x->[0] = 1; [ keys @$x ] <+fetch> [variable] ok 445 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+fetch> [exception] ok 446 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+fetch> [return] ok 447 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+fetch> [variable] ok 448 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+fetch> [exception] ok 449 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+fetch> [return] ok 450 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+fetch> [variable] ok 451 - my @x; $x[0] = 1; [ keys @x ] <+fetch> [exception] ok 452 - my @x; $x[0] = 1; [ keys @x ] <+fetch> [return] ok 453 - my @x; $x[0] = 1; [ keys @x ] <+fetch> [variable] ok 454 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] <+fetch> [exception] ok 455 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] <+fetch> [return] ok 456 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] <+fetch> [variable] ok 457 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] <+fetch> [exception] ok 458 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] <+fetch> [return] ok 459 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] <+fetch> [variable] ok 460 - my $x; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [exception] ok 461 - my $x; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [return] ok 462 - my $x; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [variable] ok 463 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [exception] ok 464 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [return] ok 465 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [variable] ok 466 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [exception] ok 467 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [return] ok 468 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [variable] ok 469 - my $x; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [exception] ok 470 - my $x; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [return] ok 471 - my $x; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [variable] ok 472 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [exception] ok 473 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [return] ok 474 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [variable] ok 475 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [exception] ok 476 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [return] ok 477 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [variable] ok 478 - my @x; $x[0] = 1; [ keys @x ] <+exists +delete +store> [exception] ok 479 - my @x; $x[0] = 1; [ keys @x ] <+exists +delete +store> [return] ok 480 - my @x; $x[0] = 1; [ keys @x ] <+exists +delete +store> [variable] ok 481 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] <+exists +delete +store> [exception] ok 482 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] <+exists +delete +store> [return] ok 483 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] <+exists +delete +store> [variable] ok 484 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] <+exists +delete +store> [exception] ok 485 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] <+exists +delete +store> [return] ok 486 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] <+exists +delete +store> [variable] ok 487 - my $x; keys @{$x->[0]} [exception] ok 488 - my $x; keys @{$x->[0]} [return] ok 489 - my $x; keys @{$x->[0]} [variable] ok 490 - our $x; local $x; use strict; keys @{$x->[0]} [exception] ok 491 - our $x; local $x; use strict; keys @{$x->[0]} [return] ok 492 - our $x; local $x; use strict; keys @{$x->[0]} [variable] ok 493 - our $x; local $x; no strict; keys @{$x->[0]} [exception] ok 494 - our $x; local $x; no strict; keys @{$x->[0]} [return] ok 495 - our $x; local $x; no strict; keys @{$x->[0]} [variable] ok 496 - my $x; keys @{$$x[0]} [exception] ok 497 - my $x; keys @{$$x[0]} [return] ok 498 - my $x; keys @{$$x[0]} [variable] ok 499 - our $x; local $x; use strict; keys @{$$x[0]} [exception] ok 500 - our $x; local $x; use strict; keys @{$$x[0]} [return] ok 501 - our $x; local $x; use strict; keys @{$$x[0]} [variable] ok 502 - our $x; local $x; no strict; keys @{$$x[0]} [exception] ok 503 - our $x; local $x; no strict; keys @{$$x[0]} [return] ok 504 - our $x; local $x; no strict; keys @{$$x[0]} [variable] ok 505 - my @x; keys @{$x[0]} [exception] ok 506 - my @x; keys @{$x[0]} [return] ok 507 - my @x; keys @{$x[0]} [variable] ok 508 - our @x; local @x; use strict; keys @{$x[0]} [exception] ok 509 - our @x; local @x; use strict; keys @{$x[0]} [return] ok 510 - our @x; local @x; use strict; keys @{$x[0]} [variable] ok 511 - our @x; local @x; no strict; keys @{$x[0]} [exception] ok 512 - our @x; local @x; no strict; keys @{$x[0]} [return] ok 513 - our @x; local @x; no strict; keys @{$x[0]} [variable] ok 514 - my $x; keys @{$x->[0]} [exception] ok 515 - my $x; keys @{$x->[0]} [return] ok 516 - my $x; keys @{$x->[0]} [variable] ok 517 - our $x; local $x; use strict; keys @{$x->[0]} [exception] ok 518 - our $x; local $x; use strict; keys @{$x->[0]} [return] ok 519 - our $x; local $x; use strict; keys @{$x->[0]} [variable] ok 520 - our $x; local $x; no strict; keys @{$x->[0]} [exception] ok 521 - our $x; local $x; no strict; keys @{$x->[0]} [return] ok 522 - our $x; local $x; no strict; keys @{$x->[0]} [variable] ok 523 - my $x; keys @{$$x[0]} [exception] ok 524 - my $x; keys @{$$x[0]} [return] ok 525 - my $x; keys @{$$x[0]} [variable] ok 526 - our $x; local $x; use strict; keys @{$$x[0]} [exception] ok 527 - our $x; local $x; use strict; keys @{$$x[0]} [return] ok 528 - our $x; local $x; use strict; keys @{$$x[0]} [variable] ok 529 - our $x; local $x; no strict; keys @{$$x[0]} [exception] ok 530 - our $x; local $x; no strict; keys @{$$x[0]} [return] ok 531 - our $x; local $x; no strict; keys @{$$x[0]} [variable] ok 532 - my @x; keys @{$x[0]} [exception] ok 533 - my @x; keys @{$x[0]} [return] ok 534 - my @x; keys @{$x[0]} [variable] ok 535 - our @x; local @x; use strict; keys @{$x[0]} [exception] ok 536 - our @x; local @x; use strict; keys @{$x[0]} [return] ok 537 - our @x; local @x; use strict; keys @{$x[0]} [variable] ok 538 - our @x; local @x; no strict; keys @{$x[0]} [exception] ok 539 - our @x; local @x; no strict; keys @{$x[0]} [return] ok 540 - our @x; local @x; no strict; keys @{$x[0]} [variable] ok 541 - my $x; keys @{$x->[0]} <+fetch> [exception] ok 542 - my $x; keys @{$x->[0]} <+fetch> [return] ok 543 - my $x; keys @{$x->[0]} <+fetch> [variable] ok 544 - our $x; local $x; use strict; keys @{$x->[0]} <+fetch> [exception] ok 545 - our $x; local $x; use strict; keys @{$x->[0]} <+fetch> [return] ok 546 - our $x; local $x; use strict; keys @{$x->[0]} <+fetch> [variable] ok 547 - our $x; local $x; no strict; keys @{$x->[0]} <+fetch> [exception] ok 548 - our $x; local $x; no strict; keys @{$x->[0]} <+fetch> [return] ok 549 - our $x; local $x; no strict; keys @{$x->[0]} <+fetch> [variable] ok 550 - my $x; keys @{$$x[0]} <+fetch> [exception] ok 551 - my $x; keys @{$$x[0]} <+fetch> [return] ok 552 - my $x; keys @{$$x[0]} <+fetch> [variable] ok 553 - our $x; local $x; use strict; keys @{$$x[0]} <+fetch> [exception] ok 554 - our $x; local $x; use strict; keys @{$$x[0]} <+fetch> [return] ok 555 - our $x; local $x; use strict; keys @{$$x[0]} <+fetch> [variable] ok 556 - our $x; local $x; no strict; keys @{$$x[0]} <+fetch> [exception] ok 557 - our $x; local $x; no strict; keys @{$$x[0]} <+fetch> [return] ok 558 - our $x; local $x; no strict; keys @{$$x[0]} <+fetch> [variable] ok 559 - my @x; keys @{$x[0]} <+fetch> [exception] ok 560 - my @x; keys @{$x[0]} <+fetch> [return] ok 561 - my @x; keys @{$x[0]} <+fetch> [variable] ok 562 - our @x; local @x; use strict; keys @{$x[0]} <+fetch> [exception] ok 563 - our @x; local @x; use strict; keys @{$x[0]} <+fetch> [return] ok 564 - our @x; local @x; use strict; keys @{$x[0]} <+fetch> [variable] ok 565 - our @x; local @x; no strict; keys @{$x[0]} <+fetch> [exception] ok 566 - our @x; local @x; no strict; keys @{$x[0]} <+fetch> [return] ok 567 - our @x; local @x; no strict; keys @{$x[0]} <+fetch> [variable] ok 568 - my $x; keys @{$x->[0]} <+exists> [exception] ok 569 - my $x; keys @{$x->[0]} <+exists> [return] ok 570 - my $x; keys @{$x->[0]} <+exists> [variable] ok 571 - our $x; local $x; use strict; keys @{$x->[0]} <+exists> [exception] ok 572 - our $x; local $x; use strict; keys @{$x->[0]} <+exists> [return] ok 573 - our $x; local $x; use strict; keys @{$x->[0]} <+exists> [variable] ok 574 - our $x; local $x; no strict; keys @{$x->[0]} <+exists> [exception] ok 575 - our $x; local $x; no strict; keys @{$x->[0]} <+exists> [return] ok 576 - our $x; local $x; no strict; keys @{$x->[0]} <+exists> [variable] ok 577 - my $x; keys @{$$x[0]} <+exists> [exception] ok 578 - my $x; keys @{$$x[0]} <+exists> [return] ok 579 - my $x; keys @{$$x[0]} <+exists> [variable] ok 580 - our $x; local $x; use strict; keys @{$$x[0]} <+exists> [exception] ok 581 - our $x; local $x; use strict; keys @{$$x[0]} <+exists> [return] ok 582 - our $x; local $x; use strict; keys @{$$x[0]} <+exists> [variable] ok 583 - our $x; local $x; no strict; keys @{$$x[0]} <+exists> [exception] ok 584 - our $x; local $x; no strict; keys @{$$x[0]} <+exists> [return] ok 585 - our $x; local $x; no strict; keys @{$$x[0]} <+exists> [variable] ok 586 - my @x; keys @{$x[0]} <+exists> [exception] ok 587 - my @x; keys @{$x[0]} <+exists> [return] ok 588 - my @x; keys @{$x[0]} <+exists> [variable] ok 589 - our @x; local @x; use strict; keys @{$x[0]} <+exists> [exception] ok 590 - our @x; local @x; use strict; keys @{$x[0]} <+exists> [return] ok 591 - our @x; local @x; use strict; keys @{$x[0]} <+exists> [variable] ok 592 - our @x; local @x; no strict; keys @{$x[0]} <+exists> [exception] ok 593 - our @x; local @x; no strict; keys @{$x[0]} <+exists> [return] ok 594 - our @x; local @x; no strict; keys @{$x[0]} <+exists> [variable] ok 595 - my $x; keys @{$x->[0]} <+delete> [exception] ok 596 - my $x; keys @{$x->[0]} <+delete> [return] ok 597 - my $x; keys @{$x->[0]} <+delete> [variable] ok 598 - our $x; local $x; use strict; keys @{$x->[0]} <+delete> [exception] ok 599 - our $x; local $x; use strict; keys @{$x->[0]} <+delete> [return] ok 600 - our $x; local $x; use strict; keys @{$x->[0]} <+delete> [variable] ok 601 - our $x; local $x; no strict; keys @{$x->[0]} <+delete> [exception] ok 602 - our $x; local $x; no strict; keys @{$x->[0]} <+delete> [return] ok 603 - our $x; local $x; no strict; keys @{$x->[0]} <+delete> [variable] ok 604 - my $x; keys @{$$x[0]} <+delete> [exception] ok 605 - my $x; keys @{$$x[0]} <+delete> [return] ok 606 - my $x; keys @{$$x[0]} <+delete> [variable] ok 607 - our $x; local $x; use strict; keys @{$$x[0]} <+delete> [exception] ok 608 - our $x; local $x; use strict; keys @{$$x[0]} <+delete> [return] ok 609 - our $x; local $x; use strict; keys @{$$x[0]} <+delete> [variable] ok 610 - our $x; local $x; no strict; keys @{$$x[0]} <+delete> [exception] ok 611 - our $x; local $x; no strict; keys @{$$x[0]} <+delete> [return] ok 612 - our $x; local $x; no strict; keys @{$$x[0]} <+delete> [variable] ok 613 - my @x; keys @{$x[0]} <+delete> [exception] ok 614 - my @x; keys @{$x[0]} <+delete> [return] ok 615 - my @x; keys @{$x[0]} <+delete> [variable] ok 616 - our @x; local @x; use strict; keys @{$x[0]} <+delete> [exception] ok 617 - our @x; local @x; use strict; keys @{$x[0]} <+delete> [return] ok 618 - our @x; local @x; use strict; keys @{$x[0]} <+delete> [variable] ok 619 - our @x; local @x; no strict; keys @{$x[0]} <+delete> [exception] ok 620 - our @x; local @x; no strict; keys @{$x[0]} <+delete> [return] ok 621 - our @x; local @x; no strict; keys @{$x[0]} <+delete> [variable] ok 622 - my $x; keys @{$x->[0]} <+store> [exception] ok 623 - my $x; keys @{$x->[0]} <+store> [return] ok 624 - my $x; keys @{$x->[0]} <+store> [variable] ok 625 - our $x; local $x; use strict; keys @{$x->[0]} <+store> [exception] ok 626 - our $x; local $x; use strict; keys @{$x->[0]} <+store> [return] ok 627 - our $x; local $x; use strict; keys @{$x->[0]} <+store> [variable] ok 628 - our $x; local $x; no strict; keys @{$x->[0]} <+store> [exception] ok 629 - our $x; local $x; no strict; keys @{$x->[0]} <+store> [return] ok 630 - our $x; local $x; no strict; keys @{$x->[0]} <+store> [variable] ok 631 - my $x; keys @{$$x[0]} <+store> [exception] ok 632 - my $x; keys @{$$x[0]} <+store> [return] ok 633 - my $x; keys @{$$x[0]} <+store> [variable] ok 634 - our $x; local $x; use strict; keys @{$$x[0]} <+store> [exception] ok 635 - our $x; local $x; use strict; keys @{$$x[0]} <+store> [return] ok 636 - our $x; local $x; use strict; keys @{$$x[0]} <+store> [variable] ok 637 - our $x; local $x; no strict; keys @{$$x[0]} <+store> [exception] ok 638 - our $x; local $x; no strict; keys @{$$x[0]} <+store> [return] ok 639 - our $x; local $x; no strict; keys @{$$x[0]} <+store> [variable] ok 640 - my @x; keys @{$x[0]} <+store> [exception] ok 641 - my @x; keys @{$x[0]} <+store> [return] ok 642 - my @x; keys @{$x[0]} <+store> [variable] ok 643 - our @x; local @x; use strict; keys @{$x[0]} <+store> [exception] ok 644 - our @x; local @x; use strict; keys @{$x[0]} <+store> [return] ok 645 - our @x; local @x; use strict; keys @{$x[0]} <+store> [variable] ok 646 - our @x; local @x; no strict; keys @{$x[0]} <+store> [exception] ok 647 - our @x; local @x; no strict; keys @{$x[0]} <+store> [return] ok 648 - our @x; local @x; no strict; keys @{$x[0]} <+store> [variable] ok 649 - my $x; keys @{$x->[0]} <+strict +fetch> [exception] ok 650 - my $x; keys @{$x->[0]} <+strict +fetch> [return] ok 651 - my $x; keys @{$x->[0]} <+strict +fetch> [variable] ok 652 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +fetch> [exception] ok 653 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +fetch> [return] ok 654 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +fetch> [variable] ok 655 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +fetch> [exception] ok 656 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +fetch> [return] ok 657 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +fetch> [variable] ok 658 - my $x; keys @{$$x[0]} <+strict +fetch> [exception] ok 659 - my $x; keys @{$$x[0]} <+strict +fetch> [return] ok 660 - my $x; keys @{$$x[0]} <+strict +fetch> [variable] ok 661 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +fetch> [exception] ok 662 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +fetch> [return] ok 663 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +fetch> [variable] ok 664 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +fetch> [exception] ok 665 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +fetch> [return] ok 666 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +fetch> [variable] ok 667 - my @x; 1 <+strict +fetch> [exception] ok 668 - my @x; 1 <+strict +fetch> [return] ok 669 - my @x; 1 <+strict +fetch> [variable] ok 670 - our @x; local @x; use strict; 1 <+strict +fetch> [exception] ok 671 - our @x; local @x; use strict; 1 <+strict +fetch> [return] ok 672 - our @x; local @x; use strict; 1 <+strict +fetch> [variable] ok 673 - our @x; local @x; no strict; 1 <+strict +fetch> [exception] ok 674 - our @x; local @x; no strict; 1 <+strict +fetch> [return] ok 675 - our @x; local @x; no strict; 1 <+strict +fetch> [variable] ok 676 - my $x; keys @{$x->[0]} <+strict +exists> [exception] ok 677 - my $x; keys @{$x->[0]} <+strict +exists> [return] ok 678 - my $x; keys @{$x->[0]} <+strict +exists> [variable] ok 679 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +exists> [exception] ok 680 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +exists> [return] ok 681 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +exists> [variable] ok 682 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +exists> [exception] ok 683 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +exists> [return] ok 684 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +exists> [variable] ok 685 - my $x; keys @{$$x[0]} <+strict +exists> [exception] ok 686 - my $x; keys @{$$x[0]} <+strict +exists> [return] ok 687 - my $x; keys @{$$x[0]} <+strict +exists> [variable] ok 688 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +exists> [exception] ok 689 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +exists> [return] ok 690 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +exists> [variable] ok 691 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +exists> [exception] ok 692 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +exists> [return] ok 693 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +exists> [variable] ok 694 - my @x; keys @{$x[0]} <+strict +exists> [exception] ok 695 - my @x; keys @{$x[0]} <+strict +exists> [return] ok 696 - my @x; keys @{$x[0]} <+strict +exists> [variable] ok 697 - our @x; local @x; use strict; keys @{$x[0]} <+strict +exists> [exception] ok 698 - our @x; local @x; use strict; keys @{$x[0]} <+strict +exists> [return] ok 699 - our @x; local @x; use strict; keys @{$x[0]} <+strict +exists> [variable] ok 700 - our @x; local @x; no strict; keys @{$x[0]} <+strict +exists> [exception] ok 701 - our @x; local @x; no strict; keys @{$x[0]} <+strict +exists> [return] ok 702 - our @x; local @x; no strict; keys @{$x[0]} <+strict +exists> [variable] ok 703 - my $x; keys @{$x->[0]} <+strict +delete> [exception] ok 704 - my $x; keys @{$x->[0]} <+strict +delete> [return] ok 705 - my $x; keys @{$x->[0]} <+strict +delete> [variable] ok 706 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +delete> [exception] ok 707 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +delete> [return] ok 708 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +delete> [variable] ok 709 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +delete> [exception] ok 710 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +delete> [return] ok 711 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +delete> [variable] ok 712 - my $x; keys @{$$x[0]} <+strict +delete> [exception] ok 713 - my $x; keys @{$$x[0]} <+strict +delete> [return] ok 714 - my $x; keys @{$$x[0]} <+strict +delete> [variable] ok 715 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +delete> [exception] ok 716 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +delete> [return] ok 717 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +delete> [variable] ok 718 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +delete> [exception] ok 719 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +delete> [return] ok 720 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +delete> [variable] ok 721 - my @x; keys @{$x[0]} <+strict +delete> [exception] ok 722 - my @x; keys @{$x[0]} <+strict +delete> [return] ok 723 - my @x; keys @{$x[0]} <+strict +delete> [variable] ok 724 - our @x; local @x; use strict; keys @{$x[0]} <+strict +delete> [exception] ok 725 - our @x; local @x; use strict; keys @{$x[0]} <+strict +delete> [return] ok 726 - our @x; local @x; use strict; keys @{$x[0]} <+strict +delete> [variable] ok 727 - our @x; local @x; no strict; keys @{$x[0]} <+strict +delete> [exception] ok 728 - our @x; local @x; no strict; keys @{$x[0]} <+strict +delete> [return] ok 729 - our @x; local @x; no strict; keys @{$x[0]} <+strict +delete> [variable] ok 730 - my $x; keys @{$x->[0]} <+strict +store> [exception] ok 731 - my $x; keys @{$x->[0]} <+strict +store> [return] ok 732 - my $x; keys @{$x->[0]} <+strict +store> [variable] ok 733 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +store> [exception] ok 734 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +store> [return] ok 735 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +store> [variable] ok 736 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +store> [exception] ok 737 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +store> [return] ok 738 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +store> [variable] ok 739 - my $x; keys @{$$x[0]} <+strict +store> [exception] ok 740 - my $x; keys @{$$x[0]} <+strict +store> [return] ok 741 - my $x; keys @{$$x[0]} <+strict +store> [variable] ok 742 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +store> [exception] ok 743 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +store> [return] ok 744 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +store> [variable] ok 745 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +store> [exception] ok 746 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +store> [return] ok 747 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +store> [variable] ok 748 - my @x; keys @{$x[0]} <+strict +store> [exception] ok 749 - my @x; keys @{$x[0]} <+strict +store> [return] ok 750 - my @x; keys @{$x[0]} <+strict +store> [variable] ok 751 - our @x; local @x; use strict; keys @{$x[0]} <+strict +store> [exception] ok 752 - our @x; local @x; use strict; keys @{$x[0]} <+strict +store> [return] ok 753 - our @x; local @x; use strict; keys @{$x[0]} <+strict +store> [variable] ok 754 - our @x; local @x; no strict; keys @{$x[0]} <+strict +store> [exception] ok 755 - our @x; local @x; no strict; keys @{$x[0]} <+strict +store> [return] ok 756 - our @x; local @x; no strict; keys @{$x[0]} <+strict +store> [variable] ok 757 - my $x; [ keys @{$x->[0]} ] [exception] ok 758 - my $x; [ keys @{$x->[0]} ] [return] ok 759 - my $x; [ keys @{$x->[0]} ] [variable] ok 760 - our $x; local $x; use strict; [ keys @{$x->[0]} ] [exception] ok 761 - our $x; local $x; use strict; [ keys @{$x->[0]} ] [return] ok 762 - our $x; local $x; use strict; [ keys @{$x->[0]} ] [variable] ok 763 - our $x; local $x; no strict; [ keys @{$x->[0]} ] [exception] ok 764 - our $x; local $x; no strict; [ keys @{$x->[0]} ] [return] ok 765 - our $x; local $x; no strict; [ keys @{$x->[0]} ] [variable] ok 766 - my $x; [ keys @{$$x[0]} ] [exception] ok 767 - my $x; [ keys @{$$x[0]} ] [return] ok 768 - my $x; [ keys @{$$x[0]} ] [variable] ok 769 - our $x; local $x; use strict; [ keys @{$$x[0]} ] [exception] ok 770 - our $x; local $x; use strict; [ keys @{$$x[0]} ] [return] ok 771 - our $x; local $x; use strict; [ keys @{$$x[0]} ] [variable] ok 772 - our $x; local $x; no strict; [ keys @{$$x[0]} ] [exception] ok 773 - our $x; local $x; no strict; [ keys @{$$x[0]} ] [return] ok 774 - our $x; local $x; no strict; [ keys @{$$x[0]} ] [variable] ok 775 - my @x; [ keys @{$x[0]} ] [exception] ok 776 - my @x; [ keys @{$x[0]} ] [return] ok 777 - my @x; [ keys @{$x[0]} ] [variable] ok 778 - our @x; local @x; use strict; [ keys @{$x[0]} ] [exception] ok 779 - our @x; local @x; use strict; [ keys @{$x[0]} ] [return] ok 780 - our @x; local @x; use strict; [ keys @{$x[0]} ] [variable] ok 781 - our @x; local @x; no strict; [ keys @{$x[0]} ] [exception] ok 782 - our @x; local @x; no strict; [ keys @{$x[0]} ] [return] ok 783 - our @x; local @x; no strict; [ keys @{$x[0]} ] [variable] ok 784 - my $x; [ keys @{$x->[0]} ] [exception] ok 785 - my $x; [ keys @{$x->[0]} ] [return] ok 786 - my $x; [ keys @{$x->[0]} ] [variable] ok 787 - our $x; local $x; use strict; [ keys @{$x->[0]} ] [exception] ok 788 - our $x; local $x; use strict; [ keys @{$x->[0]} ] [return] ok 789 - our $x; local $x; use strict; [ keys @{$x->[0]} ] [variable] ok 790 - our $x; local $x; no strict; [ keys @{$x->[0]} ] [exception] ok 791 - our $x; local $x; no strict; [ keys @{$x->[0]} ] [return] ok 792 - our $x; local $x; no strict; [ keys @{$x->[0]} ] [variable] ok 793 - my $x; [ keys @{$$x[0]} ] [exception] ok 794 - my $x; [ keys @{$$x[0]} ] [return] ok 795 - my $x; [ keys @{$$x[0]} ] [variable] ok 796 - our $x; local $x; use strict; [ keys @{$$x[0]} ] [exception] ok 797 - our $x; local $x; use strict; [ keys @{$$x[0]} ] [return] ok 798 - our $x; local $x; use strict; [ keys @{$$x[0]} ] [variable] ok 799 - our $x; local $x; no strict; [ keys @{$$x[0]} ] [exception] ok 800 - our $x; local $x; no strict; [ keys @{$$x[0]} ] [return] ok 801 - our $x; local $x; no strict; [ keys @{$$x[0]} ] [variable] ok 802 - my @x; [ keys @{$x[0]} ] [exception] ok 803 - my @x; [ keys @{$x[0]} ] [return] ok 804 - my @x; [ keys @{$x[0]} ] [variable] ok 805 - our @x; local @x; use strict; [ keys @{$x[0]} ] [exception] ok 806 - our @x; local @x; use strict; [ keys @{$x[0]} ] [return] ok 807 - our @x; local @x; use strict; [ keys @{$x[0]} ] [variable] ok 808 - our @x; local @x; no strict; [ keys @{$x[0]} ] [exception] ok 809 - our @x; local @x; no strict; [ keys @{$x[0]} ] [return] ok 810 - our @x; local @x; no strict; [ keys @{$x[0]} ] [variable] ok 811 - my $x; [ keys @{$x->[0]} ] <+fetch> [exception] ok 812 - my $x; [ keys @{$x->[0]} ] <+fetch> [return] ok 813 - my $x; [ keys @{$x->[0]} ] <+fetch> [variable] ok 814 - our $x; local $x; use strict; [ keys @{$x->[0]} ] <+fetch> [exception] ok 815 - our $x; local $x; use strict; [ keys @{$x->[0]} ] <+fetch> [return] ok 816 - our $x; local $x; use strict; [ keys @{$x->[0]} ] <+fetch> [variable] ok 817 - our $x; local $x; no strict; [ keys @{$x->[0]} ] <+fetch> [exception] ok 818 - our $x; local $x; no strict; [ keys @{$x->[0]} ] <+fetch> [return] ok 819 - our $x; local $x; no strict; [ keys @{$x->[0]} ] <+fetch> [variable] ok 820 - my $x; [ keys @{$$x[0]} ] <+fetch> [exception] ok 821 - my $x; [ keys @{$$x[0]} ] <+fetch> [return] ok 822 - my $x; [ keys @{$$x[0]} ] <+fetch> [variable] ok 823 - our $x; local $x; use strict; [ keys @{$$x[0]} ] <+fetch> [exception] ok 824 - our $x; local $x; use strict; [ keys @{$$x[0]} ] <+fetch> [return] ok 825 - our $x; local $x; use strict; [ keys @{$$x[0]} ] <+fetch> [variable] ok 826 - our $x; local $x; no strict; [ keys @{$$x[0]} ] <+fetch> [exception] ok 827 - our $x; local $x; no strict; [ keys @{$$x[0]} ] <+fetch> [return] ok 828 - our $x; local $x; no strict; [ keys @{$$x[0]} ] <+fetch> [variable] ok 829 - my @x; [ keys @{$x[0]} ] <+fetch> [exception] ok 830 - my @x; [ keys @{$x[0]} ] <+fetch> [return] ok 831 - my @x; [ keys @{$x[0]} ] <+fetch> [variable] ok 832 - our @x; local @x; use strict; [ keys @{$x[0]} ] <+fetch> [exception] ok 833 - our @x; local @x; use strict; [ keys @{$x[0]} ] <+fetch> [return] ok 834 - our @x; local @x; use strict; [ keys @{$x[0]} ] <+fetch> [variable] ok 835 - our @x; local @x; no strict; [ keys @{$x[0]} ] <+fetch> [exception] ok 836 - our @x; local @x; no strict; [ keys @{$x[0]} ] <+fetch> [return] ok 837 - our @x; local @x; no strict; [ keys @{$x[0]} ] <+fetch> [variable] ok 838 - my $x; [ keys @{$x->[0]} ] <+exists +delete +store> [exception] ok 839 - my $x; [ keys @{$x->[0]} ] <+exists +delete +store> [return] ok 840 - my $x; [ keys @{$x->[0]} ] <+exists +delete +store> [variable] ok 841 - our $x; local $x; use strict; [ keys @{$x->[0]} ] <+exists +delete +store> [exception] ok 842 - our $x; local $x; use strict; [ keys @{$x->[0]} ] <+exists +delete +store> [return] ok 843 - our $x; local $x; use strict; [ keys @{$x->[0]} ] <+exists +delete +store> [variable] ok 844 - our $x; local $x; no strict; [ keys @{$x->[0]} ] <+exists +delete +store> [exception] ok 845 - our $x; local $x; no strict; [ keys @{$x->[0]} ] <+exists +delete +store> [return] ok 846 - our $x; local $x; no strict; [ keys @{$x->[0]} ] <+exists +delete +store> [variable] ok 847 - my $x; [ keys @{$$x[0]} ] <+exists +delete +store> [exception] ok 848 - my $x; [ keys @{$$x[0]} ] <+exists +delete +store> [return] ok 849 - my $x; [ keys @{$$x[0]} ] <+exists +delete +store> [variable] ok 850 - our $x; local $x; use strict; [ keys @{$$x[0]} ] <+exists +delete +store> [exception] ok 851 - our $x; local $x; use strict; [ keys @{$$x[0]} ] <+exists +delete +store> [return] ok 852 - our $x; local $x; use strict; [ keys @{$$x[0]} ] <+exists +delete +store> [variable] ok 853 - our $x; local $x; no strict; [ keys @{$$x[0]} ] <+exists +delete +store> [exception] ok 854 - our $x; local $x; no strict; [ keys @{$$x[0]} ] <+exists +delete +store> [return] ok 855 - our $x; local $x; no strict; [ keys @{$$x[0]} ] <+exists +delete +store> [variable] ok 856 - my @x; [ keys @{$x[0]} ] <+exists +delete +store> [exception] ok 857 - my @x; [ keys @{$x[0]} ] <+exists +delete +store> [return] ok 858 - my @x; [ keys @{$x[0]} ] <+exists +delete +store> [variable] ok 859 - our @x; local @x; use strict; [ keys @{$x[0]} ] <+exists +delete +store> [exception] ok 860 - our @x; local @x; use strict; [ keys @{$x[0]} ] <+exists +delete +store> [return] ok 861 - our @x; local @x; use strict; [ keys @{$x[0]} ] <+exists +delete +store> [variable] ok 862 - our @x; local @x; no strict; [ keys @{$x[0]} ] <+exists +delete +store> [exception] ok 863 - our @x; local @x; no strict; [ keys @{$x[0]} ] <+exists +delete +store> [return] ok 864 - our @x; local @x; no strict; [ keys @{$x[0]} ] <+exists +delete +store> [variable] ok 865 - my $x; values @$x [exception] ok 866 - my $x; values @$x [return] ok 867 - my $x; values @$x [variable] ok 868 - our $x; local $x; use strict; values @$x [exception] ok 869 - our $x; local $x; use strict; values @$x [return] ok 870 - our $x; local $x; use strict; values @$x [variable] ok 871 - our $x; local $x; no strict; values @$x [exception] ok 872 - our $x; local $x; no strict; values @$x [return] ok 873 - our $x; local $x; no strict; values @$x [variable] ok 874 - my $x; values @$x [exception] ok 875 - my $x; values @$x [return] ok 876 - my $x; values @$x [variable] ok 877 - our $x; local $x; use strict; values @$x [exception] ok 878 - our $x; local $x; use strict; values @$x [return] ok 879 - our $x; local $x; use strict; values @$x [variable] ok 880 - our $x; local $x; no strict; values @$x [exception] ok 881 - our $x; local $x; no strict; values @$x [return] ok 882 - our $x; local $x; no strict; values @$x [variable] ok 883 - my @x; values @x [exception] ok 884 - my @x; values @x [return] ok 885 - my @x; values @x [variable] ok 886 - our @x; local @x; use strict; values @x [exception] ok 887 - our @x; local @x; use strict; values @x [return] ok 888 - our @x; local @x; use strict; values @x [variable] ok 889 - our @x; local @x; no strict; values @x [exception] ok 890 - our @x; local @x; no strict; values @x [return] ok 891 - our @x; local @x; no strict; values @x [variable] ok 892 - my $x; values @$x [exception] ok 893 - my $x; values @$x [return] ok 894 - my $x; values @$x [variable] ok 895 - our $x; local $x; use strict; values @$x [exception] ok 896 - our $x; local $x; use strict; values @$x [return] ok 897 - our $x; local $x; use strict; values @$x [variable] ok 898 - our $x; local $x; no strict; values @$x [exception] ok 899 - our $x; local $x; no strict; values @$x [return] ok 900 - our $x; local $x; no strict; values @$x [variable] ok 901 - my $x; values @$x [exception] ok 902 - my $x; values @$x [return] ok 903 - my $x; values @$x [variable] ok 904 - our $x; local $x; use strict; values @$x [exception] ok 905 - our $x; local $x; use strict; values @$x [return] ok 906 - our $x; local $x; use strict; values @$x [variable] ok 907 - our $x; local $x; no strict; values @$x [exception] ok 908 - our $x; local $x; no strict; values @$x [return] ok 909 - our $x; local $x; no strict; values @$x [variable] ok 910 - my @x; values @x [exception] ok 911 - my @x; values @x [return] ok 912 - my @x; values @x [variable] ok 913 - our @x; local @x; use strict; values @x [exception] ok 914 - our @x; local @x; use strict; values @x [return] ok 915 - our @x; local @x; use strict; values @x [variable] ok 916 - our @x; local @x; no strict; values @x [exception] ok 917 - our @x; local @x; no strict; values @x [return] ok 918 - our @x; local @x; no strict; values @x [variable] ok 919 - my $x; values @$x <+fetch> [exception] ok 920 - my $x; values @$x <+fetch> [return] ok 921 - my $x; values @$x <+fetch> [variable] ok 922 - our $x; local $x; use strict; values @$x <+fetch> [exception] ok 923 - our $x; local $x; use strict; values @$x <+fetch> [return] ok 924 - our $x; local $x; use strict; values @$x <+fetch> [variable] ok 925 - our $x; local $x; no strict; values @$x <+fetch> [exception] ok 926 - our $x; local $x; no strict; values @$x <+fetch> [return] ok 927 - our $x; local $x; no strict; values @$x <+fetch> [variable] ok 928 - my $x; values @$x <+fetch> [exception] ok 929 - my $x; values @$x <+fetch> [return] ok 930 - my $x; values @$x <+fetch> [variable] ok 931 - our $x; local $x; use strict; values @$x <+fetch> [exception] ok 932 - our $x; local $x; use strict; values @$x <+fetch> [return] ok 933 - our $x; local $x; use strict; values @$x <+fetch> [variable] ok 934 - our $x; local $x; no strict; values @$x <+fetch> [exception] ok 935 - our $x; local $x; no strict; values @$x <+fetch> [return] ok 936 - our $x; local $x; no strict; values @$x <+fetch> [variable] ok 937 - my @x; values @x <+fetch> [exception] ok 938 - my @x; values @x <+fetch> [return] ok 939 - my @x; values @x <+fetch> [variable] ok 940 - our @x; local @x; use strict; values @x <+fetch> [exception] ok 941 - our @x; local @x; use strict; values @x <+fetch> [return] ok 942 - our @x; local @x; use strict; values @x <+fetch> [variable] ok 943 - our @x; local @x; no strict; values @x <+fetch> [exception] ok 944 - our @x; local @x; no strict; values @x <+fetch> [return] ok 945 - our @x; local @x; no strict; values @x <+fetch> [variable] ok 946 - my $x; values @$x <+exists> [exception] ok 947 - my $x; values @$x <+exists> [return] ok 948 - my $x; values @$x <+exists> [variable] ok 949 - our $x; local $x; use strict; values @$x <+exists> [exception] ok 950 - our $x; local $x; use strict; values @$x <+exists> [return] ok 951 - our $x; local $x; use strict; values @$x <+exists> [variable] ok 952 - our $x; local $x; no strict; values @$x <+exists> [exception] ok 953 - our $x; local $x; no strict; values @$x <+exists> [return] ok 954 - our $x; local $x; no strict; values @$x <+exists> [variable] ok 955 - my $x; values @$x <+exists> [exception] ok 956 - my $x; values @$x <+exists> [return] ok 957 - my $x; values @$x <+exists> [variable] ok 958 - our $x; local $x; use strict; values @$x <+exists> [exception] ok 959 - our $x; local $x; use strict; values @$x <+exists> [return] ok 960 - our $x; local $x; use strict; values @$x <+exists> [variable] ok 961 - our $x; local $x; no strict; values @$x <+exists> [exception] ok 962 - our $x; local $x; no strict; values @$x <+exists> [return] ok 963 - our $x; local $x; no strict; values @$x <+exists> [variable] ok 964 - my @x; values @x <+exists> [exception] ok 965 - my @x; values @x <+exists> [return] ok 966 - my @x; values @x <+exists> [variable] ok 967 - our @x; local @x; use strict; values @x <+exists> [exception] ok 968 - our @x; local @x; use strict; values @x <+exists> [return] ok 969 - our @x; local @x; use strict; values @x <+exists> [variable] ok 970 - our @x; local @x; no strict; values @x <+exists> [exception] ok 971 - our @x; local @x; no strict; values @x <+exists> [return] ok 972 - our @x; local @x; no strict; values @x <+exists> [variable] ok 973 - my $x; values @$x <+delete> [exception] ok 974 - my $x; values @$x <+delete> [return] ok 975 - my $x; values @$x <+delete> [variable] ok 976 - our $x; local $x; use strict; values @$x <+delete> [exception] ok 977 - our $x; local $x; use strict; values @$x <+delete> [return] ok 978 - our $x; local $x; use strict; values @$x <+delete> [variable] ok 979 - our $x; local $x; no strict; values @$x <+delete> [exception] ok 980 - our $x; local $x; no strict; values @$x <+delete> [return] ok 981 - our $x; local $x; no strict; values @$x <+delete> [variable] ok 982 - my $x; values @$x <+delete> [exception] ok 983 - my $x; values @$x <+delete> [return] ok 984 - my $x; values @$x <+delete> [variable] ok 985 - our $x; local $x; use strict; values @$x <+delete> [exception] ok 986 - our $x; local $x; use strict; values @$x <+delete> [return] ok 987 - our $x; local $x; use strict; values @$x <+delete> [variable] ok 988 - our $x; local $x; no strict; values @$x <+delete> [exception] ok 989 - our $x; local $x; no strict; values @$x <+delete> [return] ok 990 - our $x; local $x; no strict; values @$x <+delete> [variable] ok 991 - my @x; values @x <+delete> [exception] ok 992 - my @x; values @x <+delete> [return] ok 993 - my @x; values @x <+delete> [variable] ok 994 - our @x; local @x; use strict; values @x <+delete> [exception] ok 995 - our @x; local @x; use strict; values @x <+delete> [return] ok 996 - our @x; local @x; use strict; values @x <+delete> [variable] ok 997 - our @x; local @x; no strict; values @x <+delete> [exception] ok 998 - our @x; local @x; no strict; values @x <+delete> [return] ok 999 - our @x; local @x; no strict; values @x <+delete> [variable] ok 1000 - my $x; values @$x <+store> [exception] ok 1001 - my $x; values @$x <+store> [return] ok 1002 - my $x; values @$x <+store> [variable] ok 1003 - our $x; local $x; use strict; values @$x <+store> [exception] ok 1004 - our $x; local $x; use strict; values @$x <+store> [return] ok 1005 - our $x; local $x; use strict; values @$x <+store> [variable] ok 1006 - our $x; local $x; no strict; values @$x <+store> [exception] ok 1007 - our $x; local $x; no strict; values @$x <+store> [return] ok 1008 - our $x; local $x; no strict; values @$x <+store> [variable] ok 1009 - my $x; values @$x <+store> [exception] ok 1010 - my $x; values @$x <+store> [return] ok 1011 - my $x; values @$x <+store> [variable] ok 1012 - our $x; local $x; use strict; values @$x <+store> [exception] ok 1013 - our $x; local $x; use strict; values @$x <+store> [return] ok 1014 - our $x; local $x; use strict; values @$x <+store> [variable] ok 1015 - our $x; local $x; no strict; values @$x <+store> [exception] ok 1016 - our $x; local $x; no strict; values @$x <+store> [return] ok 1017 - our $x; local $x; no strict; values @$x <+store> [variable] ok 1018 - my @x; values @x <+store> [exception] ok 1019 - my @x; values @x <+store> [return] ok 1020 - my @x; values @x <+store> [variable] ok 1021 - our @x; local @x; use strict; values @x <+store> [exception] ok 1022 - our @x; local @x; use strict; values @x <+store> [return] ok 1023 - our @x; local @x; use strict; values @x <+store> [variable] ok 1024 - our @x; local @x; no strict; values @x <+store> [exception] ok 1025 - our @x; local @x; no strict; values @x <+store> [return] ok 1026 - our @x; local @x; no strict; values @x <+store> [variable] ok 1027 - my $x; values @$x <+strict +fetch> [exception] ok 1028 - my $x; values @$x <+strict +fetch> [return] ok 1029 - my $x; values @$x <+strict +fetch> [variable] ok 1030 - our $x; local $x; use strict; values @$x <+strict +fetch> [exception] ok 1031 - our $x; local $x; use strict; values @$x <+strict +fetch> [return] ok 1032 - our $x; local $x; use strict; values @$x <+strict +fetch> [variable] ok 1033 - our $x; local $x; no strict; values @$x <+strict +fetch> [exception] ok 1034 - our $x; local $x; no strict; values @$x <+strict +fetch> [return] ok 1035 - our $x; local $x; no strict; values @$x <+strict +fetch> [variable] ok 1036 - my $x; values @$x <+strict +fetch> [exception] ok 1037 - my $x; values @$x <+strict +fetch> [return] ok 1038 - my $x; values @$x <+strict +fetch> [variable] ok 1039 - our $x; local $x; use strict; values @$x <+strict +fetch> [exception] ok 1040 - our $x; local $x; use strict; values @$x <+strict +fetch> [return] ok 1041 - our $x; local $x; use strict; values @$x <+strict +fetch> [variable] ok 1042 - our $x; local $x; no strict; values @$x <+strict +fetch> [exception] ok 1043 - our $x; local $x; no strict; values @$x <+strict +fetch> [return] ok 1044 - our $x; local $x; no strict; values @$x <+strict +fetch> [variable] ok 1045 - my @x; 1 <+strict +fetch> [exception] ok 1046 - my @x; 1 <+strict +fetch> [return] ok 1047 - my @x; 1 <+strict +fetch> [variable] ok 1048 - our @x; local @x; use strict; 1 <+strict +fetch> [exception] ok 1049 - our @x; local @x; use strict; 1 <+strict +fetch> [return] ok 1050 - our @x; local @x; use strict; 1 <+strict +fetch> [variable] ok 1051 - our @x; local @x; no strict; 1 <+strict +fetch> [exception] ok 1052 - our @x; local @x; no strict; 1 <+strict +fetch> [return] ok 1053 - our @x; local @x; no strict; 1 <+strict +fetch> [variable] ok 1054 - my $x; values @$x <+strict +exists> [exception] ok 1055 - my $x; values @$x <+strict +exists> [return] ok 1056 - my $x; values @$x <+strict +exists> [variable] ok 1057 - our $x; local $x; use strict; values @$x <+strict +exists> [exception] ok 1058 - our $x; local $x; use strict; values @$x <+strict +exists> [return] ok 1059 - our $x; local $x; use strict; values @$x <+strict +exists> [variable] ok 1060 - our $x; local $x; no strict; values @$x <+strict +exists> [exception] ok 1061 - our $x; local $x; no strict; values @$x <+strict +exists> [return] ok 1062 - our $x; local $x; no strict; values @$x <+strict +exists> [variable] ok 1063 - my $x; values @$x <+strict +exists> [exception] ok 1064 - my $x; values @$x <+strict +exists> [return] ok 1065 - my $x; values @$x <+strict +exists> [variable] ok 1066 - our $x; local $x; use strict; values @$x <+strict +exists> [exception] ok 1067 - our $x; local $x; use strict; values @$x <+strict +exists> [return] ok 1068 - our $x; local $x; use strict; values @$x <+strict +exists> [variable] ok 1069 - our $x; local $x; no strict; values @$x <+strict +exists> [exception] ok 1070 - our $x; local $x; no strict; values @$x <+strict +exists> [return] ok 1071 - our $x; local $x; no strict; values @$x <+strict +exists> [variable] ok 1072 - my @x; values @x <+strict +exists> [exception] ok 1073 - my @x; values @x <+strict +exists> [return] ok 1074 - my @x; values @x <+strict +exists> [variable] ok 1075 - our @x; local @x; use strict; values @x <+strict +exists> [exception] ok 1076 - our @x; local @x; use strict; values @x <+strict +exists> [return] ok 1077 - our @x; local @x; use strict; values @x <+strict +exists> [variable] ok 1078 - our @x; local @x; no strict; values @x <+strict +exists> [exception] ok 1079 - our @x; local @x; no strict; values @x <+strict +exists> [return] ok 1080 - our @x; local @x; no strict; values @x <+strict +exists> [variable] ok 1081 - my $x; values @$x <+strict +delete> [exception] ok 1082 - my $x; values @$x <+strict +delete> [return] ok 1083 - my $x; values @$x <+strict +delete> [variable] ok 1084 - our $x; local $x; use strict; values @$x <+strict +delete> [exception] ok 1085 - our $x; local $x; use strict; values @$x <+strict +delete> [return] ok 1086 - our $x; local $x; use strict; values @$x <+strict +delete> [variable] ok 1087 - our $x; local $x; no strict; values @$x <+strict +delete> [exception] ok 1088 - our $x; local $x; no strict; values @$x <+strict +delete> [return] ok 1089 - our $x; local $x; no strict; values @$x <+strict +delete> [variable] ok 1090 - my $x; values @$x <+strict +delete> [exception] ok 1091 - my $x; values @$x <+strict +delete> [return] ok 1092 - my $x; values @$x <+strict +delete> [variable] ok 1093 - our $x; local $x; use strict; values @$x <+strict +delete> [exception] ok 1094 - our $x; local $x; use strict; values @$x <+strict +delete> [return] ok 1095 - our $x; local $x; use strict; values @$x <+strict +delete> [variable] ok 1096 - our $x; local $x; no strict; values @$x <+strict +delete> [exception] ok 1097 - our $x; local $x; no strict; values @$x <+strict +delete> [return] ok 1098 - our $x; local $x; no strict; values @$x <+strict +delete> [variable] ok 1099 - my @x; values @x <+strict +delete> [exception] ok 1100 - my @x; values @x <+strict +delete> [return] ok 1101 - my @x; values @x <+strict +delete> [variable] ok 1102 - our @x; local @x; use strict; values @x <+strict +delete> [exception] ok 1103 - our @x; local @x; use strict; values @x <+strict +delete> [return] ok 1104 - our @x; local @x; use strict; values @x <+strict +delete> [variable] ok 1105 - our @x; local @x; no strict; values @x <+strict +delete> [exception] ok 1106 - our @x; local @x; no strict; values @x <+strict +delete> [return] ok 1107 - our @x; local @x; no strict; values @x <+strict +delete> [variable] ok 1108 - my $x; values @$x <+strict +store> [exception] ok 1109 - my $x; values @$x <+strict +store> [return] ok 1110 - my $x; values @$x <+strict +store> [variable] ok 1111 - our $x; local $x; use strict; values @$x <+strict +store> [exception] ok 1112 - our $x; local $x; use strict; values @$x <+strict +store> [return] ok 1113 - our $x; local $x; use strict; values @$x <+strict +store> [variable] ok 1114 - our $x; local $x; no strict; values @$x <+strict +store> [exception] ok 1115 - our $x; local $x; no strict; values @$x <+strict +store> [return] ok 1116 - our $x; local $x; no strict; values @$x <+strict +store> [variable] ok 1117 - my $x; values @$x <+strict +store> [exception] ok 1118 - my $x; values @$x <+strict +store> [return] ok 1119 - my $x; values @$x <+strict +store> [variable] ok 1120 - our $x; local $x; use strict; values @$x <+strict +store> [exception] ok 1121 - our $x; local $x; use strict; values @$x <+strict +store> [return] ok 1122 - our $x; local $x; use strict; values @$x <+strict +store> [variable] ok 1123 - our $x; local $x; no strict; values @$x <+strict +store> [exception] ok 1124 - our $x; local $x; no strict; values @$x <+strict +store> [return] ok 1125 - our $x; local $x; no strict; values @$x <+strict +store> [variable] ok 1126 - my @x; values @x <+strict +store> [exception] ok 1127 - my @x; values @x <+strict +store> [return] ok 1128 - my @x; values @x <+strict +store> [variable] ok 1129 - our @x; local @x; use strict; values @x <+strict +store> [exception] ok 1130 - our @x; local @x; use strict; values @x <+strict +store> [return] ok 1131 - our @x; local @x; use strict; values @x <+strict +store> [variable] ok 1132 - our @x; local @x; no strict; values @x <+strict +store> [exception] ok 1133 - our @x; local @x; no strict; values @x <+strict +store> [return] ok 1134 - our @x; local @x; no strict; values @x <+strict +store> [variable] ok 1135 - my $x; [ values @$x ] [exception] ok 1136 - my $x; [ values @$x ] [return] ok 1137 - my $x; [ values @$x ] [variable] ok 1138 - our $x; local $x; use strict; [ values @$x ] [exception] ok 1139 - our $x; local $x; use strict; [ values @$x ] [return] ok 1140 - our $x; local $x; use strict; [ values @$x ] [variable] ok 1141 - our $x; local $x; no strict; [ values @$x ] [exception] ok 1142 - our $x; local $x; no strict; [ values @$x ] [return] ok 1143 - our $x; local $x; no strict; [ values @$x ] [variable] ok 1144 - my $x; [ values @$x ] [exception] ok 1145 - my $x; [ values @$x ] [return] ok 1146 - my $x; [ values @$x ] [variable] ok 1147 - our $x; local $x; use strict; [ values @$x ] [exception] ok 1148 - our $x; local $x; use strict; [ values @$x ] [return] ok 1149 - our $x; local $x; use strict; [ values @$x ] [variable] ok 1150 - our $x; local $x; no strict; [ values @$x ] [exception] ok 1151 - our $x; local $x; no strict; [ values @$x ] [return] ok 1152 - our $x; local $x; no strict; [ values @$x ] [variable] ok 1153 - my @x; [ values @x ] [exception] ok 1154 - my @x; [ values @x ] [return] ok 1155 - my @x; [ values @x ] [variable] ok 1156 - our @x; local @x; use strict; [ values @x ] [exception] ok 1157 - our @x; local @x; use strict; [ values @x ] [return] ok 1158 - our @x; local @x; use strict; [ values @x ] [variable] ok 1159 - our @x; local @x; no strict; [ values @x ] [exception] ok 1160 - our @x; local @x; no strict; [ values @x ] [return] ok 1161 - our @x; local @x; no strict; [ values @x ] [variable] ok 1162 - my $x; [ values @$x ] [exception] ok 1163 - my $x; [ values @$x ] [return] ok 1164 - my $x; [ values @$x ] [variable] ok 1165 - our $x; local $x; use strict; [ values @$x ] [exception] ok 1166 - our $x; local $x; use strict; [ values @$x ] [return] ok 1167 - our $x; local $x; use strict; [ values @$x ] [variable] ok 1168 - our $x; local $x; no strict; [ values @$x ] [exception] ok 1169 - our $x; local $x; no strict; [ values @$x ] [return] ok 1170 - our $x; local $x; no strict; [ values @$x ] [variable] ok 1171 - my $x; [ values @$x ] [exception] ok 1172 - my $x; [ values @$x ] [return] ok 1173 - my $x; [ values @$x ] [variable] ok 1174 - our $x; local $x; use strict; [ values @$x ] [exception] ok 1175 - our $x; local $x; use strict; [ values @$x ] [return] ok 1176 - our $x; local $x; use strict; [ values @$x ] [variable] ok 1177 - our $x; local $x; no strict; [ values @$x ] [exception] ok 1178 - our $x; local $x; no strict; [ values @$x ] [return] ok 1179 - our $x; local $x; no strict; [ values @$x ] [variable] ok 1180 - my @x; [ values @x ] [exception] ok 1181 - my @x; [ values @x ] [return] ok 1182 - my @x; [ values @x ] [variable] ok 1183 - our @x; local @x; use strict; [ values @x ] [exception] ok 1184 - our @x; local @x; use strict; [ values @x ] [return] ok 1185 - our @x; local @x; use strict; [ values @x ] [variable] ok 1186 - our @x; local @x; no strict; [ values @x ] [exception] ok 1187 - our @x; local @x; no strict; [ values @x ] [return] ok 1188 - our @x; local @x; no strict; [ values @x ] [variable] ok 1189 - my $x; [ values @$x ] <+fetch> [exception] ok 1190 - my $x; [ values @$x ] <+fetch> [return] ok 1191 - my $x; [ values @$x ] <+fetch> [variable] ok 1192 - our $x; local $x; use strict; [ values @$x ] <+fetch> [exception] ok 1193 - our $x; local $x; use strict; [ values @$x ] <+fetch> [return] ok 1194 - our $x; local $x; use strict; [ values @$x ] <+fetch> [variable] ok 1195 - our $x; local $x; no strict; [ values @$x ] <+fetch> [exception] ok 1196 - our $x; local $x; no strict; [ values @$x ] <+fetch> [return] ok 1197 - our $x; local $x; no strict; [ values @$x ] <+fetch> [variable] ok 1198 - my $x; [ values @$x ] <+fetch> [exception] ok 1199 - my $x; [ values @$x ] <+fetch> [return] ok 1200 - my $x; [ values @$x ] <+fetch> [variable] ok 1201 - our $x; local $x; use strict; [ values @$x ] <+fetch> [exception] ok 1202 - our $x; local $x; use strict; [ values @$x ] <+fetch> [return] ok 1203 - our $x; local $x; use strict; [ values @$x ] <+fetch> [variable] ok 1204 - our $x; local $x; no strict; [ values @$x ] <+fetch> [exception] ok 1205 - our $x; local $x; no strict; [ values @$x ] <+fetch> [return] ok 1206 - our $x; local $x; no strict; [ values @$x ] <+fetch> [variable] ok 1207 - my @x; [ values @x ] <+fetch> [exception] ok 1208 - my @x; [ values @x ] <+fetch> [return] ok 1209 - my @x; [ values @x ] <+fetch> [variable] ok 1210 - our @x; local @x; use strict; [ values @x ] <+fetch> [exception] ok 1211 - our @x; local @x; use strict; [ values @x ] <+fetch> [return] ok 1212 - our @x; local @x; use strict; [ values @x ] <+fetch> [variable] ok 1213 - our @x; local @x; no strict; [ values @x ] <+fetch> [exception] ok 1214 - our @x; local @x; no strict; [ values @x ] <+fetch> [return] ok 1215 - our @x; local @x; no strict; [ values @x ] <+fetch> [variable] ok 1216 - my $x; [ values @$x ] <+exists +delete +store> [exception] ok 1217 - my $x; [ values @$x ] <+exists +delete +store> [return] ok 1218 - my $x; [ values @$x ] <+exists +delete +store> [variable] ok 1219 - our $x; local $x; use strict; [ values @$x ] <+exists +delete +store> [exception] ok 1220 - our $x; local $x; use strict; [ values @$x ] <+exists +delete +store> [return] ok 1221 - our $x; local $x; use strict; [ values @$x ] <+exists +delete +store> [variable] ok 1222 - our $x; local $x; no strict; [ values @$x ] <+exists +delete +store> [exception] ok 1223 - our $x; local $x; no strict; [ values @$x ] <+exists +delete +store> [return] ok 1224 - our $x; local $x; no strict; [ values @$x ] <+exists +delete +store> [variable] ok 1225 - my $x; [ values @$x ] <+exists +delete +store> [exception] ok 1226 - my $x; [ values @$x ] <+exists +delete +store> [return] ok 1227 - my $x; [ values @$x ] <+exists +delete +store> [variable] ok 1228 - our $x; local $x; use strict; [ values @$x ] <+exists +delete +store> [exception] ok 1229 - our $x; local $x; use strict; [ values @$x ] <+exists +delete +store> [return] ok 1230 - our $x; local $x; use strict; [ values @$x ] <+exists +delete +store> [variable] ok 1231 - our $x; local $x; no strict; [ values @$x ] <+exists +delete +store> [exception] ok 1232 - our $x; local $x; no strict; [ values @$x ] <+exists +delete +store> [return] ok 1233 - our $x; local $x; no strict; [ values @$x ] <+exists +delete +store> [variable] ok 1234 - my @x; [ values @x ] <+exists +delete +store> [exception] ok 1235 - my @x; [ values @x ] <+exists +delete +store> [return] ok 1236 - my @x; [ values @x ] <+exists +delete +store> [variable] ok 1237 - our @x; local @x; use strict; [ values @x ] <+exists +delete +store> [exception] ok 1238 - our @x; local @x; use strict; [ values @x ] <+exists +delete +store> [return] ok 1239 - our @x; local @x; use strict; [ values @x ] <+exists +delete +store> [variable] ok 1240 - our @x; local @x; no strict; [ values @x ] <+exists +delete +store> [exception] ok 1241 - our @x; local @x; no strict; [ values @x ] <+exists +delete +store> [return] ok 1242 - our @x; local @x; no strict; [ values @x ] <+exists +delete +store> [variable] ok 1243 - my $x; $x->[0] = 1; [ values @$x ] [exception] ok 1244 - my $x; $x->[0] = 1; [ values @$x ] [return] ok 1245 - my $x; $x->[0] = 1; [ values @$x ] [variable] ok 1246 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [exception] ok 1247 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [return] ok 1248 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [variable] ok 1249 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [exception] ok 1250 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [return] ok 1251 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [variable] ok 1252 - my $x; $x->[0] = 1; [ values @$x ] [exception] ok 1253 - my $x; $x->[0] = 1; [ values @$x ] [return] ok 1254 - my $x; $x->[0] = 1; [ values @$x ] [variable] ok 1255 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [exception] ok 1256 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [return] ok 1257 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [variable] ok 1258 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [exception] ok 1259 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [return] ok 1260 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [variable] ok 1261 - my @x; $x[0] = 1; [ values @x ] [exception] ok 1262 - my @x; $x[0] = 1; [ values @x ] [return] ok 1263 - my @x; $x[0] = 1; [ values @x ] [variable] ok 1264 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] [exception] ok 1265 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] [return] ok 1266 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] [variable] ok 1267 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] [exception] ok 1268 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] [return] ok 1269 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] [variable] ok 1270 - my $x; $x->[0] = 1; [ values @$x ] [exception] ok 1271 - my $x; $x->[0] = 1; [ values @$x ] [return] ok 1272 - my $x; $x->[0] = 1; [ values @$x ] [variable] ok 1273 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [exception] ok 1274 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [return] ok 1275 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [variable] ok 1276 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [exception] ok 1277 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [return] ok 1278 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [variable] ok 1279 - my $x; $x->[0] = 1; [ values @$x ] [exception] ok 1280 - my $x; $x->[0] = 1; [ values @$x ] [return] ok 1281 - my $x; $x->[0] = 1; [ values @$x ] [variable] ok 1282 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [exception] ok 1283 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [return] ok 1284 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [variable] ok 1285 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [exception] ok 1286 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [return] ok 1287 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [variable] ok 1288 - my @x; $x[0] = 1; [ values @x ] [exception] ok 1289 - my @x; $x[0] = 1; [ values @x ] [return] ok 1290 - my @x; $x[0] = 1; [ values @x ] [variable] ok 1291 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] [exception] ok 1292 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] [return] ok 1293 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] [variable] ok 1294 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] [exception] ok 1295 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] [return] ok 1296 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] [variable] ok 1297 - my $x; $x->[0] = 1; [ values @$x ] <+fetch> [exception] ok 1298 - my $x; $x->[0] = 1; [ values @$x ] <+fetch> [return] ok 1299 - my $x; $x->[0] = 1; [ values @$x ] <+fetch> [variable] ok 1300 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+fetch> [exception] ok 1301 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+fetch> [return] ok 1302 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+fetch> [variable] ok 1303 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+fetch> [exception] ok 1304 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+fetch> [return] ok 1305 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+fetch> [variable] ok 1306 - my $x; $x->[0] = 1; [ values @$x ] <+fetch> [exception] ok 1307 - my $x; $x->[0] = 1; [ values @$x ] <+fetch> [return] ok 1308 - my $x; $x->[0] = 1; [ values @$x ] <+fetch> [variable] ok 1309 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+fetch> [exception] ok 1310 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+fetch> [return] ok 1311 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+fetch> [variable] ok 1312 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+fetch> [exception] ok 1313 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+fetch> [return] ok 1314 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+fetch> [variable] ok 1315 - my @x; $x[0] = 1; [ values @x ] <+fetch> [exception] ok 1316 - my @x; $x[0] = 1; [ values @x ] <+fetch> [return] ok 1317 - my @x; $x[0] = 1; [ values @x ] <+fetch> [variable] ok 1318 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] <+fetch> [exception] ok 1319 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] <+fetch> [return] ok 1320 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] <+fetch> [variable] ok 1321 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] <+fetch> [exception] ok 1322 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] <+fetch> [return] ok 1323 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] <+fetch> [variable] ok 1324 - my $x; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [exception] ok 1325 - my $x; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [return] ok 1326 - my $x; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [variable] ok 1327 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [exception] ok 1328 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [return] ok 1329 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [variable] ok 1330 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [exception] ok 1331 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [return] ok 1332 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [variable] ok 1333 - my $x; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [exception] ok 1334 - my $x; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [return] ok 1335 - my $x; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [variable] ok 1336 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [exception] ok 1337 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [return] ok 1338 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [variable] ok 1339 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [exception] ok 1340 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [return] ok 1341 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [variable] ok 1342 - my @x; $x[0] = 1; [ values @x ] <+exists +delete +store> [exception] ok 1343 - my @x; $x[0] = 1; [ values @x ] <+exists +delete +store> [return] ok 1344 - my @x; $x[0] = 1; [ values @x ] <+exists +delete +store> [variable] ok 1345 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] <+exists +delete +store> [exception] ok 1346 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] <+exists +delete +store> [return] ok 1347 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] <+exists +delete +store> [variable] ok 1348 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] <+exists +delete +store> [exception] ok 1349 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] <+exists +delete +store> [return] ok 1350 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] <+exists +delete +store> [variable] ok 1351 - my $x; values @{$x->[0]} [exception] ok 1352 - my $x; values @{$x->[0]} [return] ok 1353 - my $x; values @{$x->[0]} [variable] ok 1354 - our $x; local $x; use strict; values @{$x->[0]} [exception] ok 1355 - our $x; local $x; use strict; values @{$x->[0]} [return] ok 1356 - our $x; local $x; use strict; values @{$x->[0]} [variable] ok 1357 - our $x; local $x; no strict; values @{$x->[0]} [exception] ok 1358 - our $x; local $x; no strict; values @{$x->[0]} [return] ok 1359 - our $x; local $x; no strict; values @{$x->[0]} [variable] ok 1360 - my $x; values @{$$x[0]} [exception] ok 1361 - my $x; values @{$$x[0]} [return] ok 1362 - my $x; values @{$$x[0]} [variable] ok 1363 - our $x; local $x; use strict; values @{$$x[0]} [exception] ok 1364 - our $x; local $x; use strict; values @{$$x[0]} [return] ok 1365 - our $x; local $x; use strict; values @{$$x[0]} [variable] ok 1366 - our $x; local $x; no strict; values @{$$x[0]} [exception] ok 1367 - our $x; local $x; no strict; values @{$$x[0]} [return] ok 1368 - our $x; local $x; no strict; values @{$$x[0]} [variable] ok 1369 - my @x; values @{$x[0]} [exception] ok 1370 - my @x; values @{$x[0]} [return] ok 1371 - my @x; values @{$x[0]} [variable] ok 1372 - our @x; local @x; use strict; values @{$x[0]} [exception] ok 1373 - our @x; local @x; use strict; values @{$x[0]} [return] ok 1374 - our @x; local @x; use strict; values @{$x[0]} [variable] ok 1375 - our @x; local @x; no strict; values @{$x[0]} [exception] ok 1376 - our @x; local @x; no strict; values @{$x[0]} [return] ok 1377 - our @x; local @x; no strict; values @{$x[0]} [variable] ok 1378 - my $x; values @{$x->[0]} [exception] ok 1379 - my $x; values @{$x->[0]} [return] ok 1380 - my $x; values @{$x->[0]} [variable] ok 1381 - our $x; local $x; use strict; values @{$x->[0]} [exception] ok 1382 - our $x; local $x; use strict; values @{$x->[0]} [return] ok 1383 - our $x; local $x; use strict; values @{$x->[0]} [variable] ok 1384 - our $x; local $x; no strict; values @{$x->[0]} [exception] ok 1385 - our $x; local $x; no strict; values @{$x->[0]} [return] ok 1386 - our $x; local $x; no strict; values @{$x->[0]} [variable] ok 1387 - my $x; values @{$$x[0]} [exception] ok 1388 - my $x; values @{$$x[0]} [return] ok 1389 - my $x; values @{$$x[0]} [variable] ok 1390 - our $x; local $x; use strict; values @{$$x[0]} [exception] ok 1391 - our $x; local $x; use strict; values @{$$x[0]} [return] ok 1392 - our $x; local $x; use strict; values @{$$x[0]} [variable] ok 1393 - our $x; local $x; no strict; values @{$$x[0]} [exception] ok 1394 - our $x; local $x; no strict; values @{$$x[0]} [return] ok 1395 - our $x; local $x; no strict; values @{$$x[0]} [variable] ok 1396 - my @x; values @{$x[0]} [exception] ok 1397 - my @x; values @{$x[0]} [return] ok 1398 - my @x; values @{$x[0]} [variable] ok 1399 - our @x; local @x; use strict; values @{$x[0]} [exception] ok 1400 - our @x; local @x; use strict; values @{$x[0]} [return] ok 1401 - our @x; local @x; use strict; values @{$x[0]} [variable] ok 1402 - our @x; local @x; no strict; values @{$x[0]} [exception] ok 1403 - our @x; local @x; no strict; values @{$x[0]} [return] ok 1404 - our @x; local @x; no strict; values @{$x[0]} [variable] ok 1405 - my $x; values @{$x->[0]} <+fetch> [exception] ok 1406 - my $x; values @{$x->[0]} <+fetch> [return] ok 1407 - my $x; values @{$x->[0]} <+fetch> [variable] ok 1408 - our $x; local $x; use strict; values @{$x->[0]} <+fetch> [exception] ok 1409 - our $x; local $x; use strict; values @{$x->[0]} <+fetch> [return] ok 1410 - our $x; local $x; use strict; values @{$x->[0]} <+fetch> [variable] ok 1411 - our $x; local $x; no strict; values @{$x->[0]} <+fetch> [exception] ok 1412 - our $x; local $x; no strict; values @{$x->[0]} <+fetch> [return] ok 1413 - our $x; local $x; no strict; values @{$x->[0]} <+fetch> [variable] ok 1414 - my $x; values @{$$x[0]} <+fetch> [exception] ok 1415 - my $x; values @{$$x[0]} <+fetch> [return] ok 1416 - my $x; values @{$$x[0]} <+fetch> [variable] ok 1417 - our $x; local $x; use strict; values @{$$x[0]} <+fetch> [exception] ok 1418 - our $x; local $x; use strict; values @{$$x[0]} <+fetch> [return] ok 1419 - our $x; local $x; use strict; values @{$$x[0]} <+fetch> [variable] ok 1420 - our $x; local $x; no strict; values @{$$x[0]} <+fetch> [exception] ok 1421 - our $x; local $x; no strict; values @{$$x[0]} <+fetch> [return] ok 1422 - our $x; local $x; no strict; values @{$$x[0]} <+fetch> [variable] ok 1423 - my @x; values @{$x[0]} <+fetch> [exception] ok 1424 - my @x; values @{$x[0]} <+fetch> [return] ok 1425 - my @x; values @{$x[0]} <+fetch> [variable] ok 1426 - our @x; local @x; use strict; values @{$x[0]} <+fetch> [exception] ok 1427 - our @x; local @x; use strict; values @{$x[0]} <+fetch> [return] ok 1428 - our @x; local @x; use strict; values @{$x[0]} <+fetch> [variable] ok 1429 - our @x; local @x; no strict; values @{$x[0]} <+fetch> [exception] ok 1430 - our @x; local @x; no strict; values @{$x[0]} <+fetch> [return] ok 1431 - our @x; local @x; no strict; values @{$x[0]} <+fetch> [variable] ok 1432 - my $x; values @{$x->[0]} <+exists> [exception] ok 1433 - my $x; values @{$x->[0]} <+exists> [return] ok 1434 - my $x; values @{$x->[0]} <+exists> [variable] ok 1435 - our $x; local $x; use strict; values @{$x->[0]} <+exists> [exception] ok 1436 - our $x; local $x; use strict; values @{$x->[0]} <+exists> [return] ok 1437 - our $x; local $x; use strict; values @{$x->[0]} <+exists> [variable] ok 1438 - our $x; local $x; no strict; values @{$x->[0]} <+exists> [exception] ok 1439 - our $x; local $x; no strict; values @{$x->[0]} <+exists> [return] ok 1440 - our $x; local $x; no strict; values @{$x->[0]} <+exists> [variable] ok 1441 - my $x; values @{$$x[0]} <+exists> [exception] ok 1442 - my $x; values @{$$x[0]} <+exists> [return] ok 1443 - my $x; values @{$$x[0]} <+exists> [variable] ok 1444 - our $x; local $x; use strict; values @{$$x[0]} <+exists> [exception] ok 1445 - our $x; local $x; use strict; values @{$$x[0]} <+exists> [return] ok 1446 - our $x; local $x; use strict; values @{$$x[0]} <+exists> [variable] ok 1447 - our $x; local $x; no strict; values @{$$x[0]} <+exists> [exception] ok 1448 - our $x; local $x; no strict; values @{$$x[0]} <+exists> [return] ok 1449 - our $x; local $x; no strict; values @{$$x[0]} <+exists> [variable] ok 1450 - my @x; values @{$x[0]} <+exists> [exception] ok 1451 - my @x; values @{$x[0]} <+exists> [return] ok 1452 - my @x; values @{$x[0]} <+exists> [variable] ok 1453 - our @x; local @x; use strict; values @{$x[0]} <+exists> [exception] ok 1454 - our @x; local @x; use strict; values @{$x[0]} <+exists> [return] ok 1455 - our @x; local @x; use strict; values @{$x[0]} <+exists> [variable] ok 1456 - our @x; local @x; no strict; values @{$x[0]} <+exists> [exception] ok 1457 - our @x; local @x; no strict; values @{$x[0]} <+exists> [return] ok 1458 - our @x; local @x; no strict; values @{$x[0]} <+exists> [variable] ok 1459 - my $x; values @{$x->[0]} <+delete> [exception] ok 1460 - my $x; values @{$x->[0]} <+delete> [return] ok 1461 - my $x; values @{$x->[0]} <+delete> [variable] ok 1462 - our $x; local $x; use strict; values @{$x->[0]} <+delete> [exception] ok 1463 - our $x; local $x; use strict; values @{$x->[0]} <+delete> [return] ok 1464 - our $x; local $x; use strict; values @{$x->[0]} <+delete> [variable] ok 1465 - our $x; local $x; no strict; values @{$x->[0]} <+delete> [exception] ok 1466 - our $x; local $x; no strict; values @{$x->[0]} <+delete> [return] ok 1467 - our $x; local $x; no strict; values @{$x->[0]} <+delete> [variable] ok 1468 - my $x; values @{$$x[0]} <+delete> [exception] ok 1469 - my $x; values @{$$x[0]} <+delete> [return] ok 1470 - my $x; values @{$$x[0]} <+delete> [variable] ok 1471 - our $x; local $x; use strict; values @{$$x[0]} <+delete> [exception] ok 1472 - our $x; local $x; use strict; values @{$$x[0]} <+delete> [return] ok 1473 - our $x; local $x; use strict; values @{$$x[0]} <+delete> [variable] ok 1474 - our $x; local $x; no strict; values @{$$x[0]} <+delete> [exception] ok 1475 - our $x; local $x; no strict; values @{$$x[0]} <+delete> [return] ok 1476 - our $x; local $x; no strict; values @{$$x[0]} <+delete> [variable] ok 1477 - my @x; values @{$x[0]} <+delete> [exception] ok 1478 - my @x; values @{$x[0]} <+delete> [return] ok 1479 - my @x; values @{$x[0]} <+delete> [variable] ok 1480 - our @x; local @x; use strict; values @{$x[0]} <+delete> [exception] ok 1481 - our @x; local @x; use strict; values @{$x[0]} <+delete> [return] ok 1482 - our @x; local @x; use strict; values @{$x[0]} <+delete> [variable] ok 1483 - our @x; local @x; no strict; values @{$x[0]} <+delete> [exception] ok 1484 - our @x; local @x; no strict; values @{$x[0]} <+delete> [return] ok 1485 - our @x; local @x; no strict; values @{$x[0]} <+delete> [variable] ok 1486 - my $x; values @{$x->[0]} <+store> [exception] ok 1487 - my $x; values @{$x->[0]} <+store> [return] ok 1488 - my $x; values @{$x->[0]} <+store> [variable] ok 1489 - our $x; local $x; use strict; values @{$x->[0]} <+store> [exception] ok 1490 - our $x; local $x; use strict; values @{$x->[0]} <+store> [return] ok 1491 - our $x; local $x; use strict; values @{$x->[0]} <+store> [variable] ok 1492 - our $x; local $x; no strict; values @{$x->[0]} <+store> [exception] ok 1493 - our $x; local $x; no strict; values @{$x->[0]} <+store> [return] ok 1494 - our $x; local $x; no strict; values @{$x->[0]} <+store> [variable] ok 1495 - my $x; values @{$$x[0]} <+store> [exception] ok 1496 - my $x; values @{$$x[0]} <+store> [return] ok 1497 - my $x; values @{$$x[0]} <+store> [variable] ok 1498 - our $x; local $x; use strict; values @{$$x[0]} <+store> [exception] ok 1499 - our $x; local $x; use strict; values @{$$x[0]} <+store> [return] ok 1500 - our $x; local $x; use strict; values @{$$x[0]} <+store> [variable] ok 1501 - our $x; local $x; no strict; values @{$$x[0]} <+store> [exception] ok 1502 - our $x; local $x; no strict; values @{$$x[0]} <+store> [return] ok 1503 - our $x; local $x; no strict; values @{$$x[0]} <+store> [variable] ok 1504 - my @x; values @{$x[0]} <+store> [exception] ok 1505 - my @x; values @{$x[0]} <+store> [return] ok 1506 - my @x; values @{$x[0]} <+store> [variable] ok 1507 - our @x; local @x; use strict; values @{$x[0]} <+store> [exception] ok 1508 - our @x; local @x; use strict; values @{$x[0]} <+store> [return] ok 1509 - our @x; local @x; use strict; values @{$x[0]} <+store> [variable] ok 1510 - our @x; local @x; no strict; values @{$x[0]} <+store> [exception] ok 1511 - our @x; local @x; no strict; values @{$x[0]} <+store> [return] ok 1512 - our @x; local @x; no strict; values @{$x[0]} <+store> [variable] ok 1513 - my $x; values @{$x->[0]} <+strict +fetch> [exception] ok 1514 - my $x; values @{$x->[0]} <+strict +fetch> [return] ok 1515 - my $x; values @{$x->[0]} <+strict +fetch> [variable] ok 1516 - our $x; local $x; use strict; values @{$x->[0]} <+strict +fetch> [exception] ok 1517 - our $x; local $x; use strict; values @{$x->[0]} <+strict +fetch> [return] ok 1518 - our $x; local $x; use strict; values @{$x->[0]} <+strict +fetch> [variable] ok 1519 - our $x; local $x; no strict; values @{$x->[0]} <+strict +fetch> [exception] ok 1520 - our $x; local $x; no strict; values @{$x->[0]} <+strict +fetch> [return] ok 1521 - our $x; local $x; no strict; values @{$x->[0]} <+strict +fetch> [variable] ok 1522 - my $x; values @{$$x[0]} <+strict +fetch> [exception] ok 1523 - my $x; values @{$$x[0]} <+strict +fetch> [return] ok 1524 - my $x; values @{$$x[0]} <+strict +fetch> [variable] ok 1525 - our $x; local $x; use strict; values @{$$x[0]} <+strict +fetch> [exception] ok 1526 - our $x; local $x; use strict; values @{$$x[0]} <+strict +fetch> [return] ok 1527 - our $x; local $x; use strict; values @{$$x[0]} <+strict +fetch> [variable] ok 1528 - our $x; local $x; no strict; values @{$$x[0]} <+strict +fetch> [exception] ok 1529 - our $x; local $x; no strict; values @{$$x[0]} <+strict +fetch> [return] ok 1530 - our $x; local $x; no strict; values @{$$x[0]} <+strict +fetch> [variable] ok 1531 - my @x; 1 <+strict +fetch> [exception] ok 1532 - my @x; 1 <+strict +fetch> [return] ok 1533 - my @x; 1 <+strict +fetch> [variable] ok 1534 - our @x; local @x; use strict; 1 <+strict +fetch> [exception] ok 1535 - our @x; local @x; use strict; 1 <+strict +fetch> [return] ok 1536 - our @x; local @x; use strict; 1 <+strict +fetch> [variable] ok 1537 - our @x; local @x; no strict; 1 <+strict +fetch> [exception] ok 1538 - our @x; local @x; no strict; 1 <+strict +fetch> [return] ok 1539 - our @x; local @x; no strict; 1 <+strict +fetch> [variable] ok 1540 - my $x; values @{$x->[0]} <+strict +exists> [exception] ok 1541 - my $x; values @{$x->[0]} <+strict +exists> [return] ok 1542 - my $x; values @{$x->[0]} <+strict +exists> [variable] ok 1543 - our $x; local $x; use strict; values @{$x->[0]} <+strict +exists> [exception] ok 1544 - our $x; local $x; use strict; values @{$x->[0]} <+strict +exists> [return] ok 1545 - our $x; local $x; use strict; values @{$x->[0]} <+strict +exists> [variable] ok 1546 - our $x; local $x; no strict; values @{$x->[0]} <+strict +exists> [exception] ok 1547 - our $x; local $x; no strict; values @{$x->[0]} <+strict +exists> [return] ok 1548 - our $x; local $x; no strict; values @{$x->[0]} <+strict +exists> [variable] ok 1549 - my $x; values @{$$x[0]} <+strict +exists> [exception] ok 1550 - my $x; values @{$$x[0]} <+strict +exists> [return] ok 1551 - my $x; values @{$$x[0]} <+strict +exists> [variable] ok 1552 - our $x; local $x; use strict; values @{$$x[0]} <+strict +exists> [exception] ok 1553 - our $x; local $x; use strict; values @{$$x[0]} <+strict +exists> [return] ok 1554 - our $x; local $x; use strict; values @{$$x[0]} <+strict +exists> [variable] ok 1555 - our $x; local $x; no strict; values @{$$x[0]} <+strict +exists> [exception] ok 1556 - our $x; local $x; no strict; values @{$$x[0]} <+strict +exists> [return] ok 1557 - our $x; local $x; no strict; values @{$$x[0]} <+strict +exists> [variable] ok 1558 - my @x; values @{$x[0]} <+strict +exists> [exception] ok 1559 - my @x; values @{$x[0]} <+strict +exists> [return] ok 1560 - my @x; values @{$x[0]} <+strict +exists> [variable] ok 1561 - our @x; local @x; use strict; values @{$x[0]} <+strict +exists> [exception] ok 1562 - our @x; local @x; use strict; values @{$x[0]} <+strict +exists> [return] ok 1563 - our @x; local @x; use strict; values @{$x[0]} <+strict +exists> [variable] ok 1564 - our @x; local @x; no strict; values @{$x[0]} <+strict +exists> [exception] ok 1565 - our @x; local @x; no strict; values @{$x[0]} <+strict +exists> [return] ok 1566 - our @x; local @x; no strict; values @{$x[0]} <+strict +exists> [variable] ok 1567 - my $x; values @{$x->[0]} <+strict +delete> [exception] ok 1568 - my $x; values @{$x->[0]} <+strict +delete> [return] ok 1569 - my $x; values @{$x->[0]} <+strict +delete> [variable] ok 1570 - our $x; local $x; use strict; values @{$x->[0]} <+strict +delete> [exception] ok 1571 - our $x; local $x; use strict; values @{$x->[0]} <+strict +delete> [return] ok 1572 - our $x; local $x; use strict; values @{$x->[0]} <+strict +delete> [variable] ok 1573 - our $x; local $x; no strict; values @{$x->[0]} <+strict +delete> [exception] ok 1574 - our $x; local $x; no strict; values @{$x->[0]} <+strict +delete> [return] ok 1575 - our $x; local $x; no strict; values @{$x->[0]} <+strict +delete> [variable] ok 1576 - my $x; values @{$$x[0]} <+strict +delete> [exception] ok 1577 - my $x; values @{$$x[0]} <+strict +delete> [return] ok 1578 - my $x; values @{$$x[0]} <+strict +delete> [variable] ok 1579 - our $x; local $x; use strict; values @{$$x[0]} <+strict +delete> [exception] ok 1580 - our $x; local $x; use strict; values @{$$x[0]} <+strict +delete> [return] ok 1581 - our $x; local $x; use strict; values @{$$x[0]} <+strict +delete> [variable] ok 1582 - our $x; local $x; no strict; values @{$$x[0]} <+strict +delete> [exception] ok 1583 - our $x; local $x; no strict; values @{$$x[0]} <+strict +delete> [return] ok 1584 - our $x; local $x; no strict; values @{$$x[0]} <+strict +delete> [variable] ok 1585 - my @x; values @{$x[0]} <+strict +delete> [exception] ok 1586 - my @x; values @{$x[0]} <+strict +delete> [return] ok 1587 - my @x; values @{$x[0]} <+strict +delete> [variable] ok 1588 - our @x; local @x; use strict; values @{$x[0]} <+strict +delete> [exception] ok 1589 - our @x; local @x; use strict; values @{$x[0]} <+strict +delete> [return] ok 1590 - our @x; local @x; use strict; values @{$x[0]} <+strict +delete> [variable] ok 1591 - our @x; local @x; no strict; values @{$x[0]} <+strict +delete> [exception] ok 1592 - our @x; local @x; no strict; values @{$x[0]} <+strict +delete> [return] ok 1593 - our @x; local @x; no strict; values @{$x[0]} <+strict +delete> [variable] ok 1594 - my $x; values @{$x->[0]} <+strict +store> [exception] ok 1595 - my $x; values @{$x->[0]} <+strict +store> [return] ok 1596 - my $x; values @{$x->[0]} <+strict +store> [variable] ok 1597 - our $x; local $x; use strict; values @{$x->[0]} <+strict +store> [exception] ok 1598 - our $x; local $x; use strict; values @{$x->[0]} <+strict +store> [return] ok 1599 - our $x; local $x; use strict; values @{$x->[0]} <+strict +store> [variable] ok 1600 - our $x; local $x; no strict; values @{$x->[0]} <+strict +store> [exception] ok 1601 - our $x; local $x; no strict; values @{$x->[0]} <+strict +store> [return] ok 1602 - our $x; local $x; no strict; values @{$x->[0]} <+strict +store> [variable] ok 1603 - my $x; values @{$$x[0]} <+strict +store> [exception] ok 1604 - my $x; values @{$$x[0]} <+strict +store> [return] ok 1605 - my $x; values @{$$x[0]} <+strict +store> [variable] ok 1606 - our $x; local $x; use strict; values @{$$x[0]} <+strict +store> [exception] ok 1607 - our $x; local $x; use strict; values @{$$x[0]} <+strict +store> [return] ok 1608 - our $x; local $x; use strict; values @{$$x[0]} <+strict +store> [variable] ok 1609 - our $x; local $x; no strict; values @{$$x[0]} <+strict +store> [exception] ok 1610 - our $x; local $x; no strict; values @{$$x[0]} <+strict +store> [return] ok 1611 - our $x; local $x; no strict; values @{$$x[0]} <+strict +store> [variable] ok 1612 - my @x; values @{$x[0]} <+strict +store> [exception] ok 1613 - my @x; values @{$x[0]} <+strict +store> [return] ok 1614 - my @x; values @{$x[0]} <+strict +store> [variable] ok 1615 - our @x; local @x; use strict; values @{$x[0]} <+strict +store> [exception] ok 1616 - our @x; local @x; use strict; values @{$x[0]} <+strict +store> [return] ok 1617 - our @x; local @x; use strict; values @{$x[0]} <+strict +store> [variable] ok 1618 - our @x; local @x; no strict; values @{$x[0]} <+strict +store> [exception] ok 1619 - our @x; local @x; no strict; values @{$x[0]} <+strict +store> [return] ok 1620 - our @x; local @x; no strict; values @{$x[0]} <+strict +store> [variable] ok 1621 - my $x; [ values @{$x->[0]} ] [exception] ok 1622 - my $x; [ values @{$x->[0]} ] [return] ok 1623 - my $x; [ values @{$x->[0]} ] [variable] ok 1624 - our $x; local $x; use strict; [ values @{$x->[0]} ] [exception] ok 1625 - our $x; local $x; use strict; [ values @{$x->[0]} ] [return] ok 1626 - our $x; local $x; use strict; [ values @{$x->[0]} ] [variable] ok 1627 - our $x; local $x; no strict; [ values @{$x->[0]} ] [exception] ok 1628 - our $x; local $x; no strict; [ values @{$x->[0]} ] [return] ok 1629 - our $x; local $x; no strict; [ values @{$x->[0]} ] [variable] ok 1630 - my $x; [ values @{$$x[0]} ] [exception] ok 1631 - my $x; [ values @{$$x[0]} ] [return] ok 1632 - my $x; [ values @{$$x[0]} ] [variable] ok 1633 - our $x; local $x; use strict; [ values @{$$x[0]} ] [exception] ok 1634 - our $x; local $x; use strict; [ values @{$$x[0]} ] [return] ok 1635 - our $x; local $x; use strict; [ values @{$$x[0]} ] [variable] ok 1636 - our $x; local $x; no strict; [ values @{$$x[0]} ] [exception] ok 1637 - our $x; local $x; no strict; [ values @{$$x[0]} ] [return] ok 1638 - our $x; local $x; no strict; [ values @{$$x[0]} ] [variable] ok 1639 - my @x; [ values @{$x[0]} ] [exception] ok 1640 - my @x; [ values @{$x[0]} ] [return] ok 1641 - my @x; [ values @{$x[0]} ] [variable] ok 1642 - our @x; local @x; use strict; [ values @{$x[0]} ] [exception] ok 1643 - our @x; local @x; use strict; [ values @{$x[0]} ] [return] ok 1644 - our @x; local @x; use strict; [ values @{$x[0]} ] [variable] ok 1645 - our @x; local @x; no strict; [ values @{$x[0]} ] [exception] ok 1646 - our @x; local @x; no strict; [ values @{$x[0]} ] [return] ok 1647 - our @x; local @x; no strict; [ values @{$x[0]} ] [variable] ok 1648 - my $x; [ values @{$x->[0]} ] [exception] ok 1649 - my $x; [ values @{$x->[0]} ] [return] ok 1650 - my $x; [ values @{$x->[0]} ] [variable] ok 1651 - our $x; local $x; use strict; [ values @{$x->[0]} ] [exception] ok 1652 - our $x; local $x; use strict; [ values @{$x->[0]} ] [return] ok 1653 - our $x; local $x; use strict; [ values @{$x->[0]} ] [variable] ok 1654 - our $x; local $x; no strict; [ values @{$x->[0]} ] [exception] ok 1655 - our $x; local $x; no strict; [ values @{$x->[0]} ] [return] ok 1656 - our $x; local $x; no strict; [ values @{$x->[0]} ] [variable] ok 1657 - my $x; [ values @{$$x[0]} ] [exception] ok 1658 - my $x; [ values @{$$x[0]} ] [return] ok 1659 - my $x; [ values @{$$x[0]} ] [variable] ok 1660 - our $x; local $x; use strict; [ values @{$$x[0]} ] [exception] ok 1661 - our $x; local $x; use strict; [ values @{$$x[0]} ] [return] ok 1662 - our $x; local $x; use strict; [ values @{$$x[0]} ] [variable] ok 1663 - our $x; local $x; no strict; [ values @{$$x[0]} ] [exception] ok 1664 - our $x; local $x; no strict; [ values @{$$x[0]} ] [return] ok 1665 - our $x; local $x; no strict; [ values @{$$x[0]} ] [variable] ok 1666 - my @x; [ values @{$x[0]} ] [exception] ok 1667 - my @x; [ values @{$x[0]} ] [return] ok 1668 - my @x; [ values @{$x[0]} ] [variable] ok 1669 - our @x; local @x; use strict; [ values @{$x[0]} ] [exception] ok 1670 - our @x; local @x; use strict; [ values @{$x[0]} ] [return] ok 1671 - our @x; local @x; use strict; [ values @{$x[0]} ] [variable] ok 1672 - our @x; local @x; no strict; [ values @{$x[0]} ] [exception] ok 1673 - our @x; local @x; no strict; [ values @{$x[0]} ] [return] ok 1674 - our @x; local @x; no strict; [ values @{$x[0]} ] [variable] ok 1675 - my $x; [ values @{$x->[0]} ] <+fetch> [exception] ok 1676 - my $x; [ values @{$x->[0]} ] <+fetch> [return] ok 1677 - my $x; [ values @{$x->[0]} ] <+fetch> [variable] ok 1678 - our $x; local $x; use strict; [ values @{$x->[0]} ] <+fetch> [exception] ok 1679 - our $x; local $x; use strict; [ values @{$x->[0]} ] <+fetch> [return] ok 1680 - our $x; local $x; use strict; [ values @{$x->[0]} ] <+fetch> [variable] ok 1681 - our $x; local $x; no strict; [ values @{$x->[0]} ] <+fetch> [exception] ok 1682 - our $x; local $x; no strict; [ values @{$x->[0]} ] <+fetch> [return] ok 1683 - our $x; local $x; no strict; [ values @{$x->[0]} ] <+fetch> [variable] ok 1684 - my $x; [ values @{$$x[0]} ] <+fetch> [exception] ok 1685 - my $x; [ values @{$$x[0]} ] <+fetch> [return] ok 1686 - my $x; [ values @{$$x[0]} ] <+fetch> [variable] ok 1687 - our $x; local $x; use strict; [ values @{$$x[0]} ] <+fetch> [exception] ok 1688 - our $x; local $x; use strict; [ values @{$$x[0]} ] <+fetch> [return] ok 1689 - our $x; local $x; use strict; [ values @{$$x[0]} ] <+fetch> [variable] ok 1690 - our $x; local $x; no strict; [ values @{$$x[0]} ] <+fetch> [exception] ok 1691 - our $x; local $x; no strict; [ values @{$$x[0]} ] <+fetch> [return] ok 1692 - our $x; local $x; no strict; [ values @{$$x[0]} ] <+fetch> [variable] ok 1693 - my @x; [ values @{$x[0]} ] <+fetch> [exception] ok 1694 - my @x; [ values @{$x[0]} ] <+fetch> [return] ok 1695 - my @x; [ values @{$x[0]} ] <+fetch> [variable] ok 1696 - our @x; local @x; use strict; [ values @{$x[0]} ] <+fetch> [exception] ok 1697 - our @x; local @x; use strict; [ values @{$x[0]} ] <+fetch> [return] ok 1698 - our @x; local @x; use strict; [ values @{$x[0]} ] <+fetch> [variable] ok 1699 - our @x; local @x; no strict; [ values @{$x[0]} ] <+fetch> [exception] ok 1700 - our @x; local @x; no strict; [ values @{$x[0]} ] <+fetch> [return] ok 1701 - our @x; local @x; no strict; [ values @{$x[0]} ] <+fetch> [variable] ok 1702 - my $x; [ values @{$x->[0]} ] <+exists +delete +store> [exception] ok 1703 - my $x; [ values @{$x->[0]} ] <+exists +delete +store> [return] ok 1704 - my $x; [ values @{$x->[0]} ] <+exists +delete +store> [variable] ok 1705 - our $x; local $x; use strict; [ values @{$x->[0]} ] <+exists +delete +store> [exception] ok 1706 - our $x; local $x; use strict; [ values @{$x->[0]} ] <+exists +delete +store> [return] ok 1707 - our $x; local $x; use strict; [ values @{$x->[0]} ] <+exists +delete +store> [variable] ok 1708 - our $x; local $x; no strict; [ values @{$x->[0]} ] <+exists +delete +store> [exception] ok 1709 - our $x; local $x; no strict; [ values @{$x->[0]} ] <+exists +delete +store> [return] ok 1710 - our $x; local $x; no strict; [ values @{$x->[0]} ] <+exists +delete +store> [variable] ok 1711 - my $x; [ values @{$$x[0]} ] <+exists +delete +store> [exception] ok 1712 - my $x; [ values @{$$x[0]} ] <+exists +delete +store> [return] ok 1713 - my $x; [ values @{$$x[0]} ] <+exists +delete +store> [variable] ok 1714 - our $x; local $x; use strict; [ values @{$$x[0]} ] <+exists +delete +store> [exception] ok 1715 - our $x; local $x; use strict; [ values @{$$x[0]} ] <+exists +delete +store> [return] ok 1716 - our $x; local $x; use strict; [ values @{$$x[0]} ] <+exists +delete +store> [variable] ok 1717 - our $x; local $x; no strict; [ values @{$$x[0]} ] <+exists +delete +store> [exception] ok 1718 - our $x; local $x; no strict; [ values @{$$x[0]} ] <+exists +delete +store> [return] ok 1719 - our $x; local $x; no strict; [ values @{$$x[0]} ] <+exists +delete +store> [variable] ok 1720 - my @x; [ values @{$x[0]} ] <+exists +delete +store> [exception] ok 1721 - my @x; [ values @{$x[0]} ] <+exists +delete +store> [return] ok 1722 - my @x; [ values @{$x[0]} ] <+exists +delete +store> [variable] ok 1723 - our @x; local @x; use strict; [ values @{$x[0]} ] <+exists +delete +store> [exception] ok 1724 - our @x; local @x; use strict; [ values @{$x[0]} ] <+exists +delete +store> [return] ok 1725 - our @x; local @x; use strict; [ values @{$x[0]} ] <+exists +delete +store> [variable] ok 1726 - our @x; local @x; no strict; [ values @{$x[0]} ] <+exists +delete +store> [exception] ok 1727 - our @x; local @x; no strict; [ values @{$x[0]} ] <+exists +delete +store> [return] ok 1728 - our @x; local @x; no strict; [ values @{$x[0]} ] <+exists +delete +store> [variable] ok # Using Tie::StdArray 1.07 t/33-array-tied.t ........ 1..1 ok 1 - nested tied arrays ok t/34-array-numerous.t .... 1..16 ok 1 - numerous fetches from an undef lexical ok 2 - numerous fetches from a 1-level arrayref lexical ok 3 - numerous fetches from an undef global ok 4 - numerous fetches from a 1-level arrayref global ok 5 - numerous slices from an undef lexical ok 6 - numerous slices from a 1-level arrayref lexical ok 7 - numerous slices from an undef global ok 8 - numerous slices from a 1-level arrayref global ok 9 - numerous exists from an undef lexical ok 10 - numerous exists from a 1-level arrayref lexical ok 11 - numerous exists from an undef global ok 12 - numerous exists from a 1-level arrayref global ok 13 - numerous deletes from an undef lexical ok 14 - numerous deletes from a 1-level arrayref lexical ok 15 - numerous deletes from an undef global ok 16 - numerous deletes from a 1-level arrayref global ok t/40-scope.t ............. 1..12 ok 1 - warned only once ok 2 - warning looks correct ok 3 - didn't vivified ok 4 - returned undef ok 5 - first require test doesn't croak prematurely ok 6 - first require vivified correctly ok 7 - second require test doesn't croak prematurely ok 8 - second require test didn't vivify ok 9 - RT \#50570 ok 10 - identifying requires by their eval context pointer is not enough ok 11 - vivified without eval ok 12 - vivified with eval ok t/41-padsv.t ............. 1..4 ok 1 - padsv 1: no error ok 2 - padsv 1: correct returned value ok 3 - padsv 2: no error ok 4 - padsv 2: correct returned value ok # Using B::Deparse 1.76 t/42-deparse.t ........... 1..2 ok 1 - Original blech() works ok 2 - Deparsed blech() works ok t/43-peep.t .............. 1..36 ok 1 - peephole optimization of conditionals compiled fine ok 2 - peephole optimization of conditionals : first branch did not autovivify ok 3 - peephole optimization of conditionals : first branch returned 1 ok 4 - peephole optimization of conditionals : second branch did not autovivify ok 5 - peephole optimization of conditionals : second branch returned 2 ok 6 - peephole optimization of conditionals : third branch did not autovivify ok 7 - peephole optimization of conditionals : third branch returned 3 ok 8 - peephole optimization of conditionals : fourth branch did not autovivify ok 9 - peephole optimization of conditionals : fourth branch returned 4 ok 10 - peephole optimization of conditionals : fifth branch did not autovivify ok 11 - peephole optimization of conditionals : fifth branch returned 5 ok 12 - peephole optimization of C-style loops compiled fine ok 13 - peephole optimization of C-style loops did not autovivify ok 14 - peephole optimization of C-style loops returned 0+1+2+3 ok 15 - peephole optimization of range loops compiled fine ok 16 - peephole optimization of range loops did not autovivify ok 17 - peephole optimization of range loops returned 0+1+2+3 ok 18 - peephole optimization of infinite postfix while (RT \#99458) testcase did not crash ok 19 - peephole optimization of infinite postfix while (RT \#99458) compiled fine ok 20 - peephole optimization of infinite while loops testcase did not crash ok 21 - peephole optimization of infinite while loops compiled fine ok 22 - peephole optimization of infinite for loops (RT \#64435) testcase did not crash ok 23 - peephole optimization of infinite for loops (RT \#64435) compiled fine ok 24 - peephole optimization of infinite postfix until testcase did not crash ok 25 - peephole optimization of infinite postfix until compiled fine ok 26 - peephole optimization of infinite until loops testcase did not crash ok 27 - peephole optimization of infinite until loops compiled fine ok 28 - peephole optimization of map compiled fine ok 29 - peephole optimization of map did not autovivify ok 30 - peephole optimization of map returned the right value ok 31 - peephole optimization of grep compiled fine ok 32 - peephole optimization of grep did not autovivify ok 33 - peephole optimization of grep returned the right value ok 34 - peephole optimization of substitutions compiled fine ok 35 - peephole optimization of substitutions did not autovivify ok 36 - peephole optimization of substitutions returned the right value ok t/44-multideref.t ........ 1..16384 ok 1 - $vlex[0][0][0]: no exception ok 2 - $vlex[0][0][0]: value ok 3 - $vlex[0][0][0] = 123: no exception ok 4 - $vlex[0][0][0] = 123: value ok 5 - exists $vlex[0][0][0]: no exception ok 6 - exists $vlex[0][0][0]: value ok 7 - delete $vlex[0][0][0]: no exception ok 8 - delete $vlex[0][0][0]: value ok 9 - $vgbl[0][0][0]: no exception ok 10 - $vgbl[0][0][0]: value ok 11 - $vgbl[0][0][0] = 123: no exception ok 12 - $vgbl[0][0][0] = 123: value ok 13 - exists $vgbl[0][0][0]: no exception ok 14 - exists $vgbl[0][0][0]: value ok 15 - delete $vgbl[0][0][0]: no exception ok 16 - delete $vgbl[0][0][0]: value ok 17 - $vrlex->[0][0][0]: no exception ok 18 - $vrlex->[0][0][0]: value ok 19 - $vrlex->[0][0][0] = 123: no exception ok 20 - $vrlex->[0][0][0] = 123: value ok 21 - exists $vrlex->[0][0][0]: no exception ok 22 - exists $vrlex->[0][0][0]: value ok 23 - delete $vrlex->[0][0][0]: no exception ok 24 - delete $vrlex->[0][0][0]: value ok 25 - $vrgbl->[0][0][0]: no exception ok 26 - $vrgbl->[0][0][0]: value ok 27 - $vrgbl->[0][0][0] = 123: no exception ok 28 - $vrgbl->[0][0][0] = 123: value ok 29 - exists $vrgbl->[0][0][0]: no exception ok 30 - exists $vrgbl->[0][0][0]: value ok 31 - delete $vrgbl->[0][0][0]: no exception ok 32 - delete $vrgbl->[0][0][0]: value ok 33 - $vlex[$lex][0][0]: no exception ok 34 - $vlex[$lex][0][0]: value ok 35 - $vlex[$lex][0][0] = 123: no exception ok 36 - $vlex[$lex][0][0] = 123: value ok 37 - exists $vlex[$lex][0][0]: no exception ok 38 - exists $vlex[$lex][0][0]: value ok 39 - delete $vlex[$lex][0][0]: no exception ok 40 - delete $vlex[$lex][0][0]: value ok 41 - $vgbl[$lex][0][0]: no exception ok 42 - $vgbl[$lex][0][0]: value ok 43 - $vgbl[$lex][0][0] = 123: no exception ok 44 - $vgbl[$lex][0][0] = 123: value ok 45 - exists $vgbl[$lex][0][0]: no exception ok 46 - exists $vgbl[$lex][0][0]: value ok 47 - delete $vgbl[$lex][0][0]: no exception ok 48 - delete $vgbl[$lex][0][0]: value ok 49 - $vrlex->[$lex][0][0]: no exception ok 50 - $vrlex->[$lex][0][0]: value ok 51 - $vrlex->[$lex][0][0] = 123: no exception ok 52 - $vrlex->[$lex][0][0] = 123: value ok 53 - exists $vrlex->[$lex][0][0]: no exception ok 54 - exists $vrlex->[$lex][0][0]: value ok 55 - delete $vrlex->[$lex][0][0]: no exception ok 56 - delete $vrlex->[$lex][0][0]: value ok 57 - $vrgbl->[$lex][0][0]: no exception ok 58 - $vrgbl->[$lex][0][0]: value ok 59 - $vrgbl->[$lex][0][0] = 123: no exception ok 60 - $vrgbl->[$lex][0][0] = 123: value ok 61 - exists $vrgbl->[$lex][0][0]: no exception ok 62 - exists $vrgbl->[$lex][0][0]: value ok 63 - delete $vrgbl->[$lex][0][0]: no exception ok 64 - delete $vrgbl->[$lex][0][0]: value ok 65 - $vlex[$gbl][0][0]: no exception ok 66 - $vlex[$gbl][0][0]: value ok 67 - $vlex[$gbl][0][0] = 123: no exception ok 68 - $vlex[$gbl][0][0] = 123: value ok 69 - exists $vlex[$gbl][0][0]: no exception ok 70 - exists $vlex[$gbl][0][0]: value ok 71 - delete $vlex[$gbl][0][0]: no exception ok 72 - delete $vlex[$gbl][0][0]: value ok 73 - $vgbl[$gbl][0][0]: no exception ok 74 - $vgbl[$gbl][0][0]: value ok 75 - $vgbl[$gbl][0][0] = 123: no exception ok 76 - $vgbl[$gbl][0][0] = 123: value ok 77 - exists $vgbl[$gbl][0][0]: no exception ok 78 - exists $vgbl[$gbl][0][0]: value ok 79 - delete $vgbl[$gbl][0][0]: no exception ok 80 - delete $vgbl[$gbl][0][0]: value ok 81 - $vrlex->[$gbl][0][0]: no exception ok 82 - $vrlex->[$gbl][0][0]: value ok 83 - $vrlex->[$gbl][0][0] = 123: no exception ok 84 - $vrlex->[$gbl][0][0] = 123: value ok 85 - exists $vrlex->[$gbl][0][0]: no exception ok 86 - exists $vrlex->[$gbl][0][0]: value ok 87 - delete $vrlex->[$gbl][0][0]: no exception ok 88 - delete $vrlex->[$gbl][0][0]: value ok 89 - $vrgbl->[$gbl][0][0]: no exception ok 90 - $vrgbl->[$gbl][0][0]: value ok 91 - $vrgbl->[$gbl][0][0] = 123: no exception ok 92 - $vrgbl->[$gbl][0][0] = 123: value ok 93 - exists $vrgbl->[$gbl][0][0]: no exception ok 94 - exists $vrgbl->[$gbl][0][0]: value ok 95 - delete $vrgbl->[$gbl][0][0]: no exception ok 96 - delete $vrgbl->[$gbl][0][0]: value ok 97 - $vlex[$lex+1][0][0]: no exception ok 98 - $vlex[$lex+1][0][0]: value ok 99 - $vlex[$lex+1][0][0] = 123: no exception ok 100 - $vlex[$lex+1][0][0] = 123: value ok 101 - exists $vlex[$lex+1][0][0]: no exception ok 102 - exists $vlex[$lex+1][0][0]: value ok 103 - delete $vlex[$lex+1][0][0]: no exception ok 104 - delete $vlex[$lex+1][0][0]: value ok 105 - $vgbl[$lex+1][0][0]: no exception ok 106 - $vgbl[$lex+1][0][0]: value ok 107 - $vgbl[$lex+1][0][0] = 123: no exception ok 108 - $vgbl[$lex+1][0][0] = 123: value ok 109 - exists $vgbl[$lex+1][0][0]: no exception ok 110 - exists $vgbl[$lex+1][0][0]: value ok 111 - delete $vgbl[$lex+1][0][0]: no exception ok 112 - delete $vgbl[$lex+1][0][0]: value ok 113 - $vrlex->[$lex+1][0][0]: no exception ok 114 - $vrlex->[$lex+1][0][0]: value ok 115 - $vrlex->[$lex+1][0][0] = 123: no exception ok 116 - $vrlex->[$lex+1][0][0] = 123: value ok 117 - exists $vrlex->[$lex+1][0][0]: no exception ok 118 - exists $vrlex->[$lex+1][0][0]: value ok 119 - delete $vrlex->[$lex+1][0][0]: no exception ok 120 - delete $vrlex->[$lex+1][0][0]: value ok 121 - $vrgbl->[$lex+1][0][0]: no exception ok 122 - $vrgbl->[$lex+1][0][0]: value ok 123 - $vrgbl->[$lex+1][0][0] = 123: no exception ok 124 - $vrgbl->[$lex+1][0][0] = 123: value ok 125 - exists $vrgbl->[$lex+1][0][0]: no exception ok 126 - exists $vrgbl->[$lex+1][0][0]: value ok 127 - delete $vrgbl->[$lex+1][0][0]: no exception ok 128 - delete $vrgbl->[$lex+1][0][0]: value ok 129 - $vlex{foo}[0][0]: no exception ok 130 - $vlex{foo}[0][0]: value ok 131 - $vlex{foo}[0][0] = 123: no exception ok 132 - $vlex{foo}[0][0] = 123: value ok 133 - exists $vlex{foo}[0][0]: no exception ok 134 - exists $vlex{foo}[0][0]: value ok 135 - delete $vlex{foo}[0][0]: no exception ok 136 - delete $vlex{foo}[0][0]: value ok 137 - $vgbl{foo}[0][0]: no exception ok 138 - $vgbl{foo}[0][0]: value ok 139 - $vgbl{foo}[0][0] = 123: no exception ok 140 - $vgbl{foo}[0][0] = 123: value ok 141 - exists $vgbl{foo}[0][0]: no exception ok 142 - exists $vgbl{foo}[0][0]: value ok 143 - delete $vgbl{foo}[0][0]: no exception ok 144 - delete $vgbl{foo}[0][0]: value ok 145 - $vrlex->{foo}[0][0]: no exception ok 146 - $vrlex->{foo}[0][0]: value ok 147 - $vrlex->{foo}[0][0] = 123: no exception ok 148 - $vrlex->{foo}[0][0] = 123: value ok 149 - exists $vrlex->{foo}[0][0]: no exception ok 150 - exists $vrlex->{foo}[0][0]: value ok 151 - delete $vrlex->{foo}[0][0]: no exception ok 152 - delete $vrlex->{foo}[0][0]: value ok 153 - $vrgbl->{foo}[0][0]: no exception ok 154 - $vrgbl->{foo}[0][0]: value ok 155 - $vrgbl->{foo}[0][0] = 123: no exception ok 156 - $vrgbl->{foo}[0][0] = 123: value ok 157 - exists $vrgbl->{foo}[0][0]: no exception ok 158 - exists $vrgbl->{foo}[0][0]: value ok 159 - delete $vrgbl->{foo}[0][0]: no exception ok 160 - delete $vrgbl->{foo}[0][0]: value ok 161 - $vlex{$lex}[0][0]: no exception ok 162 - $vlex{$lex}[0][0]: value ok 163 - $vlex{$lex}[0][0] = 123: no exception ok 164 - $vlex{$lex}[0][0] = 123: value ok 165 - exists $vlex{$lex}[0][0]: no exception ok 166 - exists $vlex{$lex}[0][0]: value ok 167 - delete $vlex{$lex}[0][0]: no exception ok 168 - delete $vlex{$lex}[0][0]: value ok 169 - $vgbl{$lex}[0][0]: no exception ok 170 - $vgbl{$lex}[0][0]: value ok 171 - $vgbl{$lex}[0][0] = 123: no exception ok 172 - $vgbl{$lex}[0][0] = 123: value ok 173 - exists $vgbl{$lex}[0][0]: no exception ok 174 - exists $vgbl{$lex}[0][0]: value ok 175 - delete $vgbl{$lex}[0][0]: no exception ok 176 - delete $vgbl{$lex}[0][0]: value ok 177 - $vrlex->{$lex}[0][0]: no exception ok 178 - $vrlex->{$lex}[0][0]: value ok 179 - $vrlex->{$lex}[0][0] = 123: no exception ok 180 - $vrlex->{$lex}[0][0] = 123: value ok 181 - exists $vrlex->{$lex}[0][0]: no exception ok 182 - exists $vrlex->{$lex}[0][0]: value ok 183 - delete $vrlex->{$lex}[0][0]: no exception ok 184 - delete $vrlex->{$lex}[0][0]: value ok 185 - $vrgbl->{$lex}[0][0]: no exception ok 186 - $vrgbl->{$lex}[0][0]: value ok 187 - $vrgbl->{$lex}[0][0] = 123: no exception ok 188 - $vrgbl->{$lex}[0][0] = 123: value ok 189 - exists $vrgbl->{$lex}[0][0]: no exception ok 190 - exists $vrgbl->{$lex}[0][0]: value ok 191 - delete $vrgbl->{$lex}[0][0]: no exception ok 192 - delete $vrgbl->{$lex}[0][0]: value ok 193 - $vlex{$gbl}[0][0]: no exception ok 194 - $vlex{$gbl}[0][0]: value ok 195 - $vlex{$gbl}[0][0] = 123: no exception ok 196 - $vlex{$gbl}[0][0] = 123: value ok 197 - exists $vlex{$gbl}[0][0]: no exception ok 198 - exists $vlex{$gbl}[0][0]: value ok 199 - delete $vlex{$gbl}[0][0]: no exception ok 200 - delete $vlex{$gbl}[0][0]: value ok 201 - $vgbl{$gbl}[0][0]: no exception ok 202 - $vgbl{$gbl}[0][0]: value ok 203 - $vgbl{$gbl}[0][0] = 123: no exception ok 204 - $vgbl{$gbl}[0][0] = 123: value ok 205 - exists $vgbl{$gbl}[0][0]: no exception ok 206 - exists $vgbl{$gbl}[0][0]: value ok 207 - delete $vgbl{$gbl}[0][0]: no exception ok 208 - delete $vgbl{$gbl}[0][0]: value ok 209 - $vrlex->{$gbl}[0][0]: no exception ok 210 - $vrlex->{$gbl}[0][0]: value ok 211 - $vrlex->{$gbl}[0][0] = 123: no exception ok 212 - $vrlex->{$gbl}[0][0] = 123: value ok 213 - exists $vrlex->{$gbl}[0][0]: no exception ok 214 - exists $vrlex->{$gbl}[0][0]: value ok 215 - delete $vrlex->{$gbl}[0][0]: no exception ok 216 - delete $vrlex->{$gbl}[0][0]: value ok 217 - $vrgbl->{$gbl}[0][0]: no exception ok 218 - $vrgbl->{$gbl}[0][0]: value ok 219 - $vrgbl->{$gbl}[0][0] = 123: no exception ok 220 - $vrgbl->{$gbl}[0][0] = 123: value ok 221 - exists $vrgbl->{$gbl}[0][0]: no exception ok 222 - exists $vrgbl->{$gbl}[0][0]: value ok 223 - delete $vrgbl->{$gbl}[0][0]: no exception ok 224 - delete $vrgbl->{$gbl}[0][0]: value ok 225 - $vlex{"x$lex"}[0][0]: no exception ok 226 - $vlex{"x$lex"}[0][0]: value ok 227 - $vlex{"x$lex"}[0][0] = 123: no exception ok 228 - $vlex{"x$lex"}[0][0] = 123: value ok 229 - exists $vlex{"x$lex"}[0][0]: no exception ok 230 - exists $vlex{"x$lex"}[0][0]: value ok 231 - delete $vlex{"x$lex"}[0][0]: no exception ok 232 - delete $vlex{"x$lex"}[0][0]: value ok 233 - $vgbl{"x$lex"}[0][0]: no exception ok 234 - $vgbl{"x$lex"}[0][0]: value ok 235 - $vgbl{"x$lex"}[0][0] = 123: no exception ok 236 - $vgbl{"x$lex"}[0][0] = 123: value ok 237 - exists $vgbl{"x$lex"}[0][0]: no exception ok 238 - exists $vgbl{"x$lex"}[0][0]: value ok 239 - delete $vgbl{"x$lex"}[0][0]: no exception ok 240 - delete $vgbl{"x$lex"}[0][0]: value ok 241 - $vrlex->{"x$lex"}[0][0]: no exception ok 242 - $vrlex->{"x$lex"}[0][0]: value ok 243 - $vrlex->{"x$lex"}[0][0] = 123: no exception ok 244 - $vrlex->{"x$lex"}[0][0] = 123: value ok 245 - exists $vrlex->{"x$lex"}[0][0]: no exception ok 246 - exists $vrlex->{"x$lex"}[0][0]: value ok 247 - delete $vrlex->{"x$lex"}[0][0]: no exception ok 248 - delete $vrlex->{"x$lex"}[0][0]: value ok 249 - $vrgbl->{"x$lex"}[0][0]: no exception ok 250 - $vrgbl->{"x$lex"}[0][0]: value ok 251 - $vrgbl->{"x$lex"}[0][0] = 123: no exception ok 252 - $vrgbl->{"x$lex"}[0][0] = 123: value ok 253 - exists $vrgbl->{"x$lex"}[0][0]: no exception ok 254 - exists $vrgbl->{"x$lex"}[0][0]: value ok 255 - delete $vrgbl->{"x$lex"}[0][0]: no exception ok 256 - delete $vrgbl->{"x$lex"}[0][0]: value ok 257 - $vlex[0][$lex][0]: no exception ok 258 - $vlex[0][$lex][0]: value ok 259 - $vlex[0][$lex][0] = 123: no exception ok 260 - $vlex[0][$lex][0] = 123: value ok 261 - exists $vlex[0][$lex][0]: no exception ok 262 - exists $vlex[0][$lex][0]: value ok 263 - delete $vlex[0][$lex][0]: no exception ok 264 - delete $vlex[0][$lex][0]: value ok 265 - $vgbl[0][$lex][0]: no exception ok 266 - $vgbl[0][$lex][0]: value ok 267 - $vgbl[0][$lex][0] = 123: no exception ok 268 - $vgbl[0][$lex][0] = 123: value ok 269 - exists $vgbl[0][$lex][0]: no exception ok 270 - exists $vgbl[0][$lex][0]: value ok 271 - delete $vgbl[0][$lex][0]: no exception ok 272 - delete $vgbl[0][$lex][0]: value ok 273 - $vrlex->[0][$lex][0]: no exception ok 274 - $vrlex->[0][$lex][0]: value ok 275 - $vrlex->[0][$lex][0] = 123: no exception ok 276 - $vrlex->[0][$lex][0] = 123: value ok 277 - exists $vrlex->[0][$lex][0]: no exception ok 278 - exists $vrlex->[0][$lex][0]: value ok 279 - delete $vrlex->[0][$lex][0]: no exception ok 280 - delete $vrlex->[0][$lex][0]: value ok 281 - $vrgbl->[0][$lex][0]: no exception ok 282 - $vrgbl->[0][$lex][0]: value ok 283 - $vrgbl->[0][$lex][0] = 123: no exception ok 284 - $vrgbl->[0][$lex][0] = 123: value ok 285 - exists $vrgbl->[0][$lex][0]: no exception ok 286 - exists $vrgbl->[0][$lex][0]: value ok 287 - delete $vrgbl->[0][$lex][0]: no exception ok 288 - delete $vrgbl->[0][$lex][0]: value ok 289 - $vlex[$lex][$lex][0]: no exception ok 290 - $vlex[$lex][$lex][0]: value ok 291 - $vlex[$lex][$lex][0] = 123: no exception ok 292 - $vlex[$lex][$lex][0] = 123: value ok 293 - exists $vlex[$lex][$lex][0]: no exception ok 294 - exists $vlex[$lex][$lex][0]: value ok 295 - delete $vlex[$lex][$lex][0]: no exception ok 296 - delete $vlex[$lex][$lex][0]: value ok 297 - $vgbl[$lex][$lex][0]: no exception ok 298 - $vgbl[$lex][$lex][0]: value ok 299 - $vgbl[$lex][$lex][0] = 123: no exception ok 300 - $vgbl[$lex][$lex][0] = 123: value ok 301 - exists $vgbl[$lex][$lex][0]: no exception ok 302 - exists $vgbl[$lex][$lex][0]: value ok 303 - delete $vgbl[$lex][$lex][0]: no exception ok 304 - delete $vgbl[$lex][$lex][0]: value ok 305 - $vrlex->[$lex][$lex][0]: no exception ok 306 - $vrlex->[$lex][$lex][0]: value ok 307 - $vrlex->[$lex][$lex][0] = 123: no exception ok 308 - $vrlex->[$lex][$lex][0] = 123: value ok 309 - exists $vrlex->[$lex][$lex][0]: no exception ok 310 - exists $vrlex->[$lex][$lex][0]: value ok 311 - delete $vrlex->[$lex][$lex][0]: no exception ok 312 - delete $vrlex->[$lex][$lex][0]: value ok 313 - $vrgbl->[$lex][$lex][0]: no exception ok 314 - $vrgbl->[$lex][$lex][0]: value ok 315 - $vrgbl->[$lex][$lex][0] = 123: no exception ok 316 - $vrgbl->[$lex][$lex][0] = 123: value ok 317 - exists $vrgbl->[$lex][$lex][0]: no exception ok 318 - exists $vrgbl->[$lex][$lex][0]: value ok 319 - delete $vrgbl->[$lex][$lex][0]: no exception ok 320 - delete $vrgbl->[$lex][$lex][0]: value ok 321 - $vlex[$gbl][$lex][0]: no exception ok 322 - $vlex[$gbl][$lex][0]: value ok 323 - $vlex[$gbl][$lex][0] = 123: no exception ok 324 - $vlex[$gbl][$lex][0] = 123: value ok 325 - exists $vlex[$gbl][$lex][0]: no exception ok 326 - exists $vlex[$gbl][$lex][0]: value ok 327 - delete $vlex[$gbl][$lex][0]: no exception ok 328 - delete $vlex[$gbl][$lex][0]: value ok 329 - $vgbl[$gbl][$lex][0]: no exception ok 330 - $vgbl[$gbl][$lex][0]: value ok 331 - $vgbl[$gbl][$lex][0] = 123: no exception ok 332 - $vgbl[$gbl][$lex][0] = 123: value ok 333 - exists $vgbl[$gbl][$lex][0]: no exception ok 334 - exists $vgbl[$gbl][$lex][0]: value ok 335 - delete $vgbl[$gbl][$lex][0]: no exception ok 336 - delete $vgbl[$gbl][$lex][0]: value ok 337 - $vrlex->[$gbl][$lex][0]: no exception ok 338 - $vrlex->[$gbl][$lex][0]: value ok 339 - $vrlex->[$gbl][$lex][0] = 123: no exception ok 340 - $vrlex->[$gbl][$lex][0] = 123: value ok 341 - exists $vrlex->[$gbl][$lex][0]: no exception ok 342 - exists $vrlex->[$gbl][$lex][0]: value ok 343 - delete $vrlex->[$gbl][$lex][0]: no exception ok 344 - delete $vrlex->[$gbl][$lex][0]: value ok 345 - $vrgbl->[$gbl][$lex][0]: no exception ok 346 - $vrgbl->[$gbl][$lex][0]: value ok 347 - $vrgbl->[$gbl][$lex][0] = 123: no exception ok 348 - $vrgbl->[$gbl][$lex][0] = 123: value ok 349 - exists $vrgbl->[$gbl][$lex][0]: no exception ok 350 - exists $vrgbl->[$gbl][$lex][0]: value ok 351 - delete $vrgbl->[$gbl][$lex][0]: no exception ok 352 - delete $vrgbl->[$gbl][$lex][0]: value ok 353 - $vlex[$lex+1][$lex][0]: no exception ok 354 - $vlex[$lex+1][$lex][0]: value ok 355 - $vlex[$lex+1][$lex][0] = 123: no exception ok 356 - $vlex[$lex+1][$lex][0] = 123: value ok 357 - exists $vlex[$lex+1][$lex][0]: no exception ok 358 - exists $vlex[$lex+1][$lex][0]: value ok 359 - delete $vlex[$lex+1][$lex][0]: no exception ok 360 - delete $vlex[$lex+1][$lex][0]: value ok 361 - $vgbl[$lex+1][$lex][0]: no exception ok 362 - $vgbl[$lex+1][$lex][0]: value ok 363 - $vgbl[$lex+1][$lex][0] = 123: no exception ok 364 - $vgbl[$lex+1][$lex][0] = 123: value ok 365 - exists $vgbl[$lex+1][$lex][0]: no exception ok 366 - exists $vgbl[$lex+1][$lex][0]: value ok 367 - delete $vgbl[$lex+1][$lex][0]: no exception ok 368 - delete $vgbl[$lex+1][$lex][0]: value ok 369 - $vrlex->[$lex+1][$lex][0]: no exception ok 370 - $vrlex->[$lex+1][$lex][0]: value ok 371 - $vrlex->[$lex+1][$lex][0] = 123: no exception ok 372 - $vrlex->[$lex+1][$lex][0] = 123: value ok 373 - exists $vrlex->[$lex+1][$lex][0]: no exception ok 374 - exists $vrlex->[$lex+1][$lex][0]: value ok 375 - delete $vrlex->[$lex+1][$lex][0]: no exception ok 376 - delete $vrlex->[$lex+1][$lex][0]: value ok 377 - $vrgbl->[$lex+1][$lex][0]: no exception ok 378 - $vrgbl->[$lex+1][$lex][0]: value ok 379 - $vrgbl->[$lex+1][$lex][0] = 123: no exception ok 380 - $vrgbl->[$lex+1][$lex][0] = 123: value ok 381 - exists $vrgbl->[$lex+1][$lex][0]: no exception ok 382 - exists $vrgbl->[$lex+1][$lex][0]: value ok 383 - delete $vrgbl->[$lex+1][$lex][0]: no exception ok 384 - delete $vrgbl->[$lex+1][$lex][0]: value ok 385 - $vlex{foo}[$lex][0]: no exception ok 386 - $vlex{foo}[$lex][0]: value ok 387 - $vlex{foo}[$lex][0] = 123: no exception ok 388 - $vlex{foo}[$lex][0] = 123: value ok 389 - exists $vlex{foo}[$lex][0]: no exception ok 390 - exists $vlex{foo}[$lex][0]: value ok 391 - delete $vlex{foo}[$lex][0]: no exception ok 392 - delete $vlex{foo}[$lex][0]: value ok 393 - $vgbl{foo}[$lex][0]: no exception ok 394 - $vgbl{foo}[$lex][0]: value ok 395 - $vgbl{foo}[$lex][0] = 123: no exception ok 396 - $vgbl{foo}[$lex][0] = 123: value ok 397 - exists $vgbl{foo}[$lex][0]: no exception ok 398 - exists $vgbl{foo}[$lex][0]: value ok 399 - delete $vgbl{foo}[$lex][0]: no exception ok 400 - delete $vgbl{foo}[$lex][0]: value ok 401 - $vrlex->{foo}[$lex][0]: no exception ok 402 - $vrlex->{foo}[$lex][0]: value ok 403 - $vrlex->{foo}[$lex][0] = 123: no exception ok 404 - $vrlex->{foo}[$lex][0] = 123: value ok 405 - exists $vrlex->{foo}[$lex][0]: no exception ok 406 - exists $vrlex->{foo}[$lex][0]: value ok 407 - delete $vrlex->{foo}[$lex][0]: no exception ok 408 - delete $vrlex->{foo}[$lex][0]: value ok 409 - $vrgbl->{foo}[$lex][0]: no exception ok 410 - $vrgbl->{foo}[$lex][0]: value ok 411 - $vrgbl->{foo}[$lex][0] = 123: no exception ok 412 - $vrgbl->{foo}[$lex][0] = 123: value ok 413 - exists $vrgbl->{foo}[$lex][0]: no exception ok 414 - exists $vrgbl->{foo}[$lex][0]: value ok 415 - delete $vrgbl->{foo}[$lex][0]: no exception ok 416 - delete $vrgbl->{foo}[$lex][0]: value ok 417 - $vlex{$lex}[$lex][0]: no exception ok 418 - $vlex{$lex}[$lex][0]: value ok 419 - $vlex{$lex}[$lex][0] = 123: no exception ok 420 - $vlex{$lex}[$lex][0] = 123: value ok 421 - exists $vlex{$lex}[$lex][0]: no exception ok 422 - exists $vlex{$lex}[$lex][0]: value ok 423 - delete $vlex{$lex}[$lex][0]: no exception ok 424 - delete $vlex{$lex}[$lex][0]: value ok 425 - $vgbl{$lex}[$lex][0]: no exception ok 426 - $vgbl{$lex}[$lex][0]: value ok 427 - $vgbl{$lex}[$lex][0] = 123: no exception ok 428 - $vgbl{$lex}[$lex][0] = 123: value ok 429 - exists $vgbl{$lex}[$lex][0]: no exception ok 430 - exists $vgbl{$lex}[$lex][0]: value ok 431 - delete $vgbl{$lex}[$lex][0]: no exception ok 432 - delete $vgbl{$lex}[$lex][0]: value ok 433 - $vrlex->{$lex}[$lex][0]: no exception ok 434 - $vrlex->{$lex}[$lex][0]: value ok 435 - $vrlex->{$lex}[$lex][0] = 123: no exception ok 436 - $vrlex->{$lex}[$lex][0] = 123: value ok 437 - exists $vrlex->{$lex}[$lex][0]: no exception ok 438 - exists $vrlex->{$lex}[$lex][0]: value ok 439 - delete $vrlex->{$lex}[$lex][0]: no exception ok 440 - delete $vrlex->{$lex}[$lex][0]: value ok 441 - $vrgbl->{$lex}[$lex][0]: no exception ok 442 - $vrgbl->{$lex}[$lex][0]: value ok 443 - $vrgbl->{$lex}[$lex][0] = 123: no exception ok 444 - $vrgbl->{$lex}[$lex][0] = 123: value ok 445 - exists $vrgbl->{$lex}[$lex][0]: no exception ok 446 - exists $vrgbl->{$lex}[$lex][0]: value ok 447 - delete $vrgbl->{$lex}[$lex][0]: no exception ok 448 - delete $vrgbl->{$lex}[$lex][0]: value ok 449 - $vlex{$gbl}[$lex][0]: no exception ok 450 - $vlex{$gbl}[$lex][0]: value ok 451 - $vlex{$gbl}[$lex][0] = 123: no exception ok 452 - $vlex{$gbl}[$lex][0] = 123: value ok 453 - exists $vlex{$gbl}[$lex][0]: no exception ok 454 - exists $vlex{$gbl}[$lex][0]: value ok 455 - delete $vlex{$gbl}[$lex][0]: no exception ok 456 - delete $vlex{$gbl}[$lex][0]: value ok 457 - $vgbl{$gbl}[$lex][0]: no exception ok 458 - $vgbl{$gbl}[$lex][0]: value ok 459 - $vgbl{$gbl}[$lex][0] = 123: no exception ok 460 - $vgbl{$gbl}[$lex][0] = 123: value ok 461 - exists $vgbl{$gbl}[$lex][0]: no exception ok 462 - exists $vgbl{$gbl}[$lex][0]: value ok 463 - delete $vgbl{$gbl}[$lex][0]: no exception ok 464 - delete $vgbl{$gbl}[$lex][0]: value ok 465 - $vrlex->{$gbl}[$lex][0]: no exception ok 466 - $vrlex->{$gbl}[$lex][0]: value ok 467 - $vrlex->{$gbl}[$lex][0] = 123: no exception ok 468 - $vrlex->{$gbl}[$lex][0] = 123: value ok 469 - exists $vrlex->{$gbl}[$lex][0]: no exception ok 470 - exists $vrlex->{$gbl}[$lex][0]: value ok 471 - delete $vrlex->{$gbl}[$lex][0]: no exception ok 472 - delete $vrlex->{$gbl}[$lex][0]: value ok 473 - $vrgbl->{$gbl}[$lex][0]: no exception ok 474 - $vrgbl->{$gbl}[$lex][0]: value ok 475 - $vrgbl->{$gbl}[$lex][0] = 123: no exception ok 476 - $vrgbl->{$gbl}[$lex][0] = 123: value ok 477 - exists $vrgbl->{$gbl}[$lex][0]: no exception ok 478 - exists $vrgbl->{$gbl}[$lex][0]: value ok 479 - delete $vrgbl->{$gbl}[$lex][0]: no exception ok 480 - delete $vrgbl->{$gbl}[$lex][0]: value ok 481 - $vlex{"x$lex"}[$lex][0]: no exception ok 482 - $vlex{"x$lex"}[$lex][0]: value ok 483 - $vlex{"x$lex"}[$lex][0] = 123: no exception ok 484 - $vlex{"x$lex"}[$lex][0] = 123: value ok 485 - exists $vlex{"x$lex"}[$lex][0]: no exception ok 486 - exists $vlex{"x$lex"}[$lex][0]: value ok 487 - delete $vlex{"x$lex"}[$lex][0]: no exception ok 488 - delete $vlex{"x$lex"}[$lex][0]: value ok 489 - $vgbl{"x$lex"}[$lex][0]: no exception ok 490 - $vgbl{"x$lex"}[$lex][0]: value ok 491 - $vgbl{"x$lex"}[$lex][0] = 123: no exception ok 492 - $vgbl{"x$lex"}[$lex][0] = 123: value ok 493 - exists $vgbl{"x$lex"}[$lex][0]: no exception ok 494 - exists $vgbl{"x$lex"}[$lex][0]: value ok 495 - delete $vgbl{"x$lex"}[$lex][0]: no exception ok 496 - delete $vgbl{"x$lex"}[$lex][0]: value ok 497 - $vrlex->{"x$lex"}[$lex][0]: no exception ok 498 - $vrlex->{"x$lex"}[$lex][0]: value ok 499 - $vrlex->{"x$lex"}[$lex][0] = 123: no exception ok 500 - $vrlex->{"x$lex"}[$lex][0] = 123: value ok 501 - exists $vrlex->{"x$lex"}[$lex][0]: no exception ok 502 - exists $vrlex->{"x$lex"}[$lex][0]: value ok 503 - delete $vrlex->{"x$lex"}[$lex][0]: no exception ok 504 - delete $vrlex->{"x$lex"}[$lex][0]: value ok 505 - $vrgbl->{"x$lex"}[$lex][0]: no exception ok 506 - $vrgbl->{"x$lex"}[$lex][0]: value ok 507 - $vrgbl->{"x$lex"}[$lex][0] = 123: no exception ok 508 - $vrgbl->{"x$lex"}[$lex][0] = 123: value ok 509 - exists $vrgbl->{"x$lex"}[$lex][0]: no exception ok 510 - exists $vrgbl->{"x$lex"}[$lex][0]: value ok 511 - delete $vrgbl->{"x$lex"}[$lex][0]: no exception ok 512 - delete $vrgbl->{"x$lex"}[$lex][0]: value ok 513 - $vlex[0][$gbl][0]: no exception ok 514 - $vlex[0][$gbl][0]: value ok 515 - $vlex[0][$gbl][0] = 123: no exception ok 516 - $vlex[0][$gbl][0] = 123: value ok 517 - exists $vlex[0][$gbl][0]: no exception ok 518 - exists $vlex[0][$gbl][0]: value ok 519 - delete $vlex[0][$gbl][0]: no exception ok 520 - delete $vlex[0][$gbl][0]: value ok 521 - $vgbl[0][$gbl][0]: no exception ok 522 - $vgbl[0][$gbl][0]: value ok 523 - $vgbl[0][$gbl][0] = 123: no exception ok 524 - $vgbl[0][$gbl][0] = 123: value ok 525 - exists $vgbl[0][$gbl][0]: no exception ok 526 - exists $vgbl[0][$gbl][0]: value ok 527 - delete $vgbl[0][$gbl][0]: no exception ok 528 - delete $vgbl[0][$gbl][0]: value ok 529 - $vrlex->[0][$gbl][0]: no exception ok 530 - $vrlex->[0][$gbl][0]: value ok 531 - $vrlex->[0][$gbl][0] = 123: no exception ok 532 - $vrlex->[0][$gbl][0] = 123: value ok 533 - exists $vrlex->[0][$gbl][0]: no exception ok 534 - exists $vrlex->[0][$gbl][0]: value ok 535 - delete $vrlex->[0][$gbl][0]: no exception ok 536 - delete $vrlex->[0][$gbl][0]: value ok 537 - $vrgbl->[0][$gbl][0]: no exception ok 538 - $vrgbl->[0][$gbl][0]: value ok 539 - $vrgbl->[0][$gbl][0] = 123: no exception ok 540 - $vrgbl->[0][$gbl][0] = 123: value ok 541 - exists $vrgbl->[0][$gbl][0]: no exception ok 542 - exists $vrgbl->[0][$gbl][0]: value ok 543 - delete $vrgbl->[0][$gbl][0]: no exception ok 544 - delete $vrgbl->[0][$gbl][0]: value ok 545 - $vlex[$lex][$gbl][0]: no exception ok 546 - $vlex[$lex][$gbl][0]: value ok 547 - $vlex[$lex][$gbl][0] = 123: no exception ok 548 - $vlex[$lex][$gbl][0] = 123: value ok 549 - exists $vlex[$lex][$gbl][0]: no exception ok 550 - exists $vlex[$lex][$gbl][0]: value ok 551 - delete $vlex[$lex][$gbl][0]: no exception ok 552 - delete $vlex[$lex][$gbl][0]: value ok 553 - $vgbl[$lex][$gbl][0]: no exception ok 554 - $vgbl[$lex][$gbl][0]: value ok 555 - $vgbl[$lex][$gbl][0] = 123: no exception ok 556 - $vgbl[$lex][$gbl][0] = 123: value ok 557 - exists $vgbl[$lex][$gbl][0]: no exception ok 558 - exists $vgbl[$lex][$gbl][0]: value ok 559 - delete $vgbl[$lex][$gbl][0]: no exception ok 560 - delete $vgbl[$lex][$gbl][0]: value ok 561 - $vrlex->[$lex][$gbl][0]: no exception ok 562 - $vrlex->[$lex][$gbl][0]: value ok 563 - $vrlex->[$lex][$gbl][0] = 123: no exception ok 564 - $vrlex->[$lex][$gbl][0] = 123: value ok 565 - exists $vrlex->[$lex][$gbl][0]: no exception ok 566 - exists $vrlex->[$lex][$gbl][0]: value ok 567 - delete $vrlex->[$lex][$gbl][0]: no exception ok 568 - delete $vrlex->[$lex][$gbl][0]: value ok 569 - $vrgbl->[$lex][$gbl][0]: no exception ok 570 - $vrgbl->[$lex][$gbl][0]: value ok 571 - $vrgbl->[$lex][$gbl][0] = 123: no exception ok 572 - $vrgbl->[$lex][$gbl][0] = 123: value ok 573 - exists $vrgbl->[$lex][$gbl][0]: no exception ok 574 - exists $vrgbl->[$lex][$gbl][0]: value ok 575 - delete $vrgbl->[$lex][$gbl][0]: no exception ok 576 - delete $vrgbl->[$lex][$gbl][0]: value ok 577 - $vlex[$gbl][$gbl][0]: no exception ok 578 - $vlex[$gbl][$gbl][0]: value ok 579 - $vlex[$gbl][$gbl][0] = 123: no exception ok 580 - $vlex[$gbl][$gbl][0] = 123: value ok 581 - exists $vlex[$gbl][$gbl][0]: no exception ok 582 - exists $vlex[$gbl][$gbl][0]: value ok 583 - delete $vlex[$gbl][$gbl][0]: no exception ok 584 - delete $vlex[$gbl][$gbl][0]: value ok 585 - $vgbl[$gbl][$gbl][0]: no exception ok 586 - $vgbl[$gbl][$gbl][0]: value ok 587 - $vgbl[$gbl][$gbl][0] = 123: no exception ok 588 - $vgbl[$gbl][$gbl][0] = 123: value ok 589 - exists $vgbl[$gbl][$gbl][0]: no exception ok 590 - exists $vgbl[$gbl][$gbl][0]: value ok 591 - delete $vgbl[$gbl][$gbl][0]: no exception ok 592 - delete $vgbl[$gbl][$gbl][0]: value ok 593 - $vrlex->[$gbl][$gbl][0]: no exception ok 594 - $vrlex->[$gbl][$gbl][0]: value ok 595 - $vrlex->[$gbl][$gbl][0] = 123: no exception ok 596 - $vrlex->[$gbl][$gbl][0] = 123: value ok 597 - exists $vrlex->[$gbl][$gbl][0]: no exception ok 598 - exists $vrlex->[$gbl][$gbl][0]: value ok 599 - delete $vrlex->[$gbl][$gbl][0]: no exception ok 600 - delete $vrlex->[$gbl][$gbl][0]: value ok 601 - $vrgbl->[$gbl][$gbl][0]: no exception ok 602 - $vrgbl->[$gbl][$gbl][0]: value ok 603 - $vrgbl->[$gbl][$gbl][0] = 123: no exception ok 604 - $vrgbl->[$gbl][$gbl][0] = 123: value ok 605 - exists $vrgbl->[$gbl][$gbl][0]: no exception ok 606 - exists $vrgbl->[$gbl][$gbl][0]: value ok 607 - delete $vrgbl->[$gbl][$gbl][0]: no exception ok 608 - delete $vrgbl->[$gbl][$gbl][0]: value ok 609 - $vlex[$lex+1][$gbl][0]: no exception ok 610 - $vlex[$lex+1][$gbl][0]: value ok 611 - $vlex[$lex+1][$gbl][0] = 123: no exception ok 612 - $vlex[$lex+1][$gbl][0] = 123: value ok 613 - exists $vlex[$lex+1][$gbl][0]: no exception ok 614 - exists $vlex[$lex+1][$gbl][0]: value ok 615 - delete $vlex[$lex+1][$gbl][0]: no exception ok 616 - delete $vlex[$lex+1][$gbl][0]: value ok 617 - $vgbl[$lex+1][$gbl][0]: no exception ok 618 - $vgbl[$lex+1][$gbl][0]: value ok 619 - $vgbl[$lex+1][$gbl][0] = 123: no exception ok 620 - $vgbl[$lex+1][$gbl][0] = 123: value ok 621 - exists $vgbl[$lex+1][$gbl][0]: no exception ok 622 - exists $vgbl[$lex+1][$gbl][0]: value ok 623 - delete $vgbl[$lex+1][$gbl][0]: no exception ok 624 - delete $vgbl[$lex+1][$gbl][0]: value ok 625 - $vrlex->[$lex+1][$gbl][0]: no exception ok 626 - $vrlex->[$lex+1][$gbl][0]: value ok 627 - $vrlex->[$lex+1][$gbl][0] = 123: no exception ok 628 - $vrlex->[$lex+1][$gbl][0] = 123: value ok 629 - exists $vrlex->[$lex+1][$gbl][0]: no exception ok 630 - exists $vrlex->[$lex+1][$gbl][0]: value ok 631 - delete $vrlex->[$lex+1][$gbl][0]: no exception ok 632 - delete $vrlex->[$lex+1][$gbl][0]: value ok 633 - $vrgbl->[$lex+1][$gbl][0]: no exception ok 634 - $vrgbl->[$lex+1][$gbl][0]: value ok 635 - $vrgbl->[$lex+1][$gbl][0] = 123: no exception ok 636 - $vrgbl->[$lex+1][$gbl][0] = 123: value ok 637 - exists $vrgbl->[$lex+1][$gbl][0]: no exception ok 638 - exists $vrgbl->[$lex+1][$gbl][0]: value ok 639 - delete $vrgbl->[$lex+1][$gbl][0]: no exception ok 640 - delete $vrgbl->[$lex+1][$gbl][0]: value ok 641 - $vlex{foo}[$gbl][0]: no exception ok 642 - $vlex{foo}[$gbl][0]: value ok 643 - $vlex{foo}[$gbl][0] = 123: no exception ok 644 - $vlex{foo}[$gbl][0] = 123: value ok 645 - exists $vlex{foo}[$gbl][0]: no exception ok 646 - exists $vlex{foo}[$gbl][0]: value ok 647 - delete $vlex{foo}[$gbl][0]: no exception ok 648 - delete $vlex{foo}[$gbl][0]: value ok 649 - $vgbl{foo}[$gbl][0]: no exception ok 650 - $vgbl{foo}[$gbl][0]: value ok 651 - $vgbl{foo}[$gbl][0] = 123: no exception ok 652 - $vgbl{foo}[$gbl][0] = 123: value ok 653 - exists $vgbl{foo}[$gbl][0]: no exception ok 654 - exists $vgbl{foo}[$gbl][0]: value ok 655 - delete $vgbl{foo}[$gbl][0]: no exception ok 656 - delete $vgbl{foo}[$gbl][0]: value ok 657 - $vrlex->{foo}[$gbl][0]: no exception ok 658 - $vrlex->{foo}[$gbl][0]: value ok 659 - $vrlex->{foo}[$gbl][0] = 123: no exception ok 660 - $vrlex->{foo}[$gbl][0] = 123: value ok 661 - exists $vrlex->{foo}[$gbl][0]: no exception ok 662 - exists $vrlex->{foo}[$gbl][0]: value ok 663 - delete $vrlex->{foo}[$gbl][0]: no exception ok 664 - delete $vrlex->{foo}[$gbl][0]: value ok 665 - $vrgbl->{foo}[$gbl][0]: no exception ok 666 - $vrgbl->{foo}[$gbl][0]: value ok 667 - $vrgbl->{foo}[$gbl][0] = 123: no exception ok 668 - $vrgbl->{foo}[$gbl][0] = 123: value ok 669 - exists $vrgbl->{foo}[$gbl][0]: no exception ok 670 - exists $vrgbl->{foo}[$gbl][0]: value ok 671 - delete $vrgbl->{foo}[$gbl][0]: no exception ok 672 - delete $vrgbl->{foo}[$gbl][0]: value ok 673 - $vlex{$lex}[$gbl][0]: no exception ok 674 - $vlex{$lex}[$gbl][0]: value ok 675 - $vlex{$lex}[$gbl][0] = 123: no exception ok 676 - $vlex{$lex}[$gbl][0] = 123: value ok 677 - exists $vlex{$lex}[$gbl][0]: no exception ok 678 - exists $vlex{$lex}[$gbl][0]: value ok 679 - delete $vlex{$lex}[$gbl][0]: no exception ok 680 - delete $vlex{$lex}[$gbl][0]: value ok 681 - $vgbl{$lex}[$gbl][0]: no exception ok 682 - $vgbl{$lex}[$gbl][0]: value ok 683 - $vgbl{$lex}[$gbl][0] = 123: no exception ok 684 - $vgbl{$lex}[$gbl][0] = 123: value ok 685 - exists $vgbl{$lex}[$gbl][0]: no exception ok 686 - exists $vgbl{$lex}[$gbl][0]: value ok 687 - delete $vgbl{$lex}[$gbl][0]: no exception ok 688 - delete $vgbl{$lex}[$gbl][0]: value ok 689 - $vrlex->{$lex}[$gbl][0]: no exception ok 690 - $vrlex->{$lex}[$gbl][0]: value ok 691 - $vrlex->{$lex}[$gbl][0] = 123: no exception ok 692 - $vrlex->{$lex}[$gbl][0] = 123: value ok 693 - exists $vrlex->{$lex}[$gbl][0]: no exception ok 694 - exists $vrlex->{$lex}[$gbl][0]: value ok 695 - delete $vrlex->{$lex}[$gbl][0]: no exception ok 696 - delete $vrlex->{$lex}[$gbl][0]: value ok 697 - $vrgbl->{$lex}[$gbl][0]: no exception ok 698 - $vrgbl->{$lex}[$gbl][0]: value ok 699 - $vrgbl->{$lex}[$gbl][0] = 123: no exception ok 700 - $vrgbl->{$lex}[$gbl][0] = 123: value ok 701 - exists $vrgbl->{$lex}[$gbl][0]: no exception ok 702 - exists $vrgbl->{$lex}[$gbl][0]: value ok 703 - delete $vrgbl->{$lex}[$gbl][0]: no exception ok 704 - delete $vrgbl->{$lex}[$gbl][0]: value ok 705 - $vlex{$gbl}[$gbl][0]: no exception ok 706 - $vlex{$gbl}[$gbl][0]: value ok 707 - $vlex{$gbl}[$gbl][0] = 123: no exception ok 708 - $vlex{$gbl}[$gbl][0] = 123: value ok 709 - exists $vlex{$gbl}[$gbl][0]: no exception ok 710 - exists $vlex{$gbl}[$gbl][0]: value ok 711 - delete $vlex{$gbl}[$gbl][0]: no exception ok 712 - delete $vlex{$gbl}[$gbl][0]: value ok 713 - $vgbl{$gbl}[$gbl][0]: no exception ok 714 - $vgbl{$gbl}[$gbl][0]: value ok 715 - $vgbl{$gbl}[$gbl][0] = 123: no exception ok 716 - $vgbl{$gbl}[$gbl][0] = 123: value ok 717 - exists $vgbl{$gbl}[$gbl][0]: no exception ok 718 - exists $vgbl{$gbl}[$gbl][0]: value ok 719 - delete $vgbl{$gbl}[$gbl][0]: no exception ok 720 - delete $vgbl{$gbl}[$gbl][0]: value ok 721 - $vrlex->{$gbl}[$gbl][0]: no exception ok 722 - $vrlex->{$gbl}[$gbl][0]: value ok 723 - $vrlex->{$gbl}[$gbl][0] = 123: no exception ok 724 - $vrlex->{$gbl}[$gbl][0] = 123: value ok 725 - exists $vrlex->{$gbl}[$gbl][0]: no exception ok 726 - exists $vrlex->{$gbl}[$gbl][0]: value ok 727 - delete $vrlex->{$gbl}[$gbl][0]: no exception ok 728 - delete $vrlex->{$gbl}[$gbl][0]: value ok 729 - $vrgbl->{$gbl}[$gbl][0]: no exception ok 730 - $vrgbl->{$gbl}[$gbl][0]: value ok 731 - $vrgbl->{$gbl}[$gbl][0] = 123: no exception ok 732 - $vrgbl->{$gbl}[$gbl][0] = 123: value ok 733 - exists $vrgbl->{$gbl}[$gbl][0]: no exception ok 734 - exists $vrgbl->{$gbl}[$gbl][0]: value ok 735 - delete $vrgbl->{$gbl}[$gbl][0]: no exception ok 736 - delete $vrgbl->{$gbl}[$gbl][0]: value ok 737 - $vlex{"x$lex"}[$gbl][0]: no exception ok 738 - $vlex{"x$lex"}[$gbl][0]: value ok 739 - $vlex{"x$lex"}[$gbl][0] = 123: no exception ok 740 - $vlex{"x$lex"}[$gbl][0] = 123: value ok 741 - exists $vlex{"x$lex"}[$gbl][0]: no exception ok 742 - exists $vlex{"x$lex"}[$gbl][0]: value ok 743 - delete $vlex{"x$lex"}[$gbl][0]: no exception ok 744 - delete $vlex{"x$lex"}[$gbl][0]: value ok 745 - $vgbl{"x$lex"}[$gbl][0]: no exception ok 746 - $vgbl{"x$lex"}[$gbl][0]: value ok 747 - $vgbl{"x$lex"}[$gbl][0] = 123: no exception ok 748 - $vgbl{"x$lex"}[$gbl][0] = 123: value ok 749 - exists $vgbl{"x$lex"}[$gbl][0]: no exception ok 750 - exists $vgbl{"x$lex"}[$gbl][0]: value ok 751 - delete $vgbl{"x$lex"}[$gbl][0]: no exception ok 752 - delete $vgbl{"x$lex"}[$gbl][0]: value ok 753 - $vrlex->{"x$lex"}[$gbl][0]: no exception ok 754 - $vrlex->{"x$lex"}[$gbl][0]: value ok 755 - $vrlex->{"x$lex"}[$gbl][0] = 123: no exception ok 756 - $vrlex->{"x$lex"}[$gbl][0] = 123: value ok 757 - exists $vrlex->{"x$lex"}[$gbl][0]: no exception ok 758 - exists $vrlex->{"x$lex"}[$gbl][0]: value ok 759 - delete $vrlex->{"x$lex"}[$gbl][0]: no exception ok 760 - delete $vrlex->{"x$lex"}[$gbl][0]: value ok 761 - $vrgbl->{"x$lex"}[$gbl][0]: no exception ok 762 - $vrgbl->{"x$lex"}[$gbl][0]: value ok 763 - $vrgbl->{"x$lex"}[$gbl][0] = 123: no exception ok 764 - $vrgbl->{"x$lex"}[$gbl][0] = 123: value ok 765 - exists $vrgbl->{"x$lex"}[$gbl][0]: no exception ok 766 - exists $vrgbl->{"x$lex"}[$gbl][0]: value ok 767 - delete $vrgbl->{"x$lex"}[$gbl][0]: no exception ok 768 - delete $vrgbl->{"x$lex"}[$gbl][0]: value ok 769 - $vlex[0][$lex+1][0]: no exception ok 770 - $vlex[0][$lex+1][0]: value ok 771 - $vlex[0][$lex+1][0] = 123: no exception ok 772 - $vlex[0][$lex+1][0] = 123: value ok 773 - exists $vlex[0][$lex+1][0]: no exception ok 774 - exists $vlex[0][$lex+1][0]: value ok 775 - delete $vlex[0][$lex+1][0]: no exception ok 776 - delete $vlex[0][$lex+1][0]: value ok 777 - $vgbl[0][$lex+1][0]: no exception ok 778 - $vgbl[0][$lex+1][0]: value ok 779 - $vgbl[0][$lex+1][0] = 123: no exception ok 780 - $vgbl[0][$lex+1][0] = 123: value ok 781 - exists $vgbl[0][$lex+1][0]: no exception ok 782 - exists $vgbl[0][$lex+1][0]: value ok 783 - delete $vgbl[0][$lex+1][0]: no exception ok 784 - delete $vgbl[0][$lex+1][0]: value ok 785 - $vrlex->[0][$lex+1][0]: no exception ok 786 - $vrlex->[0][$lex+1][0]: value ok 787 - $vrlex->[0][$lex+1][0] = 123: no exception ok 788 - $vrlex->[0][$lex+1][0] = 123: value ok 789 - exists $vrlex->[0][$lex+1][0]: no exception ok 790 - exists $vrlex->[0][$lex+1][0]: value ok 791 - delete $vrlex->[0][$lex+1][0]: no exception ok 792 - delete $vrlex->[0][$lex+1][0]: value ok 793 - $vrgbl->[0][$lex+1][0]: no exception ok 794 - $vrgbl->[0][$lex+1][0]: value ok 795 - $vrgbl->[0][$lex+1][0] = 123: no exception ok 796 - $vrgbl->[0][$lex+1][0] = 123: value ok 797 - exists $vrgbl->[0][$lex+1][0]: no exception ok 798 - exists $vrgbl->[0][$lex+1][0]: value ok 799 - delete $vrgbl->[0][$lex+1][0]: no exception ok 800 - delete $vrgbl->[0][$lex+1][0]: value ok 801 - $vlex[$lex][$lex+1][0]: no exception ok 802 - $vlex[$lex][$lex+1][0]: value ok 803 - $vlex[$lex][$lex+1][0] = 123: no exception ok 804 - $vlex[$lex][$lex+1][0] = 123: value ok 805 - exists $vlex[$lex][$lex+1][0]: no exception ok 806 - exists $vlex[$lex][$lex+1][0]: value ok 807 - delete $vlex[$lex][$lex+1][0]: no exception ok 808 - delete $vlex[$lex][$lex+1][0]: value ok 809 - $vgbl[$lex][$lex+1][0]: no exception ok 810 - $vgbl[$lex][$lex+1][0]: value ok 811 - $vgbl[$lex][$lex+1][0] = 123: no exception ok 812 - $vgbl[$lex][$lex+1][0] = 123: value ok 813 - exists $vgbl[$lex][$lex+1][0]: no exception ok 814 - exists $vgbl[$lex][$lex+1][0]: value ok 815 - delete $vgbl[$lex][$lex+1][0]: no exception ok 816 - delete $vgbl[$lex][$lex+1][0]: value ok 817 - $vrlex->[$lex][$lex+1][0]: no exception ok 818 - $vrlex->[$lex][$lex+1][0]: value ok 819 - $vrlex->[$lex][$lex+1][0] = 123: no exception ok 820 - $vrlex->[$lex][$lex+1][0] = 123: value ok 821 - exists $vrlex->[$lex][$lex+1][0]: no exception ok 822 - exists $vrlex->[$lex][$lex+1][0]: value ok 823 - delete $vrlex->[$lex][$lex+1][0]: no exception ok 824 - delete $vrlex->[$lex][$lex+1][0]: value ok 825 - $vrgbl->[$lex][$lex+1][0]: no exception ok 826 - $vrgbl->[$lex][$lex+1][0]: value ok 827 - $vrgbl->[$lex][$lex+1][0] = 123: no exception ok 828 - $vrgbl->[$lex][$lex+1][0] = 123: value ok 829 - exists $vrgbl->[$lex][$lex+1][0]: no exception ok 830 - exists $vrgbl->[$lex][$lex+1][0]: value ok 831 - delete $vrgbl->[$lex][$lex+1][0]: no exception ok 832 - delete $vrgbl->[$lex][$lex+1][0]: value ok 833 - $vlex[$gbl][$lex+1][0]: no exception ok 834 - $vlex[$gbl][$lex+1][0]: value ok 835 - $vlex[$gbl][$lex+1][0] = 123: no exception ok 836 - $vlex[$gbl][$lex+1][0] = 123: value ok 837 - exists $vlex[$gbl][$lex+1][0]: no exception ok 838 - exists $vlex[$gbl][$lex+1][0]: value ok 839 - delete $vlex[$gbl][$lex+1][0]: no exception ok 840 - delete $vlex[$gbl][$lex+1][0]: value ok 841 - $vgbl[$gbl][$lex+1][0]: no exception ok 842 - $vgbl[$gbl][$lex+1][0]: value ok 843 - $vgbl[$gbl][$lex+1][0] = 123: no exception ok 844 - $vgbl[$gbl][$lex+1][0] = 123: value ok 845 - exists $vgbl[$gbl][$lex+1][0]: no exception ok 846 - exists $vgbl[$gbl][$lex+1][0]: value ok 847 - delete $vgbl[$gbl][$lex+1][0]: no exception ok 848 - delete $vgbl[$gbl][$lex+1][0]: value ok 849 - $vrlex->[$gbl][$lex+1][0]: no exception ok 850 - $vrlex->[$gbl][$lex+1][0]: value ok 851 - $vrlex->[$gbl][$lex+1][0] = 123: no exception ok 852 - $vrlex->[$gbl][$lex+1][0] = 123: value ok 853 - exists $vrlex->[$gbl][$lex+1][0]: no exception ok 854 - exists $vrlex->[$gbl][$lex+1][0]: value ok 855 - delete $vrlex->[$gbl][$lex+1][0]: no exception ok 856 - delete $vrlex->[$gbl][$lex+1][0]: value ok 857 - $vrgbl->[$gbl][$lex+1][0]: no exception ok 858 - $vrgbl->[$gbl][$lex+1][0]: value ok 859 - $vrgbl->[$gbl][$lex+1][0] = 123: no exception ok 860 - $vrgbl->[$gbl][$lex+1][0] = 123: value ok 861 - exists $vrgbl->[$gbl][$lex+1][0]: no exception ok 862 - exists $vrgbl->[$gbl][$lex+1][0]: value ok 863 - delete $vrgbl->[$gbl][$lex+1][0]: no exception ok 864 - delete $vrgbl->[$gbl][$lex+1][0]: value ok 865 - $vlex[$lex+1][$lex+1][0]: no exception ok 866 - $vlex[$lex+1][$lex+1][0]: value ok 867 - $vlex[$lex+1][$lex+1][0] = 123: no exception ok 868 - $vlex[$lex+1][$lex+1][0] = 123: value ok 869 - exists $vlex[$lex+1][$lex+1][0]: no exception ok 870 - exists $vlex[$lex+1][$lex+1][0]: value ok 871 - delete $vlex[$lex+1][$lex+1][0]: no exception ok 872 - delete $vlex[$lex+1][$lex+1][0]: value ok 873 - $vgbl[$lex+1][$lex+1][0]: no exception ok 874 - $vgbl[$lex+1][$lex+1][0]: value ok 875 - $vgbl[$lex+1][$lex+1][0] = 123: no exception ok 876 - $vgbl[$lex+1][$lex+1][0] = 123: value ok 877 - exists $vgbl[$lex+1][$lex+1][0]: no exception ok 878 - exists $vgbl[$lex+1][$lex+1][0]: value ok 879 - delete $vgbl[$lex+1][$lex+1][0]: no exception ok 880 - delete $vgbl[$lex+1][$lex+1][0]: value ok 881 - $vrlex->[$lex+1][$lex+1][0]: no exception ok 882 - $vrlex->[$lex+1][$lex+1][0]: value ok 883 - $vrlex->[$lex+1][$lex+1][0] = 123: no exception ok 884 - $vrlex->[$lex+1][$lex+1][0] = 123: value ok 885 - exists $vrlex->[$lex+1][$lex+1][0]: no exception ok 886 - exists $vrlex->[$lex+1][$lex+1][0]: value ok 887 - delete $vrlex->[$lex+1][$lex+1][0]: no exception ok 888 - delete $vrlex->[$lex+1][$lex+1][0]: value ok 889 - $vrgbl->[$lex+1][$lex+1][0]: no exception ok 890 - $vrgbl->[$lex+1][$lex+1][0]: value ok 891 - $vrgbl->[$lex+1][$lex+1][0] = 123: no exception ok 892 - $vrgbl->[$lex+1][$lex+1][0] = 123: value ok 893 - exists $vrgbl->[$lex+1][$lex+1][0]: no exception ok 894 - exists $vrgbl->[$lex+1][$lex+1][0]: value ok 895 - delete $vrgbl->[$lex+1][$lex+1][0]: no exception ok 896 - delete $vrgbl->[$lex+1][$lex+1][0]: value ok 897 - $vlex{foo}[$lex+1][0]: no exception ok 898 - $vlex{foo}[$lex+1][0]: value ok 899 - $vlex{foo}[$lex+1][0] = 123: no exception ok 900 - $vlex{foo}[$lex+1][0] = 123: value ok 901 - exists $vlex{foo}[$lex+1][0]: no exception ok 902 - exists $vlex{foo}[$lex+1][0]: value ok 903 - delete $vlex{foo}[$lex+1][0]: no exception ok 904 - delete $vlex{foo}[$lex+1][0]: value ok 905 - $vgbl{foo}[$lex+1][0]: no exception ok 906 - $vgbl{foo}[$lex+1][0]: value ok 907 - $vgbl{foo}[$lex+1][0] = 123: no exception ok 908 - $vgbl{foo}[$lex+1][0] = 123: value ok 909 - exists $vgbl{foo}[$lex+1][0]: no exception ok 910 - exists $vgbl{foo}[$lex+1][0]: value ok 911 - delete $vgbl{foo}[$lex+1][0]: no exception ok 912 - delete $vgbl{foo}[$lex+1][0]: value ok 913 - $vrlex->{foo}[$lex+1][0]: no exception ok 914 - $vrlex->{foo}[$lex+1][0]: value ok 915 - $vrlex->{foo}[$lex+1][0] = 123: no exception ok 916 - $vrlex->{foo}[$lex+1][0] = 123: value ok 917 - exists $vrlex->{foo}[$lex+1][0]: no exception ok 918 - exists $vrlex->{foo}[$lex+1][0]: value ok 919 - delete $vrlex->{foo}[$lex+1][0]: no exception ok 920 - delete $vrlex->{foo}[$lex+1][0]: value ok 921 - $vrgbl->{foo}[$lex+1][0]: no exception ok 922 - $vrgbl->{foo}[$lex+1][0]: value ok 923 - $vrgbl->{foo}[$lex+1][0] = 123: no exception ok 924 - $vrgbl->{foo}[$lex+1][0] = 123: value ok 925 - exists $vrgbl->{foo}[$lex+1][0]: no exception ok 926 - exists $vrgbl->{foo}[$lex+1][0]: value ok 927 - delete $vrgbl->{foo}[$lex+1][0]: no exception ok 928 - delete $vrgbl->{foo}[$lex+1][0]: value ok 929 - $vlex{$lex}[$lex+1][0]: no exception ok 930 - $vlex{$lex}[$lex+1][0]: value ok 931 - $vlex{$lex}[$lex+1][0] = 123: no exception ok 932 - $vlex{$lex}[$lex+1][0] = 123: value ok 933 - exists $vlex{$lex}[$lex+1][0]: no exception ok 934 - exists $vlex{$lex}[$lex+1][0]: value ok 935 - delete $vlex{$lex}[$lex+1][0]: no exception ok 936 - delete $vlex{$lex}[$lex+1][0]: value ok 937 - $vgbl{$lex}[$lex+1][0]: no exception ok 938 - $vgbl{$lex}[$lex+1][0]: value ok 939 - $vgbl{$lex}[$lex+1][0] = 123: no exception ok 940 - $vgbl{$lex}[$lex+1][0] = 123: value ok 941 - exists $vgbl{$lex}[$lex+1][0]: no exception ok 942 - exists $vgbl{$lex}[$lex+1][0]: value ok 943 - delete $vgbl{$lex}[$lex+1][0]: no exception ok 944 - delete $vgbl{$lex}[$lex+1][0]: value ok 945 - $vrlex->{$lex}[$lex+1][0]: no exception ok 946 - $vrlex->{$lex}[$lex+1][0]: value ok 947 - $vrlex->{$lex}[$lex+1][0] = 123: no exception ok 948 - $vrlex->{$lex}[$lex+1][0] = 123: value ok 949 - exists $vrlex->{$lex}[$lex+1][0]: no exception ok 950 - exists $vrlex->{$lex}[$lex+1][0]: value ok 951 - delete $vrlex->{$lex}[$lex+1][0]: no exception ok 952 - delete $vrlex->{$lex}[$lex+1][0]: value ok 953 - $vrgbl->{$lex}[$lex+1][0]: no exception ok 954 - $vrgbl->{$lex}[$lex+1][0]: value ok 955 - $vrgbl->{$lex}[$lex+1][0] = 123: no exception ok 956 - $vrgbl->{$lex}[$lex+1][0] = 123: value ok 957 - exists $vrgbl->{$lex}[$lex+1][0]: no exception ok 958 - exists $vrgbl->{$lex}[$lex+1][0]: value ok 959 - delete $vrgbl->{$lex}[$lex+1][0]: no exception ok 960 - delete $vrgbl->{$lex}[$lex+1][0]: value ok 961 - $vlex{$gbl}[$lex+1][0]: no exception ok 962 - $vlex{$gbl}[$lex+1][0]: value ok 963 - $vlex{$gbl}[$lex+1][0] = 123: no exception ok 964 - $vlex{$gbl}[$lex+1][0] = 123: value ok 965 - exists $vlex{$gbl}[$lex+1][0]: no exception ok 966 - exists $vlex{$gbl}[$lex+1][0]: value ok 967 - delete $vlex{$gbl}[$lex+1][0]: no exception ok 968 - delete $vlex{$gbl}[$lex+1][0]: value ok 969 - $vgbl{$gbl}[$lex+1][0]: no exception ok 970 - $vgbl{$gbl}[$lex+1][0]: value ok 971 - $vgbl{$gbl}[$lex+1][0] = 123: no exception ok 972 - $vgbl{$gbl}[$lex+1][0] = 123: value ok 973 - exists $vgbl{$gbl}[$lex+1][0]: no exception ok 974 - exists $vgbl{$gbl}[$lex+1][0]: value ok 975 - delete $vgbl{$gbl}[$lex+1][0]: no exception ok 976 - delete $vgbl{$gbl}[$lex+1][0]: value ok 977 - $vrlex->{$gbl}[$lex+1][0]: no exception ok 978 - $vrlex->{$gbl}[$lex+1][0]: value ok 979 - $vrlex->{$gbl}[$lex+1][0] = 123: no exception ok 980 - $vrlex->{$gbl}[$lex+1][0] = 123: value ok 981 - exists $vrlex->{$gbl}[$lex+1][0]: no exception ok 982 - exists $vrlex->{$gbl}[$lex+1][0]: value ok 983 - delete $vrlex->{$gbl}[$lex+1][0]: no exception ok 984 - delete $vrlex->{$gbl}[$lex+1][0]: value ok 985 - $vrgbl->{$gbl}[$lex+1][0]: no exception ok 986 - $vrgbl->{$gbl}[$lex+1][0]: value ok 987 - $vrgbl->{$gbl}[$lex+1][0] = 123: no exception ok 988 - $vrgbl->{$gbl}[$lex+1][0] = 123: value ok 989 - exists $vrgbl->{$gbl}[$lex+1][0]: no exception ok 990 - exists $vrgbl->{$gbl}[$lex+1][0]: value ok 991 - delete $vrgbl->{$gbl}[$lex+1][0]: no exception ok 992 - delete $vrgbl->{$gbl}[$lex+1][0]: value ok 993 - $vlex{"x$lex"}[$lex+1][0]: no exception ok 994 - $vlex{"x$lex"}[$lex+1][0]: value ok 995 - $vlex{"x$lex"}[$lex+1][0] = 123: no exception ok 996 - $vlex{"x$lex"}[$lex+1][0] = 123: value ok 997 - exists $vlex{"x$lex"}[$lex+1][0]: no exception ok 998 - exists $vlex{"x$lex"}[$lex+1][0]: value ok 999 - delete $vlex{"x$lex"}[$lex+1][0]: no exception ok 1000 - delete $vlex{"x$lex"}[$lex+1][0]: value ok 1001 - $vgbl{"x$lex"}[$lex+1][0]: no exception ok 1002 - $vgbl{"x$lex"}[$lex+1][0]: value ok 1003 - $vgbl{"x$lex"}[$lex+1][0] = 123: no exception ok 1004 - $vgbl{"x$lex"}[$lex+1][0] = 123: value ok 1005 - exists $vgbl{"x$lex"}[$lex+1][0]: no exception ok 1006 - exists $vgbl{"x$lex"}[$lex+1][0]: value ok 1007 - delete $vgbl{"x$lex"}[$lex+1][0]: no exception ok 1008 - delete $vgbl{"x$lex"}[$lex+1][0]: value ok 1009 - $vrlex->{"x$lex"}[$lex+1][0]: no exception ok 1010 - $vrlex->{"x$lex"}[$lex+1][0]: value ok 1011 - $vrlex->{"x$lex"}[$lex+1][0] = 123: no exception ok 1012 - $vrlex->{"x$lex"}[$lex+1][0] = 123: value ok 1013 - exists $vrlex->{"x$lex"}[$lex+1][0]: no exception ok 1014 - exists $vrlex->{"x$lex"}[$lex+1][0]: value ok 1015 - delete $vrlex->{"x$lex"}[$lex+1][0]: no exception ok 1016 - delete $vrlex->{"x$lex"}[$lex+1][0]: value ok 1017 - $vrgbl->{"x$lex"}[$lex+1][0]: no exception ok 1018 - $vrgbl->{"x$lex"}[$lex+1][0]: value ok 1019 - $vrgbl->{"x$lex"}[$lex+1][0] = 123: no exception ok 1020 - $vrgbl->{"x$lex"}[$lex+1][0] = 123: value ok 1021 - exists $vrgbl->{"x$lex"}[$lex+1][0]: no exception ok 1022 - exists $vrgbl->{"x$lex"}[$lex+1][0]: value ok 1023 - delete $vrgbl->{"x$lex"}[$lex+1][0]: no exception ok 1024 - delete $vrgbl->{"x$lex"}[$lex+1][0]: value ok 1025 - $vlex[0]{foo}[0]: no exception ok 1026 - $vlex[0]{foo}[0]: value ok 1027 - $vlex[0]{foo}[0] = 123: no exception ok 1028 - $vlex[0]{foo}[0] = 123: value ok 1029 - exists $vlex[0]{foo}[0]: no exception ok 1030 - exists $vlex[0]{foo}[0]: value ok 1031 - delete $vlex[0]{foo}[0]: no exception ok 1032 - delete $vlex[0]{foo}[0]: value ok 1033 - $vgbl[0]{foo}[0]: no exception ok 1034 - $vgbl[0]{foo}[0]: value ok 1035 - $vgbl[0]{foo}[0] = 123: no exception ok 1036 - $vgbl[0]{foo}[0] = 123: value ok 1037 - exists $vgbl[0]{foo}[0]: no exception ok 1038 - exists $vgbl[0]{foo}[0]: value ok 1039 - delete $vgbl[0]{foo}[0]: no exception ok 1040 - delete $vgbl[0]{foo}[0]: value ok 1041 - $vrlex->[0]{foo}[0]: no exception ok 1042 - $vrlex->[0]{foo}[0]: value ok 1043 - $vrlex->[0]{foo}[0] = 123: no exception ok 1044 - $vrlex->[0]{foo}[0] = 123: value ok 1045 - exists $vrlex->[0]{foo}[0]: no exception ok 1046 - exists $vrlex->[0]{foo}[0]: value ok 1047 - delete $vrlex->[0]{foo}[0]: no exception ok 1048 - delete $vrlex->[0]{foo}[0]: value ok 1049 - $vrgbl->[0]{foo}[0]: no exception ok 1050 - $vrgbl->[0]{foo}[0]: value ok 1051 - $vrgbl->[0]{foo}[0] = 123: no exception ok 1052 - $vrgbl->[0]{foo}[0] = 123: value ok 1053 - exists $vrgbl->[0]{foo}[0]: no exception ok 1054 - exists $vrgbl->[0]{foo}[0]: value ok 1055 - delete $vrgbl->[0]{foo}[0]: no exception ok 1056 - delete $vrgbl->[0]{foo}[0]: value ok 1057 - $vlex[$lex]{foo}[0]: no exception ok 1058 - $vlex[$lex]{foo}[0]: value ok 1059 - $vlex[$lex]{foo}[0] = 123: no exception ok 1060 - $vlex[$lex]{foo}[0] = 123: value ok 1061 - exists $vlex[$lex]{foo}[0]: no exception ok 1062 - exists $vlex[$lex]{foo}[0]: value ok 1063 - delete $vlex[$lex]{foo}[0]: no exception ok 1064 - delete $vlex[$lex]{foo}[0]: value ok 1065 - $vgbl[$lex]{foo}[0]: no exception ok 1066 - $vgbl[$lex]{foo}[0]: value ok 1067 - $vgbl[$lex]{foo}[0] = 123: no exception ok 1068 - $vgbl[$lex]{foo}[0] = 123: value ok 1069 - exists $vgbl[$lex]{foo}[0]: no exception ok 1070 - exists $vgbl[$lex]{foo}[0]: value ok 1071 - delete $vgbl[$lex]{foo}[0]: no exception ok 1072 - delete $vgbl[$lex]{foo}[0]: value ok 1073 - $vrlex->[$lex]{foo}[0]: no exception ok 1074 - $vrlex->[$lex]{foo}[0]: value ok 1075 - $vrlex->[$lex]{foo}[0] = 123: no exception ok 1076 - $vrlex->[$lex]{foo}[0] = 123: value ok 1077 - exists $vrlex->[$lex]{foo}[0]: no exception ok 1078 - exists $vrlex->[$lex]{foo}[0]: value ok 1079 - delete $vrlex->[$lex]{foo}[0]: no exception ok 1080 - delete $vrlex->[$lex]{foo}[0]: value ok 1081 - $vrgbl->[$lex]{foo}[0]: no exception ok 1082 - $vrgbl->[$lex]{foo}[0]: value ok 1083 - $vrgbl->[$lex]{foo}[0] = 123: no exception ok 1084 - $vrgbl->[$lex]{foo}[0] = 123: value ok 1085 - exists $vrgbl->[$lex]{foo}[0]: no exception ok 1086 - exists $vrgbl->[$lex]{foo}[0]: value ok 1087 - delete $vrgbl->[$lex]{foo}[0]: no exception ok 1088 - delete $vrgbl->[$lex]{foo}[0]: value ok 1089 - $vlex[$gbl]{foo}[0]: no exception ok 1090 - $vlex[$gbl]{foo}[0]: value ok 1091 - $vlex[$gbl]{foo}[0] = 123: no exception ok 1092 - $vlex[$gbl]{foo}[0] = 123: value ok 1093 - exists $vlex[$gbl]{foo}[0]: no exception ok 1094 - exists $vlex[$gbl]{foo}[0]: value ok 1095 - delete $vlex[$gbl]{foo}[0]: no exception ok 1096 - delete $vlex[$gbl]{foo}[0]: value ok 1097 - $vgbl[$gbl]{foo}[0]: no exception ok 1098 - $vgbl[$gbl]{foo}[0]: value ok 1099 - $vgbl[$gbl]{foo}[0] = 123: no exception ok 1100 - $vgbl[$gbl]{foo}[0] = 123: value ok 1101 - exists $vgbl[$gbl]{foo}[0]: no exception ok 1102 - exists $vgbl[$gbl]{foo}[0]: value ok 1103 - delete $vgbl[$gbl]{foo}[0]: no exception ok 1104 - delete $vgbl[$gbl]{foo}[0]: value ok 1105 - $vrlex->[$gbl]{foo}[0]: no exception ok 1106 - $vrlex->[$gbl]{foo}[0]: value ok 1107 - $vrlex->[$gbl]{foo}[0] = 123: no exception ok 1108 - $vrlex->[$gbl]{foo}[0] = 123: value ok 1109 - exists $vrlex->[$gbl]{foo}[0]: no exception ok 1110 - exists $vrlex->[$gbl]{foo}[0]: value ok 1111 - delete $vrlex->[$gbl]{foo}[0]: no exception ok 1112 - delete $vrlex->[$gbl]{foo}[0]: value ok 1113 - $vrgbl->[$gbl]{foo}[0]: no exception ok 1114 - $vrgbl->[$gbl]{foo}[0]: value ok 1115 - $vrgbl->[$gbl]{foo}[0] = 123: no exception ok 1116 - $vrgbl->[$gbl]{foo}[0] = 123: value ok 1117 - exists $vrgbl->[$gbl]{foo}[0]: no exception ok 1118 - exists $vrgbl->[$gbl]{foo}[0]: value ok 1119 - delete $vrgbl->[$gbl]{foo}[0]: no exception ok 1120 - delete $vrgbl->[$gbl]{foo}[0]: value ok 1121 - $vlex[$lex+1]{foo}[0]: no exception ok 1122 - $vlex[$lex+1]{foo}[0]: value ok 1123 - $vlex[$lex+1]{foo}[0] = 123: no exception ok 1124 - $vlex[$lex+1]{foo}[0] = 123: value ok 1125 - exists $vlex[$lex+1]{foo}[0]: no exception ok 1126 - exists $vlex[$lex+1]{foo}[0]: value ok 1127 - delete $vlex[$lex+1]{foo}[0]: no exception ok 1128 - delete $vlex[$lex+1]{foo}[0]: value ok 1129 - $vgbl[$lex+1]{foo}[0]: no exception ok 1130 - $vgbl[$lex+1]{foo}[0]: value ok 1131 - $vgbl[$lex+1]{foo}[0] = 123: no exception ok 1132 - $vgbl[$lex+1]{foo}[0] = 123: value ok 1133 - exists $vgbl[$lex+1]{foo}[0]: no exception ok 1134 - exists $vgbl[$lex+1]{foo}[0]: value ok 1135 - delete $vgbl[$lex+1]{foo}[0]: no exception ok 1136 - delete $vgbl[$lex+1]{foo}[0]: value ok 1137 - $vrlex->[$lex+1]{foo}[0]: no exception ok 1138 - $vrlex->[$lex+1]{foo}[0]: value ok 1139 - $vrlex->[$lex+1]{foo}[0] = 123: no exception ok 1140 - $vrlex->[$lex+1]{foo}[0] = 123: value ok 1141 - exists $vrlex->[$lex+1]{foo}[0]: no exception ok 1142 - exists $vrlex->[$lex+1]{foo}[0]: value ok 1143 - delete $vrlex->[$lex+1]{foo}[0]: no exception ok 1144 - delete $vrlex->[$lex+1]{foo}[0]: value ok 1145 - $vrgbl->[$lex+1]{foo}[0]: no exception ok 1146 - $vrgbl->[$lex+1]{foo}[0]: value ok 1147 - $vrgbl->[$lex+1]{foo}[0] = 123: no exception ok 1148 - $vrgbl->[$lex+1]{foo}[0] = 123: value ok 1149 - exists $vrgbl->[$lex+1]{foo}[0]: no exception ok 1150 - exists $vrgbl->[$lex+1]{foo}[0]: value ok 1151 - delete $vrgbl->[$lex+1]{foo}[0]: no exception ok 1152 - delete $vrgbl->[$lex+1]{foo}[0]: value ok 1153 - $vlex{foo}{foo}[0]: no exception ok 1154 - $vlex{foo}{foo}[0]: value ok 1155 - $vlex{foo}{foo}[0] = 123: no exception ok 1156 - $vlex{foo}{foo}[0] = 123: value ok 1157 - exists $vlex{foo}{foo}[0]: no exception ok 1158 - exists $vlex{foo}{foo}[0]: value ok 1159 - delete $vlex{foo}{foo}[0]: no exception ok 1160 - delete $vlex{foo}{foo}[0]: value ok 1161 - $vgbl{foo}{foo}[0]: no exception ok 1162 - $vgbl{foo}{foo}[0]: value ok 1163 - $vgbl{foo}{foo}[0] = 123: no exception ok 1164 - $vgbl{foo}{foo}[0] = 123: value ok 1165 - exists $vgbl{foo}{foo}[0]: no exception ok 1166 - exists $vgbl{foo}{foo}[0]: value ok 1167 - delete $vgbl{foo}{foo}[0]: no exception ok 1168 - delete $vgbl{foo}{foo}[0]: value ok 1169 - $vrlex->{foo}{foo}[0]: no exception ok 1170 - $vrlex->{foo}{foo}[0]: value ok 1171 - $vrlex->{foo}{foo}[0] = 123: no exception ok 1172 - $vrlex->{foo}{foo}[0] = 123: value ok 1173 - exists $vrlex->{foo}{foo}[0]: no exception ok 1174 - exists $vrlex->{foo}{foo}[0]: value ok 1175 - delete $vrlex->{foo}{foo}[0]: no exception ok 1176 - delete $vrlex->{foo}{foo}[0]: value ok 1177 - $vrgbl->{foo}{foo}[0]: no exception ok 1178 - $vrgbl->{foo}{foo}[0]: value ok 1179 - $vrgbl->{foo}{foo}[0] = 123: no exception ok 1180 - $vrgbl->{foo}{foo}[0] = 123: value ok 1181 - exists $vrgbl->{foo}{foo}[0]: no exception ok 1182 - exists $vrgbl->{foo}{foo}[0]: value ok 1183 - delete $vrgbl->{foo}{foo}[0]: no exception ok 1184 - delete $vrgbl->{foo}{foo}[0]: value ok 1185 - $vlex{$lex}{foo}[0]: no exception ok 1186 - $vlex{$lex}{foo}[0]: value ok 1187 - $vlex{$lex}{foo}[0] = 123: no exception ok 1188 - $vlex{$lex}{foo}[0] = 123: value ok 1189 - exists $vlex{$lex}{foo}[0]: no exception ok 1190 - exists $vlex{$lex}{foo}[0]: value ok 1191 - delete $vlex{$lex}{foo}[0]: no exception ok 1192 - delete $vlex{$lex}{foo}[0]: value ok 1193 - $vgbl{$lex}{foo}[0]: no exception ok 1194 - $vgbl{$lex}{foo}[0]: value ok 1195 - $vgbl{$lex}{foo}[0] = 123: no exception ok 1196 - $vgbl{$lex}{foo}[0] = 123: value ok 1197 - exists $vgbl{$lex}{foo}[0]: no exception ok 1198 - exists $vgbl{$lex}{foo}[0]: value ok 1199 - delete $vgbl{$lex}{foo}[0]: no exception ok 1200 - delete $vgbl{$lex}{foo}[0]: value ok 1201 - $vrlex->{$lex}{foo}[0]: no exception ok 1202 - $vrlex->{$lex}{foo}[0]: value ok 1203 - $vrlex->{$lex}{foo}[0] = 123: no exception ok 1204 - $vrlex->{$lex}{foo}[0] = 123: value ok 1205 - exists $vrlex->{$lex}{foo}[0]: no exception ok 1206 - exists $vrlex->{$lex}{foo}[0]: value ok 1207 - delete $vrlex->{$lex}{foo}[0]: no exception ok 1208 - delete $vrlex->{$lex}{foo}[0]: value ok 1209 - $vrgbl->{$lex}{foo}[0]: no exception ok 1210 - $vrgbl->{$lex}{foo}[0]: value ok 1211 - $vrgbl->{$lex}{foo}[0] = 123: no exception ok 1212 - $vrgbl->{$lex}{foo}[0] = 123: value ok 1213 - exists $vrgbl->{$lex}{foo}[0]: no exception ok 1214 - exists $vrgbl->{$lex}{foo}[0]: value ok 1215 - delete $vrgbl->{$lex}{foo}[0]: no exception ok 1216 - delete $vrgbl->{$lex}{foo}[0]: value ok 1217 - $vlex{$gbl}{foo}[0]: no exception ok 1218 - $vlex{$gbl}{foo}[0]: value ok 1219 - $vlex{$gbl}{foo}[0] = 123: no exception ok 1220 - $vlex{$gbl}{foo}[0] = 123: value ok 1221 - exists $vlex{$gbl}{foo}[0]: no exception ok 1222 - exists $vlex{$gbl}{foo}[0]: value ok 1223 - delete $vlex{$gbl}{foo}[0]: no exception ok 1224 - delete $vlex{$gbl}{foo}[0]: value ok 1225 - $vgbl{$gbl}{foo}[0]: no exception ok 1226 - $vgbl{$gbl}{foo}[0]: value ok 1227 - $vgbl{$gbl}{foo}[0] = 123: no exception ok 1228 - $vgbl{$gbl}{foo}[0] = 123: value ok 1229 - exists $vgbl{$gbl}{foo}[0]: no exception ok 1230 - exists $vgbl{$gbl}{foo}[0]: value ok 1231 - delete $vgbl{$gbl}{foo}[0]: no exception ok 1232 - delete $vgbl{$gbl}{foo}[0]: value ok 1233 - $vrlex->{$gbl}{foo}[0]: no exception ok 1234 - $vrlex->{$gbl}{foo}[0]: value ok 1235 - $vrlex->{$gbl}{foo}[0] = 123: no exception ok 1236 - $vrlex->{$gbl}{foo}[0] = 123: value ok 1237 - exists $vrlex->{$gbl}{foo}[0]: no exception ok 1238 - exists $vrlex->{$gbl}{foo}[0]: value ok 1239 - delete $vrlex->{$gbl}{foo}[0]: no exception ok 1240 - delete $vrlex->{$gbl}{foo}[0]: value ok 1241 - $vrgbl->{$gbl}{foo}[0]: no exception ok 1242 - $vrgbl->{$gbl}{foo}[0]: value ok 1243 - $vrgbl->{$gbl}{foo}[0] = 123: no exception ok 1244 - $vrgbl->{$gbl}{foo}[0] = 123: value ok 1245 - exists $vrgbl->{$gbl}{foo}[0]: no exception ok 1246 - exists $vrgbl->{$gbl}{foo}[0]: value ok 1247 - delete $vrgbl->{$gbl}{foo}[0]: no exception ok 1248 - delete $vrgbl->{$gbl}{foo}[0]: value ok 1249 - $vlex{"x$lex"}{foo}[0]: no exception ok 1250 - $vlex{"x$lex"}{foo}[0]: value ok 1251 - $vlex{"x$lex"}{foo}[0] = 123: no exception ok 1252 - $vlex{"x$lex"}{foo}[0] = 123: value ok 1253 - exists $vlex{"x$lex"}{foo}[0]: no exception ok 1254 - exists $vlex{"x$lex"}{foo}[0]: value ok 1255 - delete $vlex{"x$lex"}{foo}[0]: no exception ok 1256 - delete $vlex{"x$lex"}{foo}[0]: value ok 1257 - $vgbl{"x$lex"}{foo}[0]: no exception ok 1258 - $vgbl{"x$lex"}{foo}[0]: value ok 1259 - $vgbl{"x$lex"}{foo}[0] = 123: no exception ok 1260 - $vgbl{"x$lex"}{foo}[0] = 123: value ok 1261 - exists $vgbl{"x$lex"}{foo}[0]: no exception ok 1262 - exists $vgbl{"x$lex"}{foo}[0]: value ok 1263 - delete $vgbl{"x$lex"}{foo}[0]: no exception ok 1264 - delete $vgbl{"x$lex"}{foo}[0]: value ok 1265 - $vrlex->{"x$lex"}{foo}[0]: no exception ok 1266 - $vrlex->{"x$lex"}{foo}[0]: value ok 1267 - $vrlex->{"x$lex"}{foo}[0] = 123: no exception ok 1268 - $vrlex->{"x$lex"}{foo}[0] = 123: value ok 1269 - exists $vrlex->{"x$lex"}{foo}[0]: no exception ok 1270 - exists $vrlex->{"x$lex"}{foo}[0]: value ok 1271 - delete $vrlex->{"x$lex"}{foo}[0]: no exception ok 1272 - delete $vrlex->{"x$lex"}{foo}[0]: value ok 1273 - $vrgbl->{"x$lex"}{foo}[0]: no exception ok 1274 - $vrgbl->{"x$lex"}{foo}[0]: value ok 1275 - $vrgbl->{"x$lex"}{foo}[0] = 123: no exception ok 1276 - $vrgbl->{"x$lex"}{foo}[0] = 123: value ok 1277 - exists $vrgbl->{"x$lex"}{foo}[0]: no exception ok 1278 - exists $vrgbl->{"x$lex"}{foo}[0]: value ok 1279 - delete $vrgbl->{"x$lex"}{foo}[0]: no exception ok 1280 - delete $vrgbl->{"x$lex"}{foo}[0]: value ok 1281 - $vlex[0]{$lex}[0]: no exception ok 1282 - $vlex[0]{$lex}[0]: value ok 1283 - $vlex[0]{$lex}[0] = 123: no exception ok 1284 - $vlex[0]{$lex}[0] = 123: value ok 1285 - exists $vlex[0]{$lex}[0]: no exception ok 1286 - exists $vlex[0]{$lex}[0]: value ok 1287 - delete $vlex[0]{$lex}[0]: no exception ok 1288 - delete $vlex[0]{$lex}[0]: value ok 1289 - $vgbl[0]{$lex}[0]: no exception ok 1290 - $vgbl[0]{$lex}[0]: value ok 1291 - $vgbl[0]{$lex}[0] = 123: no exception ok 1292 - $vgbl[0]{$lex}[0] = 123: value ok 1293 - exists $vgbl[0]{$lex}[0]: no exception ok 1294 - exists $vgbl[0]{$lex}[0]: value ok 1295 - delete $vgbl[0]{$lex}[0]: no exception ok 1296 - delete $vgbl[0]{$lex}[0]: value ok 1297 - $vrlex->[0]{$lex}[0]: no exception ok 1298 - $vrlex->[0]{$lex}[0]: value ok 1299 - $vrlex->[0]{$lex}[0] = 123: no exception ok 1300 - $vrlex->[0]{$lex}[0] = 123: value ok 1301 - exists $vrlex->[0]{$lex}[0]: no exception ok 1302 - exists $vrlex->[0]{$lex}[0]: value ok 1303 - delete $vrlex->[0]{$lex}[0]: no exception ok 1304 - delete $vrlex->[0]{$lex}[0]: value ok 1305 - $vrgbl->[0]{$lex}[0]: no exception ok 1306 - $vrgbl->[0]{$lex}[0]: value ok 1307 - $vrgbl->[0]{$lex}[0] = 123: no exception ok 1308 - $vrgbl->[0]{$lex}[0] = 123: value ok 1309 - exists $vrgbl->[0]{$lex}[0]: no exception ok 1310 - exists $vrgbl->[0]{$lex}[0]: value ok 1311 - delete $vrgbl->[0]{$lex}[0]: no exception ok 1312 - delete $vrgbl->[0]{$lex}[0]: value ok 1313 - $vlex[$lex]{$lex}[0]: no exception ok 1314 - $vlex[$lex]{$lex}[0]: value ok 1315 - $vlex[$lex]{$lex}[0] = 123: no exception ok 1316 - $vlex[$lex]{$lex}[0] = 123: value ok 1317 - exists $vlex[$lex]{$lex}[0]: no exception ok 1318 - exists $vlex[$lex]{$lex}[0]: value ok 1319 - delete $vlex[$lex]{$lex}[0]: no exception ok 1320 - delete $vlex[$lex]{$lex}[0]: value ok 1321 - $vgbl[$lex]{$lex}[0]: no exception ok 1322 - $vgbl[$lex]{$lex}[0]: value ok 1323 - $vgbl[$lex]{$lex}[0] = 123: no exception ok 1324 - $vgbl[$lex]{$lex}[0] = 123: value ok 1325 - exists $vgbl[$lex]{$lex}[0]: no exception ok 1326 - exists $vgbl[$lex]{$lex}[0]: value ok 1327 - delete $vgbl[$lex]{$lex}[0]: no exception ok 1328 - delete $vgbl[$lex]{$lex}[0]: value ok 1329 - $vrlex->[$lex]{$lex}[0]: no exception ok 1330 - $vrlex->[$lex]{$lex}[0]: value ok 1331 - $vrlex->[$lex]{$lex}[0] = 123: no exception ok 1332 - $vrlex->[$lex]{$lex}[0] = 123: value ok 1333 - exists $vrlex->[$lex]{$lex}[0]: no exception ok 1334 - exists $vrlex->[$lex]{$lex}[0]: value ok 1335 - delete $vrlex->[$lex]{$lex}[0]: no exception ok 1336 - delete $vrlex->[$lex]{$lex}[0]: value ok 1337 - $vrgbl->[$lex]{$lex}[0]: no exception ok 1338 - $vrgbl->[$lex]{$lex}[0]: value ok 1339 - $vrgbl->[$lex]{$lex}[0] = 123: no exception ok 1340 - $vrgbl->[$lex]{$lex}[0] = 123: value ok 1341 - exists $vrgbl->[$lex]{$lex}[0]: no exception ok 1342 - exists $vrgbl->[$lex]{$lex}[0]: value ok 1343 - delete $vrgbl->[$lex]{$lex}[0]: no exception ok 1344 - delete $vrgbl->[$lex]{$lex}[0]: value ok 1345 - $vlex[$gbl]{$lex}[0]: no exception ok 1346 - $vlex[$gbl]{$lex}[0]: value ok 1347 - $vlex[$gbl]{$lex}[0] = 123: no exception ok 1348 - $vlex[$gbl]{$lex}[0] = 123: value ok 1349 - exists $vlex[$gbl]{$lex}[0]: no exception ok 1350 - exists $vlex[$gbl]{$lex}[0]: value ok 1351 - delete $vlex[$gbl]{$lex}[0]: no exception ok 1352 - delete $vlex[$gbl]{$lex}[0]: value ok 1353 - $vgbl[$gbl]{$lex}[0]: no exception ok 1354 - $vgbl[$gbl]{$lex}[0]: value ok 1355 - $vgbl[$gbl]{$lex}[0] = 123: no exception ok 1356 - $vgbl[$gbl]{$lex}[0] = 123: value ok 1357 - exists $vgbl[$gbl]{$lex}[0]: no exception ok 1358 - exists $vgbl[$gbl]{$lex}[0]: value ok 1359 - delete $vgbl[$gbl]{$lex}[0]: no exception ok 1360 - delete $vgbl[$gbl]{$lex}[0]: value ok 1361 - $vrlex->[$gbl]{$lex}[0]: no exception ok 1362 - $vrlex->[$gbl]{$lex}[0]: value ok 1363 - $vrlex->[$gbl]{$lex}[0] = 123: no exception ok 1364 - $vrlex->[$gbl]{$lex}[0] = 123: value ok 1365 - exists $vrlex->[$gbl]{$lex}[0]: no exception ok 1366 - exists $vrlex->[$gbl]{$lex}[0]: value ok 1367 - delete $vrlex->[$gbl]{$lex}[0]: no exception ok 1368 - delete $vrlex->[$gbl]{$lex}[0]: value ok 1369 - $vrgbl->[$gbl]{$lex}[0]: no exception ok 1370 - $vrgbl->[$gbl]{$lex}[0]: value ok 1371 - $vrgbl->[$gbl]{$lex}[0] = 123: no exception ok 1372 - $vrgbl->[$gbl]{$lex}[0] = 123: value ok 1373 - exists $vrgbl->[$gbl]{$lex}[0]: no exception ok 1374 - exists $vrgbl->[$gbl]{$lex}[0]: value ok 1375 - delete $vrgbl->[$gbl]{$lex}[0]: no exception ok 1376 - delete $vrgbl->[$gbl]{$lex}[0]: value ok 1377 - $vlex[$lex+1]{$lex}[0]: no exception ok 1378 - $vlex[$lex+1]{$lex}[0]: value ok 1379 - $vlex[$lex+1]{$lex}[0] = 123: no exception ok 1380 - $vlex[$lex+1]{$lex}[0] = 123: value ok 1381 - exists $vlex[$lex+1]{$lex}[0]: no exception ok 1382 - exists $vlex[$lex+1]{$lex}[0]: value ok 1383 - delete $vlex[$lex+1]{$lex}[0]: no exception ok 1384 - delete $vlex[$lex+1]{$lex}[0]: value ok 1385 - $vgbl[$lex+1]{$lex}[0]: no exception ok 1386 - $vgbl[$lex+1]{$lex}[0]: value ok 1387 - $vgbl[$lex+1]{$lex}[0] = 123: no exception ok 1388 - $vgbl[$lex+1]{$lex}[0] = 123: value ok 1389 - exists $vgbl[$lex+1]{$lex}[0]: no exception ok 1390 - exists $vgbl[$lex+1]{$lex}[0]: value ok 1391 - delete $vgbl[$lex+1]{$lex}[0]: no exception ok 1392 - delete $vgbl[$lex+1]{$lex}[0]: value ok 1393 - $vrlex->[$lex+1]{$lex}[0]: no exception ok 1394 - $vrlex->[$lex+1]{$lex}[0]: value ok 1395 - $vrlex->[$lex+1]{$lex}[0] = 123: no exception ok 1396 - $vrlex->[$lex+1]{$lex}[0] = 123: value ok 1397 - exists $vrlex->[$lex+1]{$lex}[0]: no exception ok 1398 - exists $vrlex->[$lex+1]{$lex}[0]: value ok 1399 - delete $vrlex->[$lex+1]{$lex}[0]: no exception ok 1400 - delete $vrlex->[$lex+1]{$lex}[0]: value ok 1401 - $vrgbl->[$lex+1]{$lex}[0]: no exception ok 1402 - $vrgbl->[$lex+1]{$lex}[0]: value ok 1403 - $vrgbl->[$lex+1]{$lex}[0] = 123: no exception ok 1404 - $vrgbl->[$lex+1]{$lex}[0] = 123: value ok 1405 - exists $vrgbl->[$lex+1]{$lex}[0]: no exception ok 1406 - exists $vrgbl->[$lex+1]{$lex}[0]: value ok 1407 - delete $vrgbl->[$lex+1]{$lex}[0]: no exception ok 1408 - delete $vrgbl->[$lex+1]{$lex}[0]: value ok 1409 - $vlex{foo}{$lex}[0]: no exception ok 1410 - $vlex{foo}{$lex}[0]: value ok 1411 - $vlex{foo}{$lex}[0] = 123: no exception ok 1412 - $vlex{foo}{$lex}[0] = 123: value ok 1413 - exists $vlex{foo}{$lex}[0]: no exception ok 1414 - exists $vlex{foo}{$lex}[0]: value ok 1415 - delete $vlex{foo}{$lex}[0]: no exception ok 1416 - delete $vlex{foo}{$lex}[0]: value ok 1417 - $vgbl{foo}{$lex}[0]: no exception ok 1418 - $vgbl{foo}{$lex}[0]: value ok 1419 - $vgbl{foo}{$lex}[0] = 123: no exception ok 1420 - $vgbl{foo}{$lex}[0] = 123: value ok 1421 - exists $vgbl{foo}{$lex}[0]: no exception ok 1422 - exists $vgbl{foo}{$lex}[0]: value ok 1423 - delete $vgbl{foo}{$lex}[0]: no exception ok 1424 - delete $vgbl{foo}{$lex}[0]: value ok 1425 - $vrlex->{foo}{$lex}[0]: no exception ok 1426 - $vrlex->{foo}{$lex}[0]: value ok 1427 - $vrlex->{foo}{$lex}[0] = 123: no exception ok 1428 - $vrlex->{foo}{$lex}[0] = 123: value ok 1429 - exists $vrlex->{foo}{$lex}[0]: no exception ok 1430 - exists $vrlex->{foo}{$lex}[0]: value ok 1431 - delete $vrlex->{foo}{$lex}[0]: no exception ok 1432 - delete $vrlex->{foo}{$lex}[0]: value ok 1433 - $vrgbl->{foo}{$lex}[0]: no exception ok 1434 - $vrgbl->{foo}{$lex}[0]: value ok 1435 - $vrgbl->{foo}{$lex}[0] = 123: no exception ok 1436 - $vrgbl->{foo}{$lex}[0] = 123: value ok 1437 - exists $vrgbl->{foo}{$lex}[0]: no exception ok 1438 - exists $vrgbl->{foo}{$lex}[0]: value ok 1439 - delete $vrgbl->{foo}{$lex}[0]: no exception ok 1440 - delete $vrgbl->{foo}{$lex}[0]: value ok 1441 - $vlex{$lex}{$lex}[0]: no exception ok 1442 - $vlex{$lex}{$lex}[0]: value ok 1443 - $vlex{$lex}{$lex}[0] = 123: no exception ok 1444 - $vlex{$lex}{$lex}[0] = 123: value ok 1445 - exists $vlex{$lex}{$lex}[0]: no exception ok 1446 - exists $vlex{$lex}{$lex}[0]: value ok 1447 - delete $vlex{$lex}{$lex}[0]: no exception ok 1448 - delete $vlex{$lex}{$lex}[0]: value ok 1449 - $vgbl{$lex}{$lex}[0]: no exception ok 1450 - $vgbl{$lex}{$lex}[0]: value ok 1451 - $vgbl{$lex}{$lex}[0] = 123: no exception ok 1452 - $vgbl{$lex}{$lex}[0] = 123: value ok 1453 - exists $vgbl{$lex}{$lex}[0]: no exception ok 1454 - exists $vgbl{$lex}{$lex}[0]: value ok 1455 - delete $vgbl{$lex}{$lex}[0]: no exception ok 1456 - delete $vgbl{$lex}{$lex}[0]: value ok 1457 - $vrlex->{$lex}{$lex}[0]: no exception ok 1458 - $vrlex->{$lex}{$lex}[0]: value ok 1459 - $vrlex->{$lex}{$lex}[0] = 123: no exception ok 1460 - $vrlex->{$lex}{$lex}[0] = 123: value ok 1461 - exists $vrlex->{$lex}{$lex}[0]: no exception ok 1462 - exists $vrlex->{$lex}{$lex}[0]: value ok 1463 - delete $vrlex->{$lex}{$lex}[0]: no exception ok 1464 - delete $vrlex->{$lex}{$lex}[0]: value ok 1465 - $vrgbl->{$lex}{$lex}[0]: no exception ok 1466 - $vrgbl->{$lex}{$lex}[0]: value ok 1467 - $vrgbl->{$lex}{$lex}[0] = 123: no exception ok 1468 - $vrgbl->{$lex}{$lex}[0] = 123: value ok 1469 - exists $vrgbl->{$lex}{$lex}[0]: no exception ok 1470 - exists $vrgbl->{$lex}{$lex}[0]: value ok 1471 - delete $vrgbl->{$lex}{$lex}[0]: no exception ok 1472 - delete $vrgbl->{$lex}{$lex}[0]: value ok 1473 - $vlex{$gbl}{$lex}[0]: no exception ok 1474 - $vlex{$gbl}{$lex}[0]: value ok 1475 - $vlex{$gbl}{$lex}[0] = 123: no exception ok 1476 - $vlex{$gbl}{$lex}[0] = 123: value ok 1477 - exists $vlex{$gbl}{$lex}[0]: no exception ok 1478 - exists $vlex{$gbl}{$lex}[0]: value ok 1479 - delete $vlex{$gbl}{$lex}[0]: no exception ok 1480 - delete $vlex{$gbl}{$lex}[0]: value ok 1481 - $vgbl{$gbl}{$lex}[0]: no exception ok 1482 - $vgbl{$gbl}{$lex}[0]: value ok 1483 - $vgbl{$gbl}{$lex}[0] = 123: no exception ok 1484 - $vgbl{$gbl}{$lex}[0] = 123: value ok 1485 - exists $vgbl{$gbl}{$lex}[0]: no exception ok 1486 - exists $vgbl{$gbl}{$lex}[0]: value ok 1487 - delete $vgbl{$gbl}{$lex}[0]: no exception ok 1488 - delete $vgbl{$gbl}{$lex}[0]: value ok 1489 - $vrlex->{$gbl}{$lex}[0]: no exception ok 1490 - $vrlex->{$gbl}{$lex}[0]: value ok 1491 - $vrlex->{$gbl}{$lex}[0] = 123: no exception ok 1492 - $vrlex->{$gbl}{$lex}[0] = 123: value ok 1493 - exists $vrlex->{$gbl}{$lex}[0]: no exception ok 1494 - exists $vrlex->{$gbl}{$lex}[0]: value ok 1495 - delete $vrlex->{$gbl}{$lex}[0]: no exception ok 1496 - delete $vrlex->{$gbl}{$lex}[0]: value ok 1497 - $vrgbl->{$gbl}{$lex}[0]: no exception ok 1498 - $vrgbl->{$gbl}{$lex}[0]: value ok 1499 - $vrgbl->{$gbl}{$lex}[0] = 123: no exception ok 1500 - $vrgbl->{$gbl}{$lex}[0] = 123: value ok 1501 - exists $vrgbl->{$gbl}{$lex}[0]: no exception ok 1502 - exists $vrgbl->{$gbl}{$lex}[0]: value ok 1503 - delete $vrgbl->{$gbl}{$lex}[0]: no exception ok 1504 - delete $vrgbl->{$gbl}{$lex}[0]: value ok 1505 - $vlex{"x$lex"}{$lex}[0]: no exception ok 1506 - $vlex{"x$lex"}{$lex}[0]: value ok 1507 - $vlex{"x$lex"}{$lex}[0] = 123: no exception ok 1508 - $vlex{"x$lex"}{$lex}[0] = 123: value ok 1509 - exists $vlex{"x$lex"}{$lex}[0]: no exception ok 1510 - exists $vlex{"x$lex"}{$lex}[0]: value ok 1511 - delete $vlex{"x$lex"}{$lex}[0]: no exception ok 1512 - delete $vlex{"x$lex"}{$lex}[0]: value ok 1513 - $vgbl{"x$lex"}{$lex}[0]: no exception ok 1514 - $vgbl{"x$lex"}{$lex}[0]: value ok 1515 - $vgbl{"x$lex"}{$lex}[0] = 123: no exception ok 1516 - $vgbl{"x$lex"}{$lex}[0] = 123: value ok 1517 - exists $vgbl{"x$lex"}{$lex}[0]: no exception ok 1518 - exists $vgbl{"x$lex"}{$lex}[0]: value ok 1519 - delete $vgbl{"x$lex"}{$lex}[0]: no exception ok 1520 - delete $vgbl{"x$lex"}{$lex}[0]: value ok 1521 - $vrlex->{"x$lex"}{$lex}[0]: no exception ok 1522 - $vrlex->{"x$lex"}{$lex}[0]: value ok 1523 - $vrlex->{"x$lex"}{$lex}[0] = 123: no exception ok 1524 - $vrlex->{"x$lex"}{$lex}[0] = 123: value ok 1525 - exists $vrlex->{"x$lex"}{$lex}[0]: no exception ok 1526 - exists $vrlex->{"x$lex"}{$lex}[0]: value ok 1527 - delete $vrlex->{"x$lex"}{$lex}[0]: no exception ok 1528 - delete $vrlex->{"x$lex"}{$lex}[0]: value ok 1529 - $vrgbl->{"x$lex"}{$lex}[0]: no exception ok 1530 - $vrgbl->{"x$lex"}{$lex}[0]: value ok 1531 - $vrgbl->{"x$lex"}{$lex}[0] = 123: no exception ok 1532 - $vrgbl->{"x$lex"}{$lex}[0] = 123: value ok 1533 - exists $vrgbl->{"x$lex"}{$lex}[0]: no exception ok 1534 - exists $vrgbl->{"x$lex"}{$lex}[0]: value ok 1535 - delete $vrgbl->{"x$lex"}{$lex}[0]: no exception ok 1536 - delete $vrgbl->{"x$lex"}{$lex}[0]: value ok 1537 - $vlex[0]{$gbl}[0]: no exception ok 1538 - $vlex[0]{$gbl}[0]: value ok 1539 - $vlex[0]{$gbl}[0] = 123: no exception ok 1540 - $vlex[0]{$gbl}[0] = 123: value ok 1541 - exists $vlex[0]{$gbl}[0]: no exception ok 1542 - exists $vlex[0]{$gbl}[0]: value ok 1543 - delete $vlex[0]{$gbl}[0]: no exception ok 1544 - delete $vlex[0]{$gbl}[0]: value ok 1545 - $vgbl[0]{$gbl}[0]: no exception ok 1546 - $vgbl[0]{$gbl}[0]: value ok 1547 - $vgbl[0]{$gbl}[0] = 123: no exception ok 1548 - $vgbl[0]{$gbl}[0] = 123: value ok 1549 - exists $vgbl[0]{$gbl}[0]: no exception ok 1550 - exists $vgbl[0]{$gbl}[0]: value ok 1551 - delete $vgbl[0]{$gbl}[0]: no exception ok 1552 - delete $vgbl[0]{$gbl}[0]: value ok 1553 - $vrlex->[0]{$gbl}[0]: no exception ok 1554 - $vrlex->[0]{$gbl}[0]: value ok 1555 - $vrlex->[0]{$gbl}[0] = 123: no exception ok 1556 - $vrlex->[0]{$gbl}[0] = 123: value ok 1557 - exists $vrlex->[0]{$gbl}[0]: no exception ok 1558 - exists $vrlex->[0]{$gbl}[0]: value ok 1559 - delete $vrlex->[0]{$gbl}[0]: no exception ok 1560 - delete $vrlex->[0]{$gbl}[0]: value ok 1561 - $vrgbl->[0]{$gbl}[0]: no exception ok 1562 - $vrgbl->[0]{$gbl}[0]: value ok 1563 - $vrgbl->[0]{$gbl}[0] = 123: no exception ok 1564 - $vrgbl->[0]{$gbl}[0] = 123: value ok 1565 - exists $vrgbl->[0]{$gbl}[0]: no exception ok 1566 - exists $vrgbl->[0]{$gbl}[0]: value ok 1567 - delete $vrgbl->[0]{$gbl}[0]: no exception ok 1568 - delete $vrgbl->[0]{$gbl}[0]: value ok 1569 - $vlex[$lex]{$gbl}[0]: no exception ok 1570 - $vlex[$lex]{$gbl}[0]: value ok 1571 - $vlex[$lex]{$gbl}[0] = 123: no exception ok 1572 - $vlex[$lex]{$gbl}[0] = 123: value ok 1573 - exists $vlex[$lex]{$gbl}[0]: no exception ok 1574 - exists $vlex[$lex]{$gbl}[0]: value ok 1575 - delete $vlex[$lex]{$gbl}[0]: no exception ok 1576 - delete $vlex[$lex]{$gbl}[0]: value ok 1577 - $vgbl[$lex]{$gbl}[0]: no exception ok 1578 - $vgbl[$lex]{$gbl}[0]: value ok 1579 - $vgbl[$lex]{$gbl}[0] = 123: no exception ok 1580 - $vgbl[$lex]{$gbl}[0] = 123: value ok 1581 - exists $vgbl[$lex]{$gbl}[0]: no exception ok 1582 - exists $vgbl[$lex]{$gbl}[0]: value ok 1583 - delete $vgbl[$lex]{$gbl}[0]: no exception ok 1584 - delete $vgbl[$lex]{$gbl}[0]: value ok 1585 - $vrlex->[$lex]{$gbl}[0]: no exception ok 1586 - $vrlex->[$lex]{$gbl}[0]: value ok 1587 - $vrlex->[$lex]{$gbl}[0] = 123: no exception ok 1588 - $vrlex->[$lex]{$gbl}[0] = 123: value ok 1589 - exists $vrlex->[$lex]{$gbl}[0]: no exception ok 1590 - exists $vrlex->[$lex]{$gbl}[0]: value ok 1591 - delete $vrlex->[$lex]{$gbl}[0]: no exception ok 1592 - delete $vrlex->[$lex]{$gbl}[0]: value ok 1593 - $vrgbl->[$lex]{$gbl}[0]: no exception ok 1594 - $vrgbl->[$lex]{$gbl}[0]: value ok 1595 - $vrgbl->[$lex]{$gbl}[0] = 123: no exception ok 1596 - $vrgbl->[$lex]{$gbl}[0] = 123: value ok 1597 - exists $vrgbl->[$lex]{$gbl}[0]: no exception ok 1598 - exists $vrgbl->[$lex]{$gbl}[0]: value ok 1599 - delete $vrgbl->[$lex]{$gbl}[0]: no exception ok 1600 - delete $vrgbl->[$lex]{$gbl}[0]: value ok 1601 - $vlex[$gbl]{$gbl}[0]: no exception ok 1602 - $vlex[$gbl]{$gbl}[0]: value ok 1603 - $vlex[$gbl]{$gbl}[0] = 123: no exception ok 1604 - $vlex[$gbl]{$gbl}[0] = 123: value ok 1605 - exists $vlex[$gbl]{$gbl}[0]: no exception ok 1606 - exists $vlex[$gbl]{$gbl}[0]: value ok 1607 - delete $vlex[$gbl]{$gbl}[0]: no exception ok 1608 - delete $vlex[$gbl]{$gbl}[0]: value ok 1609 - $vgbl[$gbl]{$gbl}[0]: no exception ok 1610 - $vgbl[$gbl]{$gbl}[0]: value ok 1611 - $vgbl[$gbl]{$gbl}[0] = 123: no exception ok 1612 - $vgbl[$gbl]{$gbl}[0] = 123: value ok 1613 - exists $vgbl[$gbl]{$gbl}[0]: no exception ok 1614 - exists $vgbl[$gbl]{$gbl}[0]: value ok 1615 - delete $vgbl[$gbl]{$gbl}[0]: no exception ok 1616 - delete $vgbl[$gbl]{$gbl}[0]: value ok 1617 - $vrlex->[$gbl]{$gbl}[0]: no exception ok 1618 - $vrlex->[$gbl]{$gbl}[0]: value ok 1619 - $vrlex->[$gbl]{$gbl}[0] = 123: no exception ok 1620 - $vrlex->[$gbl]{$gbl}[0] = 123: value ok 1621 - exists $vrlex->[$gbl]{$gbl}[0]: no exception ok 1622 - exists $vrlex->[$gbl]{$gbl}[0]: value ok 1623 - delete $vrlex->[$gbl]{$gbl}[0]: no exception ok 1624 - delete $vrlex->[$gbl]{$gbl}[0]: value ok 1625 - $vrgbl->[$gbl]{$gbl}[0]: no exception ok 1626 - $vrgbl->[$gbl]{$gbl}[0]: value ok 1627 - $vrgbl->[$gbl]{$gbl}[0] = 123: no exception ok 1628 - $vrgbl->[$gbl]{$gbl}[0] = 123: value ok 1629 - exists $vrgbl->[$gbl]{$gbl}[0]: no exception ok 1630 - exists $vrgbl->[$gbl]{$gbl}[0]: value ok 1631 - delete $vrgbl->[$gbl]{$gbl}[0]: no exception ok 1632 - delete $vrgbl->[$gbl]{$gbl}[0]: value ok 1633 - $vlex[$lex+1]{$gbl}[0]: no exception ok 1634 - $vlex[$lex+1]{$gbl}[0]: value ok 1635 - $vlex[$lex+1]{$gbl}[0] = 123: no exception ok 1636 - $vlex[$lex+1]{$gbl}[0] = 123: value ok 1637 - exists $vlex[$lex+1]{$gbl}[0]: no exception ok 1638 - exists $vlex[$lex+1]{$gbl}[0]: value ok 1639 - delete $vlex[$lex+1]{$gbl}[0]: no exception ok 1640 - delete $vlex[$lex+1]{$gbl}[0]: value ok 1641 - $vgbl[$lex+1]{$gbl}[0]: no exception ok 1642 - $vgbl[$lex+1]{$gbl}[0]: value ok 1643 - $vgbl[$lex+1]{$gbl}[0] = 123: no exception ok 1644 - $vgbl[$lex+1]{$gbl}[0] = 123: value ok 1645 - exists $vgbl[$lex+1]{$gbl}[0]: no exception ok 1646 - exists $vgbl[$lex+1]{$gbl}[0]: value ok 1647 - delete $vgbl[$lex+1]{$gbl}[0]: no exception ok 1648 - delete $vgbl[$lex+1]{$gbl}[0]: value ok 1649 - $vrlex->[$lex+1]{$gbl}[0]: no exception ok 1650 - $vrlex->[$lex+1]{$gbl}[0]: value ok 1651 - $vrlex->[$lex+1]{$gbl}[0] = 123: no exception ok 1652 - $vrlex->[$lex+1]{$gbl}[0] = 123: value ok 1653 - exists $vrlex->[$lex+1]{$gbl}[0]: no exception ok 1654 - exists $vrlex->[$lex+1]{$gbl}[0]: value ok 1655 - delete $vrlex->[$lex+1]{$gbl}[0]: no exception ok 1656 - delete $vrlex->[$lex+1]{$gbl}[0]: value ok 1657 - $vrgbl->[$lex+1]{$gbl}[0]: no exception ok 1658 - $vrgbl->[$lex+1]{$gbl}[0]: value ok 1659 - $vrgbl->[$lex+1]{$gbl}[0] = 123: no exception ok 1660 - $vrgbl->[$lex+1]{$gbl}[0] = 123: value ok 1661 - exists $vrgbl->[$lex+1]{$gbl}[0]: no exception ok 1662 - exists $vrgbl->[$lex+1]{$gbl}[0]: value ok 1663 - delete $vrgbl->[$lex+1]{$gbl}[0]: no exception ok 1664 - delete $vrgbl->[$lex+1]{$gbl}[0]: value ok 1665 - $vlex{foo}{$gbl}[0]: no exception ok 1666 - $vlex{foo}{$gbl}[0]: value ok 1667 - $vlex{foo}{$gbl}[0] = 123: no exception ok 1668 - $vlex{foo}{$gbl}[0] = 123: value ok 1669 - exists $vlex{foo}{$gbl}[0]: no exception ok 1670 - exists $vlex{foo}{$gbl}[0]: value ok 1671 - delete $vlex{foo}{$gbl}[0]: no exception ok 1672 - delete $vlex{foo}{$gbl}[0]: value ok 1673 - $vgbl{foo}{$gbl}[0]: no exception ok 1674 - $vgbl{foo}{$gbl}[0]: value ok 1675 - $vgbl{foo}{$gbl}[0] = 123: no exception ok 1676 - $vgbl{foo}{$gbl}[0] = 123: value ok 1677 - exists $vgbl{foo}{$gbl}[0]: no exception ok 1678 - exists $vgbl{foo}{$gbl}[0]: value ok 1679 - delete $vgbl{foo}{$gbl}[0]: no exception ok 1680 - delete $vgbl{foo}{$gbl}[0]: value ok 1681 - $vrlex->{foo}{$gbl}[0]: no exception ok 1682 - $vrlex->{foo}{$gbl}[0]: value ok 1683 - $vrlex->{foo}{$gbl}[0] = 123: no exception ok 1684 - $vrlex->{foo}{$gbl}[0] = 123: value ok 1685 - exists $vrlex->{foo}{$gbl}[0]: no exception ok 1686 - exists $vrlex->{foo}{$gbl}[0]: value ok 1687 - delete $vrlex->{foo}{$gbl}[0]: no exception ok 1688 - delete $vrlex->{foo}{$gbl}[0]: value ok 1689 - $vrgbl->{foo}{$gbl}[0]: no exception ok 1690 - $vrgbl->{foo}{$gbl}[0]: value ok 1691 - $vrgbl->{foo}{$gbl}[0] = 123: no exception ok 1692 - $vrgbl->{foo}{$gbl}[0] = 123: value ok 1693 - exists $vrgbl->{foo}{$gbl}[0]: no exception ok 1694 - exists $vrgbl->{foo}{$gbl}[0]: value ok 1695 - delete $vrgbl->{foo}{$gbl}[0]: no exception ok 1696 - delete $vrgbl->{foo}{$gbl}[0]: value ok 1697 - $vlex{$lex}{$gbl}[0]: no exception ok 1698 - $vlex{$lex}{$gbl}[0]: value ok 1699 - $vlex{$lex}{$gbl}[0] = 123: no exception ok 1700 - $vlex{$lex}{$gbl}[0] = 123: value ok 1701 - exists $vlex{$lex}{$gbl}[0]: no exception ok 1702 - exists $vlex{$lex}{$gbl}[0]: value ok 1703 - delete $vlex{$lex}{$gbl}[0]: no exception ok 1704 - delete $vlex{$lex}{$gbl}[0]: value ok 1705 - $vgbl{$lex}{$gbl}[0]: no exception ok 1706 - $vgbl{$lex}{$gbl}[0]: value ok 1707 - $vgbl{$lex}{$gbl}[0] = 123: no exception ok 1708 - $vgbl{$lex}{$gbl}[0] = 123: value ok 1709 - exists $vgbl{$lex}{$gbl}[0]: no exception ok 1710 - exists $vgbl{$lex}{$gbl}[0]: value ok 1711 - delete $vgbl{$lex}{$gbl}[0]: no exception ok 1712 - delete $vgbl{$lex}{$gbl}[0]: value ok 1713 - $vrlex->{$lex}{$gbl}[0]: no exception ok 1714 - $vrlex->{$lex}{$gbl}[0]: value ok 1715 - $vrlex->{$lex}{$gbl}[0] = 123: no exception ok 1716 - $vrlex->{$lex}{$gbl}[0] = 123: value ok 1717 - exists $vrlex->{$lex}{$gbl}[0]: no exception ok 1718 - exists $vrlex->{$lex}{$gbl}[0]: value ok 1719 - delete $vrlex->{$lex}{$gbl}[0]: no exception ok 1720 - delete $vrlex->{$lex}{$gbl}[0]: value ok 1721 - $vrgbl->{$lex}{$gbl}[0]: no exception ok 1722 - $vrgbl->{$lex}{$gbl}[0]: value ok 1723 - $vrgbl->{$lex}{$gbl}[0] = 123: no exception ok 1724 - $vrgbl->{$lex}{$gbl}[0] = 123: value ok 1725 - exists $vrgbl->{$lex}{$gbl}[0]: no exception ok 1726 - exists $vrgbl->{$lex}{$gbl}[0]: value ok 1727 - delete $vrgbl->{$lex}{$gbl}[0]: no exception ok 1728 - delete $vrgbl->{$lex}{$gbl}[0]: value ok 1729 - $vlex{$gbl}{$gbl}[0]: no exception ok 1730 - $vlex{$gbl}{$gbl}[0]: value ok 1731 - $vlex{$gbl}{$gbl}[0] = 123: no exception ok 1732 - $vlex{$gbl}{$gbl}[0] = 123: value ok 1733 - exists $vlex{$gbl}{$gbl}[0]: no exception ok 1734 - exists $vlex{$gbl}{$gbl}[0]: value ok 1735 - delete $vlex{$gbl}{$gbl}[0]: no exception ok 1736 - delete $vlex{$gbl}{$gbl}[0]: value ok 1737 - $vgbl{$gbl}{$gbl}[0]: no exception ok 1738 - $vgbl{$gbl}{$gbl}[0]: value ok 1739 - $vgbl{$gbl}{$gbl}[0] = 123: no exception ok 1740 - $vgbl{$gbl}{$gbl}[0] = 123: value ok 1741 - exists $vgbl{$gbl}{$gbl}[0]: no exception ok 1742 - exists $vgbl{$gbl}{$gbl}[0]: value ok 1743 - delete $vgbl{$gbl}{$gbl}[0]: no exception ok 1744 - delete $vgbl{$gbl}{$gbl}[0]: value ok 1745 - $vrlex->{$gbl}{$gbl}[0]: no exception ok 1746 - $vrlex->{$gbl}{$gbl}[0]: value ok 1747 - $vrlex->{$gbl}{$gbl}[0] = 123: no exception ok 1748 - $vrlex->{$gbl}{$gbl}[0] = 123: value ok 1749 - exists $vrlex->{$gbl}{$gbl}[0]: no exception ok 1750 - exists $vrlex->{$gbl}{$gbl}[0]: value ok 1751 - delete $vrlex->{$gbl}{$gbl}[0]: no exception ok 1752 - delete $vrlex->{$gbl}{$gbl}[0]: value ok 1753 - $vrgbl->{$gbl}{$gbl}[0]: no exception ok 1754 - $vrgbl->{$gbl}{$gbl}[0]: value ok 1755 - $vrgbl->{$gbl}{$gbl}[0] = 123: no exception ok 1756 - $vrgbl->{$gbl}{$gbl}[0] = 123: value ok 1757 - exists $vrgbl->{$gbl}{$gbl}[0]: no exception ok 1758 - exists $vrgbl->{$gbl}{$gbl}[0]: value ok 1759 - delete $vrgbl->{$gbl}{$gbl}[0]: no exception ok 1760 - delete $vrgbl->{$gbl}{$gbl}[0]: value ok 1761 - $vlex{"x$lex"}{$gbl}[0]: no exception ok 1762 - $vlex{"x$lex"}{$gbl}[0]: value ok 1763 - $vlex{"x$lex"}{$gbl}[0] = 123: no exception ok 1764 - $vlex{"x$lex"}{$gbl}[0] = 123: value ok 1765 - exists $vlex{"x$lex"}{$gbl}[0]: no exception ok 1766 - exists $vlex{"x$lex"}{$gbl}[0]: value ok 1767 - delete $vlex{"x$lex"}{$gbl}[0]: no exception ok 1768 - delete $vlex{"x$lex"}{$gbl}[0]: value ok 1769 - $vgbl{"x$lex"}{$gbl}[0]: no exception ok 1770 - $vgbl{"x$lex"}{$gbl}[0]: value ok 1771 - $vgbl{"x$lex"}{$gbl}[0] = 123: no exception ok 1772 - $vgbl{"x$lex"}{$gbl}[0] = 123: value ok 1773 - exists $vgbl{"x$lex"}{$gbl}[0]: no exception ok 1774 - exists $vgbl{"x$lex"}{$gbl}[0]: value ok 1775 - delete $vgbl{"x$lex"}{$gbl}[0]: no exception ok 1776 - delete $vgbl{"x$lex"}{$gbl}[0]: value ok 1777 - $vrlex->{"x$lex"}{$gbl}[0]: no exception ok 1778 - $vrlex->{"x$lex"}{$gbl}[0]: value ok 1779 - $vrlex->{"x$lex"}{$gbl}[0] = 123: no exception ok 1780 - $vrlex->{"x$lex"}{$gbl}[0] = 123: value ok 1781 - exists $vrlex->{"x$lex"}{$gbl}[0]: no exception ok 1782 - exists $vrlex->{"x$lex"}{$gbl}[0]: value ok 1783 - delete $vrlex->{"x$lex"}{$gbl}[0]: no exception ok 1784 - delete $vrlex->{"x$lex"}{$gbl}[0]: value ok 1785 - $vrgbl->{"x$lex"}{$gbl}[0]: no exception ok 1786 - $vrgbl->{"x$lex"}{$gbl}[0]: value ok 1787 - $vrgbl->{"x$lex"}{$gbl}[0] = 123: no exception ok 1788 - $vrgbl->{"x$lex"}{$gbl}[0] = 123: value ok 1789 - exists $vrgbl->{"x$lex"}{$gbl}[0]: no exception ok 1790 - exists $vrgbl->{"x$lex"}{$gbl}[0]: value ok 1791 - delete $vrgbl->{"x$lex"}{$gbl}[0]: no exception ok 1792 - delete $vrgbl->{"x$lex"}{$gbl}[0]: value ok 1793 - $vlex[0]{"x$lex"}[0]: no exception ok 1794 - $vlex[0]{"x$lex"}[0]: value ok 1795 - $vlex[0]{"x$lex"}[0] = 123: no exception ok 1796 - $vlex[0]{"x$lex"}[0] = 123: value ok 1797 - exists $vlex[0]{"x$lex"}[0]: no exception ok 1798 - exists $vlex[0]{"x$lex"}[0]: value ok 1799 - delete $vlex[0]{"x$lex"}[0]: no exception ok 1800 - delete $vlex[0]{"x$lex"}[0]: value ok 1801 - $vgbl[0]{"x$lex"}[0]: no exception ok 1802 - $vgbl[0]{"x$lex"}[0]: value ok 1803 - $vgbl[0]{"x$lex"}[0] = 123: no exception ok 1804 - $vgbl[0]{"x$lex"}[0] = 123: value ok 1805 - exists $vgbl[0]{"x$lex"}[0]: no exception ok 1806 - exists $vgbl[0]{"x$lex"}[0]: value ok 1807 - delete $vgbl[0]{"x$lex"}[0]: no exception ok 1808 - delete $vgbl[0]{"x$lex"}[0]: value ok 1809 - $vrlex->[0]{"x$lex"}[0]: no exception ok 1810 - $vrlex->[0]{"x$lex"}[0]: value ok 1811 - $vrlex->[0]{"x$lex"}[0] = 123: no exception ok 1812 - $vrlex->[0]{"x$lex"}[0] = 123: value ok 1813 - exists $vrlex->[0]{"x$lex"}[0]: no exception ok 1814 - exists $vrlex->[0]{"x$lex"}[0]: value ok 1815 - delete $vrlex->[0]{"x$lex"}[0]: no exception ok 1816 - delete $vrlex->[0]{"x$lex"}[0]: value ok 1817 - $vrgbl->[0]{"x$lex"}[0]: no exception ok 1818 - $vrgbl->[0]{"x$lex"}[0]: value ok 1819 - $vrgbl->[0]{"x$lex"}[0] = 123: no exception ok 1820 - $vrgbl->[0]{"x$lex"}[0] = 123: value ok 1821 - exists $vrgbl->[0]{"x$lex"}[0]: no exception ok 1822 - exists $vrgbl->[0]{"x$lex"}[0]: value ok 1823 - delete $vrgbl->[0]{"x$lex"}[0]: no exception ok 1824 - delete $vrgbl->[0]{"x$lex"}[0]: value ok 1825 - $vlex[$lex]{"x$lex"}[0]: no exception ok 1826 - $vlex[$lex]{"x$lex"}[0]: value ok 1827 - $vlex[$lex]{"x$lex"}[0] = 123: no exception ok 1828 - $vlex[$lex]{"x$lex"}[0] = 123: value ok 1829 - exists $vlex[$lex]{"x$lex"}[0]: no exception ok 1830 - exists $vlex[$lex]{"x$lex"}[0]: value ok 1831 - delete $vlex[$lex]{"x$lex"}[0]: no exception ok 1832 - delete $vlex[$lex]{"x$lex"}[0]: value ok 1833 - $vgbl[$lex]{"x$lex"}[0]: no exception ok 1834 - $vgbl[$lex]{"x$lex"}[0]: value ok 1835 - $vgbl[$lex]{"x$lex"}[0] = 123: no exception ok 1836 - $vgbl[$lex]{"x$lex"}[0] = 123: value ok 1837 - exists $vgbl[$lex]{"x$lex"}[0]: no exception ok 1838 - exists $vgbl[$lex]{"x$lex"}[0]: value ok 1839 - delete $vgbl[$lex]{"x$lex"}[0]: no exception ok 1840 - delete $vgbl[$lex]{"x$lex"}[0]: value ok 1841 - $vrlex->[$lex]{"x$lex"}[0]: no exception ok 1842 - $vrlex->[$lex]{"x$lex"}[0]: value ok 1843 - $vrlex->[$lex]{"x$lex"}[0] = 123: no exception ok 1844 - $vrlex->[$lex]{"x$lex"}[0] = 123: value ok 1845 - exists $vrlex->[$lex]{"x$lex"}[0]: no exception ok 1846 - exists $vrlex->[$lex]{"x$lex"}[0]: value ok 1847 - delete $vrlex->[$lex]{"x$lex"}[0]: no exception ok 1848 - delete $vrlex->[$lex]{"x$lex"}[0]: value ok 1849 - $vrgbl->[$lex]{"x$lex"}[0]: no exception ok 1850 - $vrgbl->[$lex]{"x$lex"}[0]: value ok 1851 - $vrgbl->[$lex]{"x$lex"}[0] = 123: no exception ok 1852 - $vrgbl->[$lex]{"x$lex"}[0] = 123: value ok 1853 - exists $vrgbl->[$lex]{"x$lex"}[0]: no exception ok 1854 - exists $vrgbl->[$lex]{"x$lex"}[0]: value ok 1855 - delete $vrgbl->[$lex]{"x$lex"}[0]: no exception ok 1856 - delete $vrgbl->[$lex]{"x$lex"}[0]: value ok 1857 - $vlex[$gbl]{"x$lex"}[0]: no exception ok 1858 - $vlex[$gbl]{"x$lex"}[0]: value ok 1859 - $vlex[$gbl]{"x$lex"}[0] = 123: no exception ok 1860 - $vlex[$gbl]{"x$lex"}[0] = 123: value ok 1861 - exists $vlex[$gbl]{"x$lex"}[0]: no exception ok 1862 - exists $vlex[$gbl]{"x$lex"}[0]: value ok 1863 - delete $vlex[$gbl]{"x$lex"}[0]: no exception ok 1864 - delete $vlex[$gbl]{"x$lex"}[0]: value ok 1865 - $vgbl[$gbl]{"x$lex"}[0]: no exception ok 1866 - $vgbl[$gbl]{"x$lex"}[0]: value ok 1867 - $vgbl[$gbl]{"x$lex"}[0] = 123: no exception ok 1868 - $vgbl[$gbl]{"x$lex"}[0] = 123: value ok 1869 - exists $vgbl[$gbl]{"x$lex"}[0]: no exception ok 1870 - exists $vgbl[$gbl]{"x$lex"}[0]: value ok 1871 - delete $vgbl[$gbl]{"x$lex"}[0]: no exception ok 1872 - delete $vgbl[$gbl]{"x$lex"}[0]: value ok 1873 - $vrlex->[$gbl]{"x$lex"}[0]: no exception ok 1874 - $vrlex->[$gbl]{"x$lex"}[0]: value ok 1875 - $vrlex->[$gbl]{"x$lex"}[0] = 123: no exception ok 1876 - $vrlex->[$gbl]{"x$lex"}[0] = 123: value ok 1877 - exists $vrlex->[$gbl]{"x$lex"}[0]: no exception ok 1878 - exists $vrlex->[$gbl]{"x$lex"}[0]: value ok 1879 - delete $vrlex->[$gbl]{"x$lex"}[0]: no exception ok 1880 - delete $vrlex->[$gbl]{"x$lex"}[0]: value ok 1881 - $vrgbl->[$gbl]{"x$lex"}[0]: no exception ok 1882 - $vrgbl->[$gbl]{"x$lex"}[0]: value ok 1883 - $vrgbl->[$gbl]{"x$lex"}[0] = 123: no exception ok 1884 - $vrgbl->[$gbl]{"x$lex"}[0] = 123: value ok 1885 - exists $vrgbl->[$gbl]{"x$lex"}[0]: no exception ok 1886 - exists $vrgbl->[$gbl]{"x$lex"}[0]: value ok 1887 - delete $vrgbl->[$gbl]{"x$lex"}[0]: no exception ok 1888 - delete $vrgbl->[$gbl]{"x$lex"}[0]: value ok 1889 - $vlex[$lex+1]{"x$lex"}[0]: no exception ok 1890 - $vlex[$lex+1]{"x$lex"}[0]: value ok 1891 - $vlex[$lex+1]{"x$lex"}[0] = 123: no exception ok 1892 - $vlex[$lex+1]{"x$lex"}[0] = 123: value ok 1893 - exists $vlex[$lex+1]{"x$lex"}[0]: no exception ok 1894 - exists $vlex[$lex+1]{"x$lex"}[0]: value ok 1895 - delete $vlex[$lex+1]{"x$lex"}[0]: no exception ok 1896 - delete $vlex[$lex+1]{"x$lex"}[0]: value ok 1897 - $vgbl[$lex+1]{"x$lex"}[0]: no exception ok 1898 - $vgbl[$lex+1]{"x$lex"}[0]: value ok 1899 - $vgbl[$lex+1]{"x$lex"}[0] = 123: no exception ok 1900 - $vgbl[$lex+1]{"x$lex"}[0] = 123: value ok 1901 - exists $vgbl[$lex+1]{"x$lex"}[0]: no exception ok 1902 - exists $vgbl[$lex+1]{"x$lex"}[0]: value ok 1903 - delete $vgbl[$lex+1]{"x$lex"}[0]: no exception ok 1904 - delete $vgbl[$lex+1]{"x$lex"}[0]: value ok 1905 - $vrlex->[$lex+1]{"x$lex"}[0]: no exception ok 1906 - $vrlex->[$lex+1]{"x$lex"}[0]: value ok 1907 - $vrlex->[$lex+1]{"x$lex"}[0] = 123: no exception ok 1908 - $vrlex->[$lex+1]{"x$lex"}[0] = 123: value ok 1909 - exists $vrlex->[$lex+1]{"x$lex"}[0]: no exception ok 1910 - exists $vrlex->[$lex+1]{"x$lex"}[0]: value ok 1911 - delete $vrlex->[$lex+1]{"x$lex"}[0]: no exception ok 1912 - delete $vrlex->[$lex+1]{"x$lex"}[0]: value ok 1913 - $vrgbl->[$lex+1]{"x$lex"}[0]: no exception ok 1914 - $vrgbl->[$lex+1]{"x$lex"}[0]: value ok 1915 - $vrgbl->[$lex+1]{"x$lex"}[0] = 123: no exception ok 1916 - $vrgbl->[$lex+1]{"x$lex"}[0] = 123: value ok 1917 - exists $vrgbl->[$lex+1]{"x$lex"}[0]: no exception ok 1918 - exists $vrgbl->[$lex+1]{"x$lex"}[0]: value ok 1919 - delete $vrgbl->[$lex+1]{"x$lex"}[0]: no exception ok 1920 - delete $vrgbl->[$lex+1]{"x$lex"}[0]: value ok 1921 - $vlex{foo}{"x$lex"}[0]: no exception ok 1922 - $vlex{foo}{"x$lex"}[0]: value ok 1923 - $vlex{foo}{"x$lex"}[0] = 123: no exception ok 1924 - $vlex{foo}{"x$lex"}[0] = 123: value ok 1925 - exists $vlex{foo}{"x$lex"}[0]: no exception ok 1926 - exists $vlex{foo}{"x$lex"}[0]: value ok 1927 - delete $vlex{foo}{"x$lex"}[0]: no exception ok 1928 - delete $vlex{foo}{"x$lex"}[0]: value ok 1929 - $vgbl{foo}{"x$lex"}[0]: no exception ok 1930 - $vgbl{foo}{"x$lex"}[0]: value ok 1931 - $vgbl{foo}{"x$lex"}[0] = 123: no exception ok 1932 - $vgbl{foo}{"x$lex"}[0] = 123: value ok 1933 - exists $vgbl{foo}{"x$lex"}[0]: no exception ok 1934 - exists $vgbl{foo}{"x$lex"}[0]: value ok 1935 - delete $vgbl{foo}{"x$lex"}[0]: no exception ok 1936 - delete $vgbl{foo}{"x$lex"}[0]: value ok 1937 - $vrlex->{foo}{"x$lex"}[0]: no exception ok 1938 - $vrlex->{foo}{"x$lex"}[0]: value ok 1939 - $vrlex->{foo}{"x$lex"}[0] = 123: no exception ok 1940 - $vrlex->{foo}{"x$lex"}[0] = 123: value ok 1941 - exists $vrlex->{foo}{"x$lex"}[0]: no exception ok 1942 - exists $vrlex->{foo}{"x$lex"}[0]: value ok 1943 - delete $vrlex->{foo}{"x$lex"}[0]: no exception ok 1944 - delete $vrlex->{foo}{"x$lex"}[0]: value ok 1945 - $vrgbl->{foo}{"x$lex"}[0]: no exception ok 1946 - $vrgbl->{foo}{"x$lex"}[0]: value ok 1947 - $vrgbl->{foo}{"x$lex"}[0] = 123: no exception ok 1948 - $vrgbl->{foo}{"x$lex"}[0] = 123: value ok 1949 - exists $vrgbl->{foo}{"x$lex"}[0]: no exception ok 1950 - exists $vrgbl->{foo}{"x$lex"}[0]: value ok 1951 - delete $vrgbl->{foo}{"x$lex"}[0]: no exception ok 1952 - delete $vrgbl->{foo}{"x$lex"}[0]: value ok 1953 - $vlex{$lex}{"x$lex"}[0]: no exception ok 1954 - $vlex{$lex}{"x$lex"}[0]: value ok 1955 - $vlex{$lex}{"x$lex"}[0] = 123: no exception ok 1956 - $vlex{$lex}{"x$lex"}[0] = 123: value ok 1957 - exists $vlex{$lex}{"x$lex"}[0]: no exception ok 1958 - exists $vlex{$lex}{"x$lex"}[0]: value ok 1959 - delete $vlex{$lex}{"x$lex"}[0]: no exception ok 1960 - delete $vlex{$lex}{"x$lex"}[0]: value ok 1961 - $vgbl{$lex}{"x$lex"}[0]: no exception ok 1962 - $vgbl{$lex}{"x$lex"}[0]: value ok 1963 - $vgbl{$lex}{"x$lex"}[0] = 123: no exception ok 1964 - $vgbl{$lex}{"x$lex"}[0] = 123: value ok 1965 - exists $vgbl{$lex}{"x$lex"}[0]: no exception ok 1966 - exists $vgbl{$lex}{"x$lex"}[0]: value ok 1967 - delete $vgbl{$lex}{"x$lex"}[0]: no exception ok 1968 - delete $vgbl{$lex}{"x$lex"}[0]: value ok 1969 - $vrlex->{$lex}{"x$lex"}[0]: no exception ok 1970 - $vrlex->{$lex}{"x$lex"}[0]: value ok 1971 - $vrlex->{$lex}{"x$lex"}[0] = 123: no exception ok 1972 - $vrlex->{$lex}{"x$lex"}[0] = 123: value ok 1973 - exists $vrlex->{$lex}{"x$lex"}[0]: no exception ok 1974 - exists $vrlex->{$lex}{"x$lex"}[0]: value ok 1975 - delete $vrlex->{$lex}{"x$lex"}[0]: no exception ok 1976 - delete $vrlex->{$lex}{"x$lex"}[0]: value ok 1977 - $vrgbl->{$lex}{"x$lex"}[0]: no exception ok 1978 - $vrgbl->{$lex}{"x$lex"}[0]: value ok 1979 - $vrgbl->{$lex}{"x$lex"}[0] = 123: no exception ok 1980 - $vrgbl->{$lex}{"x$lex"}[0] = 123: value ok 1981 - exists $vrgbl->{$lex}{"x$lex"}[0]: no exception ok 1982 - exists $vrgbl->{$lex}{"x$lex"}[0]: value ok 1983 - delete $vrgbl->{$lex}{"x$lex"}[0]: no exception ok 1984 - delete $vrgbl->{$lex}{"x$lex"}[0]: value ok 1985 - $vlex{$gbl}{"x$lex"}[0]: no exception ok 1986 - $vlex{$gbl}{"x$lex"}[0]: value ok 1987 - $vlex{$gbl}{"x$lex"}[0] = 123: no exception ok 1988 - $vlex{$gbl}{"x$lex"}[0] = 123: value ok 1989 - exists $vlex{$gbl}{"x$lex"}[0]: no exception ok 1990 - exists $vlex{$gbl}{"x$lex"}[0]: value ok 1991 - delete $vlex{$gbl}{"x$lex"}[0]: no exception ok 1992 - delete $vlex{$gbl}{"x$lex"}[0]: value ok 1993 - $vgbl{$gbl}{"x$lex"}[0]: no exception ok 1994 - $vgbl{$gbl}{"x$lex"}[0]: value ok 1995 - $vgbl{$gbl}{"x$lex"}[0] = 123: no exception ok 1996 - $vgbl{$gbl}{"x$lex"}[0] = 123: value ok 1997 - exists $vgbl{$gbl}{"x$lex"}[0]: no exception ok 1998 - exists $vgbl{$gbl}{"x$lex"}[0]: value ok 1999 - delete $vgbl{$gbl}{"x$lex"}[0]: no exception ok 2000 - delete $vgbl{$gbl}{"x$lex"}[0]: value ok 2001 - $vrlex->{$gbl}{"x$lex"}[0]: no exception ok 2002 - $vrlex->{$gbl}{"x$lex"}[0]: value ok 2003 - $vrlex->{$gbl}{"x$lex"}[0] = 123: no exception ok 2004 - $vrlex->{$gbl}{"x$lex"}[0] = 123: value ok 2005 - exists $vrlex->{$gbl}{"x$lex"}[0]: no exception ok 2006 - exists $vrlex->{$gbl}{"x$lex"}[0]: value ok 2007 - delete $vrlex->{$gbl}{"x$lex"}[0]: no exception ok 2008 - delete $vrlex->{$gbl}{"x$lex"}[0]: value ok 2009 - $vrgbl->{$gbl}{"x$lex"}[0]: no exception ok 2010 - $vrgbl->{$gbl}{"x$lex"}[0]: value ok 2011 - $vrgbl->{$gbl}{"x$lex"}[0] = 123: no exception ok 2012 - $vrgbl->{$gbl}{"x$lex"}[0] = 123: value ok 2013 - exists $vrgbl->{$gbl}{"x$lex"}[0]: no exception ok 2014 - exists $vrgbl->{$gbl}{"x$lex"}[0]: value ok 2015 - delete $vrgbl->{$gbl}{"x$lex"}[0]: no exception ok 2016 - delete $vrgbl->{$gbl}{"x$lex"}[0]: value ok 2017 - $vlex{"x$lex"}{"x$lex"}[0]: no exception ok 2018 - $vlex{"x$lex"}{"x$lex"}[0]: value ok 2019 - $vlex{"x$lex"}{"x$lex"}[0] = 123: no exception ok 2020 - $vlex{"x$lex"}{"x$lex"}[0] = 123: value ok 2021 - exists $vlex{"x$lex"}{"x$lex"}[0]: no exception ok 2022 - exists $vlex{"x$lex"}{"x$lex"}[0]: value ok 2023 - delete $vlex{"x$lex"}{"x$lex"}[0]: no exception ok 2024 - delete $vlex{"x$lex"}{"x$lex"}[0]: value ok 2025 - $vgbl{"x$lex"}{"x$lex"}[0]: no exception ok 2026 - $vgbl{"x$lex"}{"x$lex"}[0]: value ok 2027 - $vgbl{"x$lex"}{"x$lex"}[0] = 123: no exception ok 2028 - $vgbl{"x$lex"}{"x$lex"}[0] = 123: value ok 2029 - exists $vgbl{"x$lex"}{"x$lex"}[0]: no exception ok 2030 - exists $vgbl{"x$lex"}{"x$lex"}[0]: value ok 2031 - delete $vgbl{"x$lex"}{"x$lex"}[0]: no exception ok 2032 - delete $vgbl{"x$lex"}{"x$lex"}[0]: value ok 2033 - $vrlex->{"x$lex"}{"x$lex"}[0]: no exception ok 2034 - $vrlex->{"x$lex"}{"x$lex"}[0]: value ok 2035 - $vrlex->{"x$lex"}{"x$lex"}[0] = 123: no exception ok 2036 - $vrlex->{"x$lex"}{"x$lex"}[0] = 123: value ok 2037 - exists $vrlex->{"x$lex"}{"x$lex"}[0]: no exception ok 2038 - exists $vrlex->{"x$lex"}{"x$lex"}[0]: value ok 2039 - delete $vrlex->{"x$lex"}{"x$lex"}[0]: no exception ok 2040 - delete $vrlex->{"x$lex"}{"x$lex"}[0]: value ok 2041 - $vrgbl->{"x$lex"}{"x$lex"}[0]: no exception ok 2042 - $vrgbl->{"x$lex"}{"x$lex"}[0]: value ok 2043 - $vrgbl->{"x$lex"}{"x$lex"}[0] = 123: no exception ok 2044 - $vrgbl->{"x$lex"}{"x$lex"}[0] = 123: value ok 2045 - exists $vrgbl->{"x$lex"}{"x$lex"}[0]: no exception ok 2046 - exists $vrgbl->{"x$lex"}{"x$lex"}[0]: value ok 2047 - delete $vrgbl->{"x$lex"}{"x$lex"}[0]: no exception ok 2048 - delete $vrgbl->{"x$lex"}{"x$lex"}[0]: value ok 2049 - $vlex[0][0][$lex]: no exception ok 2050 - $vlex[0][0][$lex]: value ok 2051 - $vlex[0][0][$lex] = 123: no exception ok 2052 - $vlex[0][0][$lex] = 123: value ok 2053 - exists $vlex[0][0][$lex]: no exception ok 2054 - exists $vlex[0][0][$lex]: value ok 2055 - delete $vlex[0][0][$lex]: no exception ok 2056 - delete $vlex[0][0][$lex]: value ok 2057 - $vgbl[0][0][$lex]: no exception ok 2058 - $vgbl[0][0][$lex]: value ok 2059 - $vgbl[0][0][$lex] = 123: no exception ok 2060 - $vgbl[0][0][$lex] = 123: value ok 2061 - exists $vgbl[0][0][$lex]: no exception ok 2062 - exists $vgbl[0][0][$lex]: value ok 2063 - delete $vgbl[0][0][$lex]: no exception ok 2064 - delete $vgbl[0][0][$lex]: value ok 2065 - $vrlex->[0][0][$lex]: no exception ok 2066 - $vrlex->[0][0][$lex]: value ok 2067 - $vrlex->[0][0][$lex] = 123: no exception ok 2068 - $vrlex->[0][0][$lex] = 123: value ok 2069 - exists $vrlex->[0][0][$lex]: no exception ok 2070 - exists $vrlex->[0][0][$lex]: value ok 2071 - delete $vrlex->[0][0][$lex]: no exception ok 2072 - delete $vrlex->[0][0][$lex]: value ok 2073 - $vrgbl->[0][0][$lex]: no exception ok 2074 - $vrgbl->[0][0][$lex]: value ok 2075 - $vrgbl->[0][0][$lex] = 123: no exception ok 2076 - $vrgbl->[0][0][$lex] = 123: value ok 2077 - exists $vrgbl->[0][0][$lex]: no exception ok 2078 - exists $vrgbl->[0][0][$lex]: value ok 2079 - delete $vrgbl->[0][0][$lex]: no exception ok 2080 - delete $vrgbl->[0][0][$lex]: value ok 2081 - $vlex[$lex][0][$lex]: no exception ok 2082 - $vlex[$lex][0][$lex]: value ok 2083 - $vlex[$lex][0][$lex] = 123: no exception ok 2084 - $vlex[$lex][0][$lex] = 123: value ok 2085 - exists $vlex[$lex][0][$lex]: no exception ok 2086 - exists $vlex[$lex][0][$lex]: value ok 2087 - delete $vlex[$lex][0][$lex]: no exception ok 2088 - delete $vlex[$lex][0][$lex]: value ok 2089 - $vgbl[$lex][0][$lex]: no exception ok 2090 - $vgbl[$lex][0][$lex]: value ok 2091 - $vgbl[$lex][0][$lex] = 123: no exception ok 2092 - $vgbl[$lex][0][$lex] = 123: value ok 2093 - exists $vgbl[$lex][0][$lex]: no exception ok 2094 - exists $vgbl[$lex][0][$lex]: value ok 2095 - delete $vgbl[$lex][0][$lex]: no exception ok 2096 - delete $vgbl[$lex][0][$lex]: value ok 2097 - $vrlex->[$lex][0][$lex]: no exception ok 2098 - $vrlex->[$lex][0][$lex]: value ok 2099 - $vrlex->[$lex][0][$lex] = 123: no exception ok 2100 - $vrlex->[$lex][0][$lex] = 123: value ok 2101 - exists $vrlex->[$lex][0][$lex]: no exception ok 2102 - exists $vrlex->[$lex][0][$lex]: value ok 2103 - delete $vrlex->[$lex][0][$lex]: no exception ok 2104 - delete $vrlex->[$lex][0][$lex]: value ok 2105 - $vrgbl->[$lex][0][$lex]: no exception ok 2106 - $vrgbl->[$lex][0][$lex]: value ok 2107 - $vrgbl->[$lex][0][$lex] = 123: no exception ok 2108 - $vrgbl->[$lex][0][$lex] = 123: value ok 2109 - exists $vrgbl->[$lex][0][$lex]: no exception ok 2110 - exists $vrgbl->[$lex][0][$lex]: value ok 2111 - delete $vrgbl->[$lex][0][$lex]: no exception ok 2112 - delete $vrgbl->[$lex][0][$lex]: value ok 2113 - $vlex[$gbl][0][$lex]: no exception ok 2114 - $vlex[$gbl][0][$lex]: value ok 2115 - $vlex[$gbl][0][$lex] = 123: no exception ok 2116 - $vlex[$gbl][0][$lex] = 123: value ok 2117 - exists $vlex[$gbl][0][$lex]: no exception ok 2118 - exists $vlex[$gbl][0][$lex]: value ok 2119 - delete $vlex[$gbl][0][$lex]: no exception ok 2120 - delete $vlex[$gbl][0][$lex]: value ok 2121 - $vgbl[$gbl][0][$lex]: no exception ok 2122 - $vgbl[$gbl][0][$lex]: value ok 2123 - $vgbl[$gbl][0][$lex] = 123: no exception ok 2124 - $vgbl[$gbl][0][$lex] = 123: value ok 2125 - exists $vgbl[$gbl][0][$lex]: no exception ok 2126 - exists $vgbl[$gbl][0][$lex]: value ok 2127 - delete $vgbl[$gbl][0][$lex]: no exception ok 2128 - delete $vgbl[$gbl][0][$lex]: value ok 2129 - $vrlex->[$gbl][0][$lex]: no exception ok 2130 - $vrlex->[$gbl][0][$lex]: value ok 2131 - $vrlex->[$gbl][0][$lex] = 123: no exception ok 2132 - $vrlex->[$gbl][0][$lex] = 123: value ok 2133 - exists $vrlex->[$gbl][0][$lex]: no exception ok 2134 - exists $vrlex->[$gbl][0][$lex]: value ok 2135 - delete $vrlex->[$gbl][0][$lex]: no exception ok 2136 - delete $vrlex->[$gbl][0][$lex]: value ok 2137 - $vrgbl->[$gbl][0][$lex]: no exception ok 2138 - $vrgbl->[$gbl][0][$lex]: value ok 2139 - $vrgbl->[$gbl][0][$lex] = 123: no exception ok 2140 - $vrgbl->[$gbl][0][$lex] = 123: value ok 2141 - exists $vrgbl->[$gbl][0][$lex]: no exception ok 2142 - exists $vrgbl->[$gbl][0][$lex]: value ok 2143 - delete $vrgbl->[$gbl][0][$lex]: no exception ok 2144 - delete $vrgbl->[$gbl][0][$lex]: value ok 2145 - $vlex[$lex+1][0][$lex]: no exception ok 2146 - $vlex[$lex+1][0][$lex]: value ok 2147 - $vlex[$lex+1][0][$lex] = 123: no exception ok 2148 - $vlex[$lex+1][0][$lex] = 123: value ok 2149 - exists $vlex[$lex+1][0][$lex]: no exception ok 2150 - exists $vlex[$lex+1][0][$lex]: value ok 2151 - delete $vlex[$lex+1][0][$lex]: no exception ok 2152 - delete $vlex[$lex+1][0][$lex]: value ok 2153 - $vgbl[$lex+1][0][$lex]: no exception ok 2154 - $vgbl[$lex+1][0][$lex]: value ok 2155 - $vgbl[$lex+1][0][$lex] = 123: no exception ok 2156 - $vgbl[$lex+1][0][$lex] = 123: value ok 2157 - exists $vgbl[$lex+1][0][$lex]: no exception ok 2158 - exists $vgbl[$lex+1][0][$lex]: value ok 2159 - delete $vgbl[$lex+1][0][$lex]: no exception ok 2160 - delete $vgbl[$lex+1][0][$lex]: value ok 2161 - $vrlex->[$lex+1][0][$lex]: no exception ok 2162 - $vrlex->[$lex+1][0][$lex]: value ok 2163 - $vrlex->[$lex+1][0][$lex] = 123: no exception ok 2164 - $vrlex->[$lex+1][0][$lex] = 123: value ok 2165 - exists $vrlex->[$lex+1][0][$lex]: no exception ok 2166 - exists $vrlex->[$lex+1][0][$lex]: value ok 2167 - delete $vrlex->[$lex+1][0][$lex]: no exception ok 2168 - delete $vrlex->[$lex+1][0][$lex]: value ok 2169 - $vrgbl->[$lex+1][0][$lex]: no exception ok 2170 - $vrgbl->[$lex+1][0][$lex]: value ok 2171 - $vrgbl->[$lex+1][0][$lex] = 123: no exception ok 2172 - $vrgbl->[$lex+1][0][$lex] = 123: value ok 2173 - exists $vrgbl->[$lex+1][0][$lex]: no exception ok 2174 - exists $vrgbl->[$lex+1][0][$lex]: value ok 2175 - delete $vrgbl->[$lex+1][0][$lex]: no exception ok 2176 - delete $vrgbl->[$lex+1][0][$lex]: value ok 2177 - $vlex{foo}[0][$lex]: no exception ok 2178 - $vlex{foo}[0][$lex]: value ok 2179 - $vlex{foo}[0][$lex] = 123: no exception ok 2180 - $vlex{foo}[0][$lex] = 123: value ok 2181 - exists $vlex{foo}[0][$lex]: no exception ok 2182 - exists $vlex{foo}[0][$lex]: value ok 2183 - delete $vlex{foo}[0][$lex]: no exception ok 2184 - delete $vlex{foo}[0][$lex]: value ok 2185 - $vgbl{foo}[0][$lex]: no exception ok 2186 - $vgbl{foo}[0][$lex]: value ok 2187 - $vgbl{foo}[0][$lex] = 123: no exception ok 2188 - $vgbl{foo}[0][$lex] = 123: value ok 2189 - exists $vgbl{foo}[0][$lex]: no exception ok 2190 - exists $vgbl{foo}[0][$lex]: value ok 2191 - delete $vgbl{foo}[0][$lex]: no exception ok 2192 - delete $vgbl{foo}[0][$lex]: value ok 2193 - $vrlex->{foo}[0][$lex]: no exception ok 2194 - $vrlex->{foo}[0][$lex]: value ok 2195 - $vrlex->{foo}[0][$lex] = 123: no exception ok 2196 - $vrlex->{foo}[0][$lex] = 123: value ok 2197 - exists $vrlex->{foo}[0][$lex]: no exception ok 2198 - exists $vrlex->{foo}[0][$lex]: value ok 2199 - delete $vrlex->{foo}[0][$lex]: no exception ok 2200 - delete $vrlex->{foo}[0][$lex]: value ok 2201 - $vrgbl->{foo}[0][$lex]: no exception ok 2202 - $vrgbl->{foo}[0][$lex]: value ok 2203 - $vrgbl->{foo}[0][$lex] = 123: no exception ok 2204 - $vrgbl->{foo}[0][$lex] = 123: value ok 2205 - exists $vrgbl->{foo}[0][$lex]: no exception ok 2206 - exists $vrgbl->{foo}[0][$lex]: value ok 2207 - delete $vrgbl->{foo}[0][$lex]: no exception ok 2208 - delete $vrgbl->{foo}[0][$lex]: value ok 2209 - $vlex{$lex}[0][$lex]: no exception ok 2210 - $vlex{$lex}[0][$lex]: value ok 2211 - $vlex{$lex}[0][$lex] = 123: no exception ok 2212 - $vlex{$lex}[0][$lex] = 123: value ok 2213 - exists $vlex{$lex}[0][$lex]: no exception ok 2214 - exists $vlex{$lex}[0][$lex]: value ok 2215 - delete $vlex{$lex}[0][$lex]: no exception ok 2216 - delete $vlex{$lex}[0][$lex]: value ok 2217 - $vgbl{$lex}[0][$lex]: no exception ok 2218 - $vgbl{$lex}[0][$lex]: value ok 2219 - $vgbl{$lex}[0][$lex] = 123: no exception ok 2220 - $vgbl{$lex}[0][$lex] = 123: value ok 2221 - exists $vgbl{$lex}[0][$lex]: no exception ok 2222 - exists $vgbl{$lex}[0][$lex]: value ok 2223 - delete $vgbl{$lex}[0][$lex]: no exception ok 2224 - delete $vgbl{$lex}[0][$lex]: value ok 2225 - $vrlex->{$lex}[0][$lex]: no exception ok 2226 - $vrlex->{$lex}[0][$lex]: value ok 2227 - $vrlex->{$lex}[0][$lex] = 123: no exception ok 2228 - $vrlex->{$lex}[0][$lex] = 123: value ok 2229 - exists $vrlex->{$lex}[0][$lex]: no exception ok 2230 - exists $vrlex->{$lex}[0][$lex]: value ok 2231 - delete $vrlex->{$lex}[0][$lex]: no exception ok 2232 - delete $vrlex->{$lex}[0][$lex]: value ok 2233 - $vrgbl->{$lex}[0][$lex]: no exception ok 2234 - $vrgbl->{$lex}[0][$lex]: value ok 2235 - $vrgbl->{$lex}[0][$lex] = 123: no exception ok 2236 - $vrgbl->{$lex}[0][$lex] = 123: value ok 2237 - exists $vrgbl->{$lex}[0][$lex]: no exception ok 2238 - exists $vrgbl->{$lex}[0][$lex]: value ok 2239 - delete $vrgbl->{$lex}[0][$lex]: no exception ok 2240 - delete $vrgbl->{$lex}[0][$lex]: value ok 2241 - $vlex{$gbl}[0][$lex]: no exception ok 2242 - $vlex{$gbl}[0][$lex]: value ok 2243 - $vlex{$gbl}[0][$lex] = 123: no exception ok 2244 - $vlex{$gbl}[0][$lex] = 123: value ok 2245 - exists $vlex{$gbl}[0][$lex]: no exception ok 2246 - exists $vlex{$gbl}[0][$lex]: value ok 2247 - delete $vlex{$gbl}[0][$lex]: no exception ok 2248 - delete $vlex{$gbl}[0][$lex]: value ok 2249 - $vgbl{$gbl}[0][$lex]: no exception ok 2250 - $vgbl{$gbl}[0][$lex]: value ok 2251 - $vgbl{$gbl}[0][$lex] = 123: no exception ok 2252 - $vgbl{$gbl}[0][$lex] = 123: value ok 2253 - exists $vgbl{$gbl}[0][$lex]: no exception ok 2254 - exists $vgbl{$gbl}[0][$lex]: value ok 2255 - delete $vgbl{$gbl}[0][$lex]: no exception ok 2256 - delete $vgbl{$gbl}[0][$lex]: value ok 2257 - $vrlex->{$gbl}[0][$lex]: no exception ok 2258 - $vrlex->{$gbl}[0][$lex]: value ok 2259 - $vrlex->{$gbl}[0][$lex] = 123: no exception ok 2260 - $vrlex->{$gbl}[0][$lex] = 123: value ok 2261 - exists $vrlex->{$gbl}[0][$lex]: no exception ok 2262 - exists $vrlex->{$gbl}[0][$lex]: value ok 2263 - delete $vrlex->{$gbl}[0][$lex]: no exception ok 2264 - delete $vrlex->{$gbl}[0][$lex]: value ok 2265 - $vrgbl->{$gbl}[0][$lex]: no exception ok 2266 - $vrgbl->{$gbl}[0][$lex]: value ok 2267 - $vrgbl->{$gbl}[0][$lex] = 123: no exception ok 2268 - $vrgbl->{$gbl}[0][$lex] = 123: value ok 2269 - exists $vrgbl->{$gbl}[0][$lex]: no exception ok 2270 - exists $vrgbl->{$gbl}[0][$lex]: value ok 2271 - delete $vrgbl->{$gbl}[0][$lex]: no exception ok 2272 - delete $vrgbl->{$gbl}[0][$lex]: value ok 2273 - $vlex{"x$lex"}[0][$lex]: no exception ok 2274 - $vlex{"x$lex"}[0][$lex]: value ok 2275 - $vlex{"x$lex"}[0][$lex] = 123: no exception ok 2276 - $vlex{"x$lex"}[0][$lex] = 123: value ok 2277 - exists $vlex{"x$lex"}[0][$lex]: no exception ok 2278 - exists $vlex{"x$lex"}[0][$lex]: value ok 2279 - delete $vlex{"x$lex"}[0][$lex]: no exception ok 2280 - delete $vlex{"x$lex"}[0][$lex]: value ok 2281 - $vgbl{"x$lex"}[0][$lex]: no exception ok 2282 - $vgbl{"x$lex"}[0][$lex]: value ok 2283 - $vgbl{"x$lex"}[0][$lex] = 123: no exception ok 2284 - $vgbl{"x$lex"}[0][$lex] = 123: value ok 2285 - exists $vgbl{"x$lex"}[0][$lex]: no exception ok 2286 - exists $vgbl{"x$lex"}[0][$lex]: value ok 2287 - delete $vgbl{"x$lex"}[0][$lex]: no exception ok 2288 - delete $vgbl{"x$lex"}[0][$lex]: value ok 2289 - $vrlex->{"x$lex"}[0][$lex]: no exception ok 2290 - $vrlex->{"x$lex"}[0][$lex]: value ok 2291 - $vrlex->{"x$lex"}[0][$lex] = 123: no exception ok 2292 - $vrlex->{"x$lex"}[0][$lex] = 123: value ok 2293 - exists $vrlex->{"x$lex"}[0][$lex]: no exception ok 2294 - exists $vrlex->{"x$lex"}[0][$lex]: value ok 2295 - delete $vrlex->{"x$lex"}[0][$lex]: no exception ok 2296 - delete $vrlex->{"x$lex"}[0][$lex]: value ok 2297 - $vrgbl->{"x$lex"}[0][$lex]: no exception ok 2298 - $vrgbl->{"x$lex"}[0][$lex]: value ok 2299 - $vrgbl->{"x$lex"}[0][$lex] = 123: no exception ok 2300 - $vrgbl->{"x$lex"}[0][$lex] = 123: value ok 2301 - exists $vrgbl->{"x$lex"}[0][$lex]: no exception ok 2302 - exists $vrgbl->{"x$lex"}[0][$lex]: value ok 2303 - delete $vrgbl->{"x$lex"}[0][$lex]: no exception ok 2304 - delete $vrgbl->{"x$lex"}[0][$lex]: value ok 2305 - $vlex[0][$lex][$lex]: no exception ok 2306 - $vlex[0][$lex][$lex]: value ok 2307 - $vlex[0][$lex][$lex] = 123: no exception ok 2308 - $vlex[0][$lex][$lex] = 123: value ok 2309 - exists $vlex[0][$lex][$lex]: no exception ok 2310 - exists $vlex[0][$lex][$lex]: value ok 2311 - delete $vlex[0][$lex][$lex]: no exception ok 2312 - delete $vlex[0][$lex][$lex]: value ok 2313 - $vgbl[0][$lex][$lex]: no exception ok 2314 - $vgbl[0][$lex][$lex]: value ok 2315 - $vgbl[0][$lex][$lex] = 123: no exception ok 2316 - $vgbl[0][$lex][$lex] = 123: value ok 2317 - exists $vgbl[0][$lex][$lex]: no exception ok 2318 - exists $vgbl[0][$lex][$lex]: value ok 2319 - delete $vgbl[0][$lex][$lex]: no exception ok 2320 - delete $vgbl[0][$lex][$lex]: value ok 2321 - $vrlex->[0][$lex][$lex]: no exception ok 2322 - $vrlex->[0][$lex][$lex]: value ok 2323 - $vrlex->[0][$lex][$lex] = 123: no exception ok 2324 - $vrlex->[0][$lex][$lex] = 123: value ok 2325 - exists $vrlex->[0][$lex][$lex]: no exception ok 2326 - exists $vrlex->[0][$lex][$lex]: value ok 2327 - delete $vrlex->[0][$lex][$lex]: no exception ok 2328 - delete $vrlex->[0][$lex][$lex]: value ok 2329 - $vrgbl->[0][$lex][$lex]: no exception ok 2330 - $vrgbl->[0][$lex][$lex]: value ok 2331 - $vrgbl->[0][$lex][$lex] = 123: no exception ok 2332 - $vrgbl->[0][$lex][$lex] = 123: value ok 2333 - exists $vrgbl->[0][$lex][$lex]: no exception ok 2334 - exists $vrgbl->[0][$lex][$lex]: value ok 2335 - delete $vrgbl->[0][$lex][$lex]: no exception ok 2336 - delete $vrgbl->[0][$lex][$lex]: value ok 2337 - $vlex[$lex][$lex][$lex]: no exception ok 2338 - $vlex[$lex][$lex][$lex]: value ok 2339 - $vlex[$lex][$lex][$lex] = 123: no exception ok 2340 - $vlex[$lex][$lex][$lex] = 123: value ok 2341 - exists $vlex[$lex][$lex][$lex]: no exception ok 2342 - exists $vlex[$lex][$lex][$lex]: value ok 2343 - delete $vlex[$lex][$lex][$lex]: no exception ok 2344 - delete $vlex[$lex][$lex][$lex]: value ok 2345 - $vgbl[$lex][$lex][$lex]: no exception ok 2346 - $vgbl[$lex][$lex][$lex]: value ok 2347 - $vgbl[$lex][$lex][$lex] = 123: no exception ok 2348 - $vgbl[$lex][$lex][$lex] = 123: value ok 2349 - exists $vgbl[$lex][$lex][$lex]: no exception ok 2350 - exists $vgbl[$lex][$lex][$lex]: value ok 2351 - delete $vgbl[$lex][$lex][$lex]: no exception ok 2352 - delete $vgbl[$lex][$lex][$lex]: value ok 2353 - $vrlex->[$lex][$lex][$lex]: no exception ok 2354 - $vrlex->[$lex][$lex][$lex]: value ok 2355 - $vrlex->[$lex][$lex][$lex] = 123: no exception ok 2356 - $vrlex->[$lex][$lex][$lex] = 123: value ok 2357 - exists $vrlex->[$lex][$lex][$lex]: no exception ok 2358 - exists $vrlex->[$lex][$lex][$lex]: value ok 2359 - delete $vrlex->[$lex][$lex][$lex]: no exception ok 2360 - delete $vrlex->[$lex][$lex][$lex]: value ok 2361 - $vrgbl->[$lex][$lex][$lex]: no exception ok 2362 - $vrgbl->[$lex][$lex][$lex]: value ok 2363 - $vrgbl->[$lex][$lex][$lex] = 123: no exception ok 2364 - $vrgbl->[$lex][$lex][$lex] = 123: value ok 2365 - exists $vrgbl->[$lex][$lex][$lex]: no exception ok 2366 - exists $vrgbl->[$lex][$lex][$lex]: value ok 2367 - delete $vrgbl->[$lex][$lex][$lex]: no exception ok 2368 - delete $vrgbl->[$lex][$lex][$lex]: value ok 2369 - $vlex[$gbl][$lex][$lex]: no exception ok 2370 - $vlex[$gbl][$lex][$lex]: value ok 2371 - $vlex[$gbl][$lex][$lex] = 123: no exception ok 2372 - $vlex[$gbl][$lex][$lex] = 123: value ok 2373 - exists $vlex[$gbl][$lex][$lex]: no exception ok 2374 - exists $vlex[$gbl][$lex][$lex]: value ok 2375 - delete $vlex[$gbl][$lex][$lex]: no exception ok 2376 - delete $vlex[$gbl][$lex][$lex]: value ok 2377 - $vgbl[$gbl][$lex][$lex]: no exception ok 2378 - $vgbl[$gbl][$lex][$lex]: value ok 2379 - $vgbl[$gbl][$lex][$lex] = 123: no exception ok 2380 - $vgbl[$gbl][$lex][$lex] = 123: value ok 2381 - exists $vgbl[$gbl][$lex][$lex]: no exception ok 2382 - exists $vgbl[$gbl][$lex][$lex]: value ok 2383 - delete $vgbl[$gbl][$lex][$lex]: no exception ok 2384 - delete $vgbl[$gbl][$lex][$lex]: value ok 2385 - $vrlex->[$gbl][$lex][$lex]: no exception ok 2386 - $vrlex->[$gbl][$lex][$lex]: value ok 2387 - $vrlex->[$gbl][$lex][$lex] = 123: no exception ok 2388 - $vrlex->[$gbl][$lex][$lex] = 123: value ok 2389 - exists $vrlex->[$gbl][$lex][$lex]: no exception ok 2390 - exists $vrlex->[$gbl][$lex][$lex]: value ok 2391 - delete $vrlex->[$gbl][$lex][$lex]: no exception ok 2392 - delete $vrlex->[$gbl][$lex][$lex]: value ok 2393 - $vrgbl->[$gbl][$lex][$lex]: no exception ok 2394 - $vrgbl->[$gbl][$lex][$lex]: value ok 2395 - $vrgbl->[$gbl][$lex][$lex] = 123: no exception ok 2396 - $vrgbl->[$gbl][$lex][$lex] = 123: value ok 2397 - exists $vrgbl->[$gbl][$lex][$lex]: no exception ok 2398 - exists $vrgbl->[$gbl][$lex][$lex]: value ok 2399 - delete $vrgbl->[$gbl][$lex][$lex]: no exception ok 2400 - delete $vrgbl->[$gbl][$lex][$lex]: value ok 2401 - $vlex[$lex+1][$lex][$lex]: no exception ok 2402 - $vlex[$lex+1][$lex][$lex]: value ok 2403 - $vlex[$lex+1][$lex][$lex] = 123: no exception ok 2404 - $vlex[$lex+1][$lex][$lex] = 123: value ok 2405 - exists $vlex[$lex+1][$lex][$lex]: no exception ok 2406 - exists $vlex[$lex+1][$lex][$lex]: value ok 2407 - delete $vlex[$lex+1][$lex][$lex]: no exception ok 2408 - delete $vlex[$lex+1][$lex][$lex]: value ok 2409 - $vgbl[$lex+1][$lex][$lex]: no exception ok 2410 - $vgbl[$lex+1][$lex][$lex]: value ok 2411 - $vgbl[$lex+1][$lex][$lex] = 123: no exception ok 2412 - $vgbl[$lex+1][$lex][$lex] = 123: value ok 2413 - exists $vgbl[$lex+1][$lex][$lex]: no exception ok 2414 - exists $vgbl[$lex+1][$lex][$lex]: value ok 2415 - delete $vgbl[$lex+1][$lex][$lex]: no exception ok 2416 - delete $vgbl[$lex+1][$lex][$lex]: value ok 2417 - $vrlex->[$lex+1][$lex][$lex]: no exception ok 2418 - $vrlex->[$lex+1][$lex][$lex]: value ok 2419 - $vrlex->[$lex+1][$lex][$lex] = 123: no exception ok 2420 - $vrlex->[$lex+1][$lex][$lex] = 123: value ok 2421 - exists $vrlex->[$lex+1][$lex][$lex]: no exception ok 2422 - exists $vrlex->[$lex+1][$lex][$lex]: value ok 2423 - delete $vrlex->[$lex+1][$lex][$lex]: no exception ok 2424 - delete $vrlex->[$lex+1][$lex][$lex]: value ok 2425 - $vrgbl->[$lex+1][$lex][$lex]: no exception ok 2426 - $vrgbl->[$lex+1][$lex][$lex]: value ok 2427 - $vrgbl->[$lex+1][$lex][$lex] = 123: no exception ok 2428 - $vrgbl->[$lex+1][$lex][$lex] = 123: value ok 2429 - exists $vrgbl->[$lex+1][$lex][$lex]: no exception ok 2430 - exists $vrgbl->[$lex+1][$lex][$lex]: value ok 2431 - delete $vrgbl->[$lex+1][$lex][$lex]: no exception ok 2432 - delete $vrgbl->[$lex+1][$lex][$lex]: value ok 2433 - $vlex{foo}[$lex][$lex]: no exception ok 2434 - $vlex{foo}[$lex][$lex]: value ok 2435 - $vlex{foo}[$lex][$lex] = 123: no exception ok 2436 - $vlex{foo}[$lex][$lex] = 123: value ok 2437 - exists $vlex{foo}[$lex][$lex]: no exception ok 2438 - exists $vlex{foo}[$lex][$lex]: value ok 2439 - delete $vlex{foo}[$lex][$lex]: no exception ok 2440 - delete $vlex{foo}[$lex][$lex]: value ok 2441 - $vgbl{foo}[$lex][$lex]: no exception ok 2442 - $vgbl{foo}[$lex][$lex]: value ok 2443 - $vgbl{foo}[$lex][$lex] = 123: no exception ok 2444 - $vgbl{foo}[$lex][$lex] = 123: value ok 2445 - exists $vgbl{foo}[$lex][$lex]: no exception ok 2446 - exists $vgbl{foo}[$lex][$lex]: value ok 2447 - delete $vgbl{foo}[$lex][$lex]: no exception ok 2448 - delete $vgbl{foo}[$lex][$lex]: value ok 2449 - $vrlex->{foo}[$lex][$lex]: no exception ok 2450 - $vrlex->{foo}[$lex][$lex]: value ok 2451 - $vrlex->{foo}[$lex][$lex] = 123: no exception ok 2452 - $vrlex->{foo}[$lex][$lex] = 123: value ok 2453 - exists $vrlex->{foo}[$lex][$lex]: no exception ok 2454 - exists $vrlex->{foo}[$lex][$lex]: value ok 2455 - delete $vrlex->{foo}[$lex][$lex]: no exception ok 2456 - delete $vrlex->{foo}[$lex][$lex]: value ok 2457 - $vrgbl->{foo}[$lex][$lex]: no exception ok 2458 - $vrgbl->{foo}[$lex][$lex]: value ok 2459 - $vrgbl->{foo}[$lex][$lex] = 123: no exception ok 2460 - $vrgbl->{foo}[$lex][$lex] = 123: value ok 2461 - exists $vrgbl->{foo}[$lex][$lex]: no exception ok 2462 - exists $vrgbl->{foo}[$lex][$lex]: value ok 2463 - delete $vrgbl->{foo}[$lex][$lex]: no exception ok 2464 - delete $vrgbl->{foo}[$lex][$lex]: value ok 2465 - $vlex{$lex}[$lex][$lex]: no exception ok 2466 - $vlex{$lex}[$lex][$lex]: value ok 2467 - $vlex{$lex}[$lex][$lex] = 123: no exception ok 2468 - $vlex{$lex}[$lex][$lex] = 123: value ok 2469 - exists $vlex{$lex}[$lex][$lex]: no exception ok 2470 - exists $vlex{$lex}[$lex][$lex]: value ok 2471 - delete $vlex{$lex}[$lex][$lex]: no exception ok 2472 - delete $vlex{$lex}[$lex][$lex]: value ok 2473 - $vgbl{$lex}[$lex][$lex]: no exception ok 2474 - $vgbl{$lex}[$lex][$lex]: value ok 2475 - $vgbl{$lex}[$lex][$lex] = 123: no exception ok 2476 - $vgbl{$lex}[$lex][$lex] = 123: value ok 2477 - exists $vgbl{$lex}[$lex][$lex]: no exception ok 2478 - exists $vgbl{$lex}[$lex][$lex]: value ok 2479 - delete $vgbl{$lex}[$lex][$lex]: no exception ok 2480 - delete $vgbl{$lex}[$lex][$lex]: value ok 2481 - $vrlex->{$lex}[$lex][$lex]: no exception ok 2482 - $vrlex->{$lex}[$lex][$lex]: value ok 2483 - $vrlex->{$lex}[$lex][$lex] = 123: no exception ok 2484 - $vrlex->{$lex}[$lex][$lex] = 123: value ok 2485 - exists $vrlex->{$lex}[$lex][$lex]: no exception ok 2486 - exists $vrlex->{$lex}[$lex][$lex]: value ok 2487 - delete $vrlex->{$lex}[$lex][$lex]: no exception ok 2488 - delete $vrlex->{$lex}[$lex][$lex]: value ok 2489 - $vrgbl->{$lex}[$lex][$lex]: no exception ok 2490 - $vrgbl->{$lex}[$lex][$lex]: value ok 2491 - $vrgbl->{$lex}[$lex][$lex] = 123: no exception ok 2492 - $vrgbl->{$lex}[$lex][$lex] = 123: value ok 2493 - exists $vrgbl->{$lex}[$lex][$lex]: no exception ok 2494 - exists $vrgbl->{$lex}[$lex][$lex]: value ok 2495 - delete $vrgbl->{$lex}[$lex][$lex]: no exception ok 2496 - delete $vrgbl->{$lex}[$lex][$lex]: value ok 2497 - $vlex{$gbl}[$lex][$lex]: no exception ok 2498 - $vlex{$gbl}[$lex][$lex]: value ok 2499 - $vlex{$gbl}[$lex][$lex] = 123: no exception ok 2500 - $vlex{$gbl}[$lex][$lex] = 123: value ok 2501 - exists $vlex{$gbl}[$lex][$lex]: no exception ok 2502 - exists $vlex{$gbl}[$lex][$lex]: value ok 2503 - delete $vlex{$gbl}[$lex][$lex]: no exception ok 2504 - delete $vlex{$gbl}[$lex][$lex]: value ok 2505 - $vgbl{$gbl}[$lex][$lex]: no exception ok 2506 - $vgbl{$gbl}[$lex][$lex]: value ok 2507 - $vgbl{$gbl}[$lex][$lex] = 123: no exception ok 2508 - $vgbl{$gbl}[$lex][$lex] = 123: value ok 2509 - exists $vgbl{$gbl}[$lex][$lex]: no exception ok 2510 - exists $vgbl{$gbl}[$lex][$lex]: value ok 2511 - delete $vgbl{$gbl}[$lex][$lex]: no exception ok 2512 - delete $vgbl{$gbl}[$lex][$lex]: value ok 2513 - $vrlex->{$gbl}[$lex][$lex]: no exception ok 2514 - $vrlex->{$gbl}[$lex][$lex]: value ok 2515 - $vrlex->{$gbl}[$lex][$lex] = 123: no exception ok 2516 - $vrlex->{$gbl}[$lex][$lex] = 123: value ok 2517 - exists $vrlex->{$gbl}[$lex][$lex]: no exception ok 2518 - exists $vrlex->{$gbl}[$lex][$lex]: value ok 2519 - delete $vrlex->{$gbl}[$lex][$lex]: no exception ok 2520 - delete $vrlex->{$gbl}[$lex][$lex]: value ok 2521 - $vrgbl->{$gbl}[$lex][$lex]: no exception ok 2522 - $vrgbl->{$gbl}[$lex][$lex]: value ok 2523 - $vrgbl->{$gbl}[$lex][$lex] = 123: no exception ok 2524 - $vrgbl->{$gbl}[$lex][$lex] = 123: value ok 2525 - exists $vrgbl->{$gbl}[$lex][$lex]: no exception ok 2526 - exists $vrgbl->{$gbl}[$lex][$lex]: value ok 2527 - delete $vrgbl->{$gbl}[$lex][$lex]: no exception ok 2528 - delete $vrgbl->{$gbl}[$lex][$lex]: value ok 2529 - $vlex{"x$lex"}[$lex][$lex]: no exception ok 2530 - $vlex{"x$lex"}[$lex][$lex]: value ok 2531 - $vlex{"x$lex"}[$lex][$lex] = 123: no exception ok 2532 - $vlex{"x$lex"}[$lex][$lex] = 123: value ok 2533 - exists $vlex{"x$lex"}[$lex][$lex]: no exception ok 2534 - exists $vlex{"x$lex"}[$lex][$lex]: value ok 2535 - delete $vlex{"x$lex"}[$lex][$lex]: no exception ok 2536 - delete $vlex{"x$lex"}[$lex][$lex]: value ok 2537 - $vgbl{"x$lex"}[$lex][$lex]: no exception ok 2538 - $vgbl{"x$lex"}[$lex][$lex]: value ok 2539 - $vgbl{"x$lex"}[$lex][$lex] = 123: no exception ok 2540 - $vgbl{"x$lex"}[$lex][$lex] = 123: value ok 2541 - exists $vgbl{"x$lex"}[$lex][$lex]: no exception ok 2542 - exists $vgbl{"x$lex"}[$lex][$lex]: value ok 2543 - delete $vgbl{"x$lex"}[$lex][$lex]: no exception ok 2544 - delete $vgbl{"x$lex"}[$lex][$lex]: value ok 2545 - $vrlex->{"x$lex"}[$lex][$lex]: no exception ok 2546 - $vrlex->{"x$lex"}[$lex][$lex]: value ok 2547 - $vrlex->{"x$lex"}[$lex][$lex] = 123: no exception ok 2548 - $vrlex->{"x$lex"}[$lex][$lex] = 123: value ok 2549 - exists $vrlex->{"x$lex"}[$lex][$lex]: no exception ok 2550 - exists $vrlex->{"x$lex"}[$lex][$lex]: value ok 2551 - delete $vrlex->{"x$lex"}[$lex][$lex]: no exception ok 2552 - delete $vrlex->{"x$lex"}[$lex][$lex]: value ok 2553 - $vrgbl->{"x$lex"}[$lex][$lex]: no exception ok 2554 - $vrgbl->{"x$lex"}[$lex][$lex]: value ok 2555 - $vrgbl->{"x$lex"}[$lex][$lex] = 123: no exception ok 2556 - $vrgbl->{"x$lex"}[$lex][$lex] = 123: value ok 2557 - exists $vrgbl->{"x$lex"}[$lex][$lex]: no exception ok 2558 - exists $vrgbl->{"x$lex"}[$lex][$lex]: value ok 2559 - delete $vrgbl->{"x$lex"}[$lex][$lex]: no exception ok 2560 - delete $vrgbl->{"x$lex"}[$lex][$lex]: value ok 2561 - $vlex[0][$gbl][$lex]: no exception ok 2562 - $vlex[0][$gbl][$lex]: value ok 2563 - $vlex[0][$gbl][$lex] = 123: no exception ok 2564 - $vlex[0][$gbl][$lex] = 123: value ok 2565 - exists $vlex[0][$gbl][$lex]: no exception ok 2566 - exists $vlex[0][$gbl][$lex]: value ok 2567 - delete $vlex[0][$gbl][$lex]: no exception ok 2568 - delete $vlex[0][$gbl][$lex]: value ok 2569 - $vgbl[0][$gbl][$lex]: no exception ok 2570 - $vgbl[0][$gbl][$lex]: value ok 2571 - $vgbl[0][$gbl][$lex] = 123: no exception ok 2572 - $vgbl[0][$gbl][$lex] = 123: value ok 2573 - exists $vgbl[0][$gbl][$lex]: no exception ok 2574 - exists $vgbl[0][$gbl][$lex]: value ok 2575 - delete $vgbl[0][$gbl][$lex]: no exception ok 2576 - delete $vgbl[0][$gbl][$lex]: value ok 2577 - $vrlex->[0][$gbl][$lex]: no exception ok 2578 - $vrlex->[0][$gbl][$lex]: value ok 2579 - $vrlex->[0][$gbl][$lex] = 123: no exception ok 2580 - $vrlex->[0][$gbl][$lex] = 123: value ok 2581 - exists $vrlex->[0][$gbl][$lex]: no exception ok 2582 - exists $vrlex->[0][$gbl][$lex]: value ok 2583 - delete $vrlex->[0][$gbl][$lex]: no exception ok 2584 - delete $vrlex->[0][$gbl][$lex]: value ok 2585 - $vrgbl->[0][$gbl][$lex]: no exception ok 2586 - $vrgbl->[0][$gbl][$lex]: value ok 2587 - $vrgbl->[0][$gbl][$lex] = 123: no exception ok 2588 - $vrgbl->[0][$gbl][$lex] = 123: value ok 2589 - exists $vrgbl->[0][$gbl][$lex]: no exception ok 2590 - exists $vrgbl->[0][$gbl][$lex]: value ok 2591 - delete $vrgbl->[0][$gbl][$lex]: no exception ok 2592 - delete $vrgbl->[0][$gbl][$lex]: value ok 2593 - $vlex[$lex][$gbl][$lex]: no exception ok 2594 - $vlex[$lex][$gbl][$lex]: value ok 2595 - $vlex[$lex][$gbl][$lex] = 123: no exception ok 2596 - $vlex[$lex][$gbl][$lex] = 123: value ok 2597 - exists $vlex[$lex][$gbl][$lex]: no exception ok 2598 - exists $vlex[$lex][$gbl][$lex]: value ok 2599 - delete $vlex[$lex][$gbl][$lex]: no exception ok 2600 - delete $vlex[$lex][$gbl][$lex]: value ok 2601 - $vgbl[$lex][$gbl][$lex]: no exception ok 2602 - $vgbl[$lex][$gbl][$lex]: value ok 2603 - $vgbl[$lex][$gbl][$lex] = 123: no exception ok 2604 - $vgbl[$lex][$gbl][$lex] = 123: value ok 2605 - exists $vgbl[$lex][$gbl][$lex]: no exception ok 2606 - exists $vgbl[$lex][$gbl][$lex]: value ok 2607 - delete $vgbl[$lex][$gbl][$lex]: no exception ok 2608 - delete $vgbl[$lex][$gbl][$lex]: value ok 2609 - $vrlex->[$lex][$gbl][$lex]: no exception ok 2610 - $vrlex->[$lex][$gbl][$lex]: value ok 2611 - $vrlex->[$lex][$gbl][$lex] = 123: no exception ok 2612 - $vrlex->[$lex][$gbl][$lex] = 123: value ok 2613 - exists $vrlex->[$lex][$gbl][$lex]: no exception ok 2614 - exists $vrlex->[$lex][$gbl][$lex]: value ok 2615 - delete $vrlex->[$lex][$gbl][$lex]: no exception ok 2616 - delete $vrlex->[$lex][$gbl][$lex]: value ok 2617 - $vrgbl->[$lex][$gbl][$lex]: no exception ok 2618 - $vrgbl->[$lex][$gbl][$lex]: value ok 2619 - $vrgbl->[$lex][$gbl][$lex] = 123: no exception ok 2620 - $vrgbl->[$lex][$gbl][$lex] = 123: value ok 2621 - exists $vrgbl->[$lex][$gbl][$lex]: no exception ok 2622 - exists $vrgbl->[$lex][$gbl][$lex]: value ok 2623 - delete $vrgbl->[$lex][$gbl][$lex]: no exception ok 2624 - delete $vrgbl->[$lex][$gbl][$lex]: value ok 2625 - $vlex[$gbl][$gbl][$lex]: no exception ok 2626 - $vlex[$gbl][$gbl][$lex]: value ok 2627 - $vlex[$gbl][$gbl][$lex] = 123: no exception ok 2628 - $vlex[$gbl][$gbl][$lex] = 123: value ok 2629 - exists $vlex[$gbl][$gbl][$lex]: no exception ok 2630 - exists $vlex[$gbl][$gbl][$lex]: value ok 2631 - delete $vlex[$gbl][$gbl][$lex]: no exception ok 2632 - delete $vlex[$gbl][$gbl][$lex]: value ok 2633 - $vgbl[$gbl][$gbl][$lex]: no exception ok 2634 - $vgbl[$gbl][$gbl][$lex]: value ok 2635 - $vgbl[$gbl][$gbl][$lex] = 123: no exception ok 2636 - $vgbl[$gbl][$gbl][$lex] = 123: value ok 2637 - exists $vgbl[$gbl][$gbl][$lex]: no exception ok 2638 - exists $vgbl[$gbl][$gbl][$lex]: value ok 2639 - delete $vgbl[$gbl][$gbl][$lex]: no exception ok 2640 - delete $vgbl[$gbl][$gbl][$lex]: value ok 2641 - $vrlex->[$gbl][$gbl][$lex]: no exception ok 2642 - $vrlex->[$gbl][$gbl][$lex]: value ok 2643 - $vrlex->[$gbl][$gbl][$lex] = 123: no exception ok 2644 - $vrlex->[$gbl][$gbl][$lex] = 123: value ok 2645 - exists $vrlex->[$gbl][$gbl][$lex]: no exception ok 2646 - exists $vrlex->[$gbl][$gbl][$lex]: value ok 2647 - delete $vrlex->[$gbl][$gbl][$lex]: no exception ok 2648 - delete $vrlex->[$gbl][$gbl][$lex]: value ok 2649 - $vrgbl->[$gbl][$gbl][$lex]: no exception ok 2650 - $vrgbl->[$gbl][$gbl][$lex]: value ok 2651 - $vrgbl->[$gbl][$gbl][$lex] = 123: no exception ok 2652 - $vrgbl->[$gbl][$gbl][$lex] = 123: value ok 2653 - exists $vrgbl->[$gbl][$gbl][$lex]: no exception ok 2654 - exists $vrgbl->[$gbl][$gbl][$lex]: value ok 2655 - delete $vrgbl->[$gbl][$gbl][$lex]: no exception ok 2656 - delete $vrgbl->[$gbl][$gbl][$lex]: value ok 2657 - $vlex[$lex+1][$gbl][$lex]: no exception ok 2658 - $vlex[$lex+1][$gbl][$lex]: value ok 2659 - $vlex[$lex+1][$gbl][$lex] = 123: no exception ok 2660 - $vlex[$lex+1][$gbl][$lex] = 123: value ok 2661 - exists $vlex[$lex+1][$gbl][$lex]: no exception ok 2662 - exists $vlex[$lex+1][$gbl][$lex]: value ok 2663 - delete $vlex[$lex+1][$gbl][$lex]: no exception ok 2664 - delete $vlex[$lex+1][$gbl][$lex]: value ok 2665 - $vgbl[$lex+1][$gbl][$lex]: no exception ok 2666 - $vgbl[$lex+1][$gbl][$lex]: value ok 2667 - $vgbl[$lex+1][$gbl][$lex] = 123: no exception ok 2668 - $vgbl[$lex+1][$gbl][$lex] = 123: value ok 2669 - exists $vgbl[$lex+1][$gbl][$lex]: no exception ok 2670 - exists $vgbl[$lex+1][$gbl][$lex]: value ok 2671 - delete $vgbl[$lex+1][$gbl][$lex]: no exception ok 2672 - delete $vgbl[$lex+1][$gbl][$lex]: value ok 2673 - $vrlex->[$lex+1][$gbl][$lex]: no exception ok 2674 - $vrlex->[$lex+1][$gbl][$lex]: value ok 2675 - $vrlex->[$lex+1][$gbl][$lex] = 123: no exception ok 2676 - $vrlex->[$lex+1][$gbl][$lex] = 123: value ok 2677 - exists $vrlex->[$lex+1][$gbl][$lex]: no exception ok 2678 - exists $vrlex->[$lex+1][$gbl][$lex]: value ok 2679 - delete $vrlex->[$lex+1][$gbl][$lex]: no exception ok 2680 - delete $vrlex->[$lex+1][$gbl][$lex]: value ok 2681 - $vrgbl->[$lex+1][$gbl][$lex]: no exception ok 2682 - $vrgbl->[$lex+1][$gbl][$lex]: value ok 2683 - $vrgbl->[$lex+1][$gbl][$lex] = 123: no exception ok 2684 - $vrgbl->[$lex+1][$gbl][$lex] = 123: value ok 2685 - exists $vrgbl->[$lex+1][$gbl][$lex]: no exception ok 2686 - exists $vrgbl->[$lex+1][$gbl][$lex]: value ok 2687 - delete $vrgbl->[$lex+1][$gbl][$lex]: no exception ok 2688 - delete $vrgbl->[$lex+1][$gbl][$lex]: value ok 2689 - $vlex{foo}[$gbl][$lex]: no exception ok 2690 - $vlex{foo}[$gbl][$lex]: value ok 2691 - $vlex{foo}[$gbl][$lex] = 123: no exception ok 2692 - $vlex{foo}[$gbl][$lex] = 123: value ok 2693 - exists $vlex{foo}[$gbl][$lex]: no exception ok 2694 - exists $vlex{foo}[$gbl][$lex]: value ok 2695 - delete $vlex{foo}[$gbl][$lex]: no exception ok 2696 - delete $vlex{foo}[$gbl][$lex]: value ok 2697 - $vgbl{foo}[$gbl][$lex]: no exception ok 2698 - $vgbl{foo}[$gbl][$lex]: value ok 2699 - $vgbl{foo}[$gbl][$lex] = 123: no exception ok 2700 - $vgbl{foo}[$gbl][$lex] = 123: value ok 2701 - exists $vgbl{foo}[$gbl][$lex]: no exception ok 2702 - exists $vgbl{foo}[$gbl][$lex]: value ok 2703 - delete $vgbl{foo}[$gbl][$lex]: no exception ok 2704 - delete $vgbl{foo}[$gbl][$lex]: value ok 2705 - $vrlex->{foo}[$gbl][$lex]: no exception ok 2706 - $vrlex->{foo}[$gbl][$lex]: value ok 2707 - $vrlex->{foo}[$gbl][$lex] = 123: no exception ok 2708 - $vrlex->{foo}[$gbl][$lex] = 123: value ok 2709 - exists $vrlex->{foo}[$gbl][$lex]: no exception ok 2710 - exists $vrlex->{foo}[$gbl][$lex]: value ok 2711 - delete $vrlex->{foo}[$gbl][$lex]: no exception ok 2712 - delete $vrlex->{foo}[$gbl][$lex]: value ok 2713 - $vrgbl->{foo}[$gbl][$lex]: no exception ok 2714 - $vrgbl->{foo}[$gbl][$lex]: value ok 2715 - $vrgbl->{foo}[$gbl][$lex] = 123: no exception ok 2716 - $vrgbl->{foo}[$gbl][$lex] = 123: value ok 2717 - exists $vrgbl->{foo}[$gbl][$lex]: no exception ok 2718 - exists $vrgbl->{foo}[$gbl][$lex]: value ok 2719 - delete $vrgbl->{foo}[$gbl][$lex]: no exception ok 2720 - delete $vrgbl->{foo}[$gbl][$lex]: value ok 2721 - $vlex{$lex}[$gbl][$lex]: no exception ok 2722 - $vlex{$lex}[$gbl][$lex]: value ok 2723 - $vlex{$lex}[$gbl][$lex] = 123: no exception ok 2724 - $vlex{$lex}[$gbl][$lex] = 123: value ok 2725 - exists $vlex{$lex}[$gbl][$lex]: no exception ok 2726 - exists $vlex{$lex}[$gbl][$lex]: value ok 2727 - delete $vlex{$lex}[$gbl][$lex]: no exception ok 2728 - delete $vlex{$lex}[$gbl][$lex]: value ok 2729 - $vgbl{$lex}[$gbl][$lex]: no exception ok 2730 - $vgbl{$lex}[$gbl][$lex]: value ok 2731 - $vgbl{$lex}[$gbl][$lex] = 123: no exception ok 2732 - $vgbl{$lex}[$gbl][$lex] = 123: value ok 2733 - exists $vgbl{$lex}[$gbl][$lex]: no exception ok 2734 - exists $vgbl{$lex}[$gbl][$lex]: value ok 2735 - delete $vgbl{$lex}[$gbl][$lex]: no exception ok 2736 - delete $vgbl{$lex}[$gbl][$lex]: value ok 2737 - $vrlex->{$lex}[$gbl][$lex]: no exception ok 2738 - $vrlex->{$lex}[$gbl][$lex]: value ok 2739 - $vrlex->{$lex}[$gbl][$lex] = 123: no exception ok 2740 - $vrlex->{$lex}[$gbl][$lex] = 123: value ok 2741 - exists $vrlex->{$lex}[$gbl][$lex]: no exception ok 2742 - exists $vrlex->{$lex}[$gbl][$lex]: value ok 2743 - delete $vrlex->{$lex}[$gbl][$lex]: no exception ok 2744 - delete $vrlex->{$lex}[$gbl][$lex]: value ok 2745 - $vrgbl->{$lex}[$gbl][$lex]: no exception ok 2746 - $vrgbl->{$lex}[$gbl][$lex]: value ok 2747 - $vrgbl->{$lex}[$gbl][$lex] = 123: no exception ok 2748 - $vrgbl->{$lex}[$gbl][$lex] = 123: value ok 2749 - exists $vrgbl->{$lex}[$gbl][$lex]: no exception ok 2750 - exists $vrgbl->{$lex}[$gbl][$lex]: value ok 2751 - delete $vrgbl->{$lex}[$gbl][$lex]: no exception ok 2752 - delete $vrgbl->{$lex}[$gbl][$lex]: value ok 2753 - $vlex{$gbl}[$gbl][$lex]: no exception ok 2754 - $vlex{$gbl}[$gbl][$lex]: value ok 2755 - $vlex{$gbl}[$gbl][$lex] = 123: no exception ok 2756 - $vlex{$gbl}[$gbl][$lex] = 123: value ok 2757 - exists $vlex{$gbl}[$gbl][$lex]: no exception ok 2758 - exists $vlex{$gbl}[$gbl][$lex]: value ok 2759 - delete $vlex{$gbl}[$gbl][$lex]: no exception ok 2760 - delete $vlex{$gbl}[$gbl][$lex]: value ok 2761 - $vgbl{$gbl}[$gbl][$lex]: no exception ok 2762 - $vgbl{$gbl}[$gbl][$lex]: value ok 2763 - $vgbl{$gbl}[$gbl][$lex] = 123: no exception ok 2764 - $vgbl{$gbl}[$gbl][$lex] = 123: value ok 2765 - exists $vgbl{$gbl}[$gbl][$lex]: no exception ok 2766 - exists $vgbl{$gbl}[$gbl][$lex]: value ok 2767 - delete $vgbl{$gbl}[$gbl][$lex]: no exception ok 2768 - delete $vgbl{$gbl}[$gbl][$lex]: value ok 2769 - $vrlex->{$gbl}[$gbl][$lex]: no exception ok 2770 - $vrlex->{$gbl}[$gbl][$lex]: value ok 2771 - $vrlex->{$gbl}[$gbl][$lex] = 123: no exception ok 2772 - $vrlex->{$gbl}[$gbl][$lex] = 123: value ok 2773 - exists $vrlex->{$gbl}[$gbl][$lex]: no exception ok 2774 - exists $vrlex->{$gbl}[$gbl][$lex]: value ok 2775 - delete $vrlex->{$gbl}[$gbl][$lex]: no exception ok 2776 - delete $vrlex->{$gbl}[$gbl][$lex]: value ok 2777 - $vrgbl->{$gbl}[$gbl][$lex]: no exception ok 2778 - $vrgbl->{$gbl}[$gbl][$lex]: value ok 2779 - $vrgbl->{$gbl}[$gbl][$lex] = 123: no exception ok 2780 - $vrgbl->{$gbl}[$gbl][$lex] = 123: value ok 2781 - exists $vrgbl->{$gbl}[$gbl][$lex]: no exception ok 2782 - exists $vrgbl->{$gbl}[$gbl][$lex]: value ok 2783 - delete $vrgbl->{$gbl}[$gbl][$lex]: no exception ok 2784 - delete $vrgbl->{$gbl}[$gbl][$lex]: value ok 2785 - $vlex{"x$lex"}[$gbl][$lex]: no exception ok 2786 - $vlex{"x$lex"}[$gbl][$lex]: value ok 2787 - $vlex{"x$lex"}[$gbl][$lex] = 123: no exception ok 2788 - $vlex{"x$lex"}[$gbl][$lex] = 123: value ok 2789 - exists $vlex{"x$lex"}[$gbl][$lex]: no exception ok 2790 - exists $vlex{"x$lex"}[$gbl][$lex]: value ok 2791 - delete $vlex{"x$lex"}[$gbl][$lex]: no exception ok 2792 - delete $vlex{"x$lex"}[$gbl][$lex]: value ok 2793 - $vgbl{"x$lex"}[$gbl][$lex]: no exception ok 2794 - $vgbl{"x$lex"}[$gbl][$lex]: value ok 2795 - $vgbl{"x$lex"}[$gbl][$lex] = 123: no exception ok 2796 - $vgbl{"x$lex"}[$gbl][$lex] = 123: value ok 2797 - exists $vgbl{"x$lex"}[$gbl][$lex]: no exception ok 2798 - exists $vgbl{"x$lex"}[$gbl][$lex]: value ok 2799 - delete $vgbl{"x$lex"}[$gbl][$lex]: no exception ok 2800 - delete $vgbl{"x$lex"}[$gbl][$lex]: value ok 2801 - $vrlex->{"x$lex"}[$gbl][$lex]: no exception ok 2802 - $vrlex->{"x$lex"}[$gbl][$lex]: value ok 2803 - $vrlex->{"x$lex"}[$gbl][$lex] = 123: no exception ok 2804 - $vrlex->{"x$lex"}[$gbl][$lex] = 123: value ok 2805 - exists $vrlex->{"x$lex"}[$gbl][$lex]: no exception ok 2806 - exists $vrlex->{"x$lex"}[$gbl][$lex]: value ok 2807 - delete $vrlex->{"x$lex"}[$gbl][$lex]: no exception ok 2808 - delete $vrlex->{"x$lex"}[$gbl][$lex]: value ok 2809 - $vrgbl->{"x$lex"}[$gbl][$lex]: no exception ok 2810 - $vrgbl->{"x$lex"}[$gbl][$lex]: value ok 2811 - $vrgbl->{"x$lex"}[$gbl][$lex] = 123: no exception ok 2812 - $vrgbl->{"x$lex"}[$gbl][$lex] = 123: value ok 2813 - exists $vrgbl->{"x$lex"}[$gbl][$lex]: no exception ok 2814 - exists $vrgbl->{"x$lex"}[$gbl][$lex]: value ok 2815 - delete $vrgbl->{"x$lex"}[$gbl][$lex]: no exception ok 2816 - delete $vrgbl->{"x$lex"}[$gbl][$lex]: value ok 2817 - $vlex[0][$lex+1][$lex]: no exception ok 2818 - $vlex[0][$lex+1][$lex]: value ok 2819 - $vlex[0][$lex+1][$lex] = 123: no exception ok 2820 - $vlex[0][$lex+1][$lex] = 123: value ok 2821 - exists $vlex[0][$lex+1][$lex]: no exception ok 2822 - exists $vlex[0][$lex+1][$lex]: value ok 2823 - delete $vlex[0][$lex+1][$lex]: no exception ok 2824 - delete $vlex[0][$lex+1][$lex]: value ok 2825 - $vgbl[0][$lex+1][$lex]: no exception ok 2826 - $vgbl[0][$lex+1][$lex]: value ok 2827 - $vgbl[0][$lex+1][$lex] = 123: no exception ok 2828 - $vgbl[0][$lex+1][$lex] = 123: value ok 2829 - exists $vgbl[0][$lex+1][$lex]: no exception ok 2830 - exists $vgbl[0][$lex+1][$lex]: value ok 2831 - delete $vgbl[0][$lex+1][$lex]: no exception ok 2832 - delete $vgbl[0][$lex+1][$lex]: value ok 2833 - $vrlex->[0][$lex+1][$lex]: no exception ok 2834 - $vrlex->[0][$lex+1][$lex]: value ok 2835 - $vrlex->[0][$lex+1][$lex] = 123: no exception ok 2836 - $vrlex->[0][$lex+1][$lex] = 123: value ok 2837 - exists $vrlex->[0][$lex+1][$lex]: no exception ok 2838 - exists $vrlex->[0][$lex+1][$lex]: value ok 2839 - delete $vrlex->[0][$lex+1][$lex]: no exception ok 2840 - delete $vrlex->[0][$lex+1][$lex]: value ok 2841 - $vrgbl->[0][$lex+1][$lex]: no exception ok 2842 - $vrgbl->[0][$lex+1][$lex]: value ok 2843 - $vrgbl->[0][$lex+1][$lex] = 123: no exception ok 2844 - $vrgbl->[0][$lex+1][$lex] = 123: value ok 2845 - exists $vrgbl->[0][$lex+1][$lex]: no exception ok 2846 - exists $vrgbl->[0][$lex+1][$lex]: value ok 2847 - delete $vrgbl->[0][$lex+1][$lex]: no exception ok 2848 - delete $vrgbl->[0][$lex+1][$lex]: value ok 2849 - $vlex[$lex][$lex+1][$lex]: no exception ok 2850 - $vlex[$lex][$lex+1][$lex]: value ok 2851 - $vlex[$lex][$lex+1][$lex] = 123: no exception ok 2852 - $vlex[$lex][$lex+1][$lex] = 123: value ok 2853 - exists $vlex[$lex][$lex+1][$lex]: no exception ok 2854 - exists $vlex[$lex][$lex+1][$lex]: value ok 2855 - delete $vlex[$lex][$lex+1][$lex]: no exception ok 2856 - delete $vlex[$lex][$lex+1][$lex]: value ok 2857 - $vgbl[$lex][$lex+1][$lex]: no exception ok 2858 - $vgbl[$lex][$lex+1][$lex]: value ok 2859 - $vgbl[$lex][$lex+1][$lex] = 123: no exception ok 2860 - $vgbl[$lex][$lex+1][$lex] = 123: value ok 2861 - exists $vgbl[$lex][$lex+1][$lex]: no exception ok 2862 - exists $vgbl[$lex][$lex+1][$lex]: value ok 2863 - delete $vgbl[$lex][$lex+1][$lex]: no exception ok 2864 - delete $vgbl[$lex][$lex+1][$lex]: value ok 2865 - $vrlex->[$lex][$lex+1][$lex]: no exception ok 2866 - $vrlex->[$lex][$lex+1][$lex]: value ok 2867 - $vrlex->[$lex][$lex+1][$lex] = 123: no exception ok 2868 - $vrlex->[$lex][$lex+1][$lex] = 123: value ok 2869 - exists $vrlex->[$lex][$lex+1][$lex]: no exception ok 2870 - exists $vrlex->[$lex][$lex+1][$lex]: value ok 2871 - delete $vrlex->[$lex][$lex+1][$lex]: no exception ok 2872 - delete $vrlex->[$lex][$lex+1][$lex]: value ok 2873 - $vrgbl->[$lex][$lex+1][$lex]: no exception ok 2874 - $vrgbl->[$lex][$lex+1][$lex]: value ok 2875 - $vrgbl->[$lex][$lex+1][$lex] = 123: no exception ok 2876 - $vrgbl->[$lex][$lex+1][$lex] = 123: value ok 2877 - exists $vrgbl->[$lex][$lex+1][$lex]: no exception ok 2878 - exists $vrgbl->[$lex][$lex+1][$lex]: value ok 2879 - delete $vrgbl->[$lex][$lex+1][$lex]: no exception ok 2880 - delete $vrgbl->[$lex][$lex+1][$lex]: value ok 2881 - $vlex[$gbl][$lex+1][$lex]: no exception ok 2882 - $vlex[$gbl][$lex+1][$lex]: value ok 2883 - $vlex[$gbl][$lex+1][$lex] = 123: no exception ok 2884 - $vlex[$gbl][$lex+1][$lex] = 123: value ok 2885 - exists $vlex[$gbl][$lex+1][$lex]: no exception ok 2886 - exists $vlex[$gbl][$lex+1][$lex]: value ok 2887 - delete $vlex[$gbl][$lex+1][$lex]: no exception ok 2888 - delete $vlex[$gbl][$lex+1][$lex]: value ok 2889 - $vgbl[$gbl][$lex+1][$lex]: no exception ok 2890 - $vgbl[$gbl][$lex+1][$lex]: value ok 2891 - $vgbl[$gbl][$lex+1][$lex] = 123: no exception ok 2892 - $vgbl[$gbl][$lex+1][$lex] = 123: value ok 2893 - exists $vgbl[$gbl][$lex+1][$lex]: no exception ok 2894 - exists $vgbl[$gbl][$lex+1][$lex]: value ok 2895 - delete $vgbl[$gbl][$lex+1][$lex]: no exception ok 2896 - delete $vgbl[$gbl][$lex+1][$lex]: value ok 2897 - $vrlex->[$gbl][$lex+1][$lex]: no exception ok 2898 - $vrlex->[$gbl][$lex+1][$lex]: value ok 2899 - $vrlex->[$gbl][$lex+1][$lex] = 123: no exception ok 2900 - $vrlex->[$gbl][$lex+1][$lex] = 123: value ok 2901 - exists $vrlex->[$gbl][$lex+1][$lex]: no exception ok 2902 - exists $vrlex->[$gbl][$lex+1][$lex]: value ok 2903 - delete $vrlex->[$gbl][$lex+1][$lex]: no exception ok 2904 - delete $vrlex->[$gbl][$lex+1][$lex]: value ok 2905 - $vrgbl->[$gbl][$lex+1][$lex]: no exception ok 2906 - $vrgbl->[$gbl][$lex+1][$lex]: value ok 2907 - $vrgbl->[$gbl][$lex+1][$lex] = 123: no exception ok 2908 - $vrgbl->[$gbl][$lex+1][$lex] = 123: value ok 2909 - exists $vrgbl->[$gbl][$lex+1][$lex]: no exception ok 2910 - exists $vrgbl->[$gbl][$lex+1][$lex]: value ok 2911 - delete $vrgbl->[$gbl][$lex+1][$lex]: no exception ok 2912 - delete $vrgbl->[$gbl][$lex+1][$lex]: value ok 2913 - $vlex[$lex+1][$lex+1][$lex]: no exception ok 2914 - $vlex[$lex+1][$lex+1][$lex]: value ok 2915 - $vlex[$lex+1][$lex+1][$lex] = 123: no exception ok 2916 - $vlex[$lex+1][$lex+1][$lex] = 123: value ok 2917 - exists $vlex[$lex+1][$lex+1][$lex]: no exception ok 2918 - exists $vlex[$lex+1][$lex+1][$lex]: value ok 2919 - delete $vlex[$lex+1][$lex+1][$lex]: no exception ok 2920 - delete $vlex[$lex+1][$lex+1][$lex]: value ok 2921 - $vgbl[$lex+1][$lex+1][$lex]: no exception ok 2922 - $vgbl[$lex+1][$lex+1][$lex]: value ok 2923 - $vgbl[$lex+1][$lex+1][$lex] = 123: no exception ok 2924 - $vgbl[$lex+1][$lex+1][$lex] = 123: value ok 2925 - exists $vgbl[$lex+1][$lex+1][$lex]: no exception ok 2926 - exists $vgbl[$lex+1][$lex+1][$lex]: value ok 2927 - delete $vgbl[$lex+1][$lex+1][$lex]: no exception ok 2928 - delete $vgbl[$lex+1][$lex+1][$lex]: value ok 2929 - $vrlex->[$lex+1][$lex+1][$lex]: no exception ok 2930 - $vrlex->[$lex+1][$lex+1][$lex]: value ok 2931 - $vrlex->[$lex+1][$lex+1][$lex] = 123: no exception ok 2932 - $vrlex->[$lex+1][$lex+1][$lex] = 123: value ok 2933 - exists $vrlex->[$lex+1][$lex+1][$lex]: no exception ok 2934 - exists $vrlex->[$lex+1][$lex+1][$lex]: value ok 2935 - delete $vrlex->[$lex+1][$lex+1][$lex]: no exception ok 2936 - delete $vrlex->[$lex+1][$lex+1][$lex]: value ok 2937 - $vrgbl->[$lex+1][$lex+1][$lex]: no exception ok 2938 - $vrgbl->[$lex+1][$lex+1][$lex]: value ok 2939 - $vrgbl->[$lex+1][$lex+1][$lex] = 123: no exception ok 2940 - $vrgbl->[$lex+1][$lex+1][$lex] = 123: value ok 2941 - exists $vrgbl->[$lex+1][$lex+1][$lex]: no exception ok 2942 - exists $vrgbl->[$lex+1][$lex+1][$lex]: value ok 2943 - delete $vrgbl->[$lex+1][$lex+1][$lex]: no exception ok 2944 - delete $vrgbl->[$lex+1][$lex+1][$lex]: value ok 2945 - $vlex{foo}[$lex+1][$lex]: no exception ok 2946 - $vlex{foo}[$lex+1][$lex]: value ok 2947 - $vlex{foo}[$lex+1][$lex] = 123: no exception ok 2948 - $vlex{foo}[$lex+1][$lex] = 123: value ok 2949 - exists $vlex{foo}[$lex+1][$lex]: no exception ok 2950 - exists $vlex{foo}[$lex+1][$lex]: value ok 2951 - delete $vlex{foo}[$lex+1][$lex]: no exception ok 2952 - delete $vlex{foo}[$lex+1][$lex]: value ok 2953 - $vgbl{foo}[$lex+1][$lex]: no exception ok 2954 - $vgbl{foo}[$lex+1][$lex]: value ok 2955 - $vgbl{foo}[$lex+1][$lex] = 123: no exception ok 2956 - $vgbl{foo}[$lex+1][$lex] = 123: value ok 2957 - exists $vgbl{foo}[$lex+1][$lex]: no exception ok 2958 - exists $vgbl{foo}[$lex+1][$lex]: value ok 2959 - delete $vgbl{foo}[$lex+1][$lex]: no exception ok 2960 - delete $vgbl{foo}[$lex+1][$lex]: value ok 2961 - $vrlex->{foo}[$lex+1][$lex]: no exception ok 2962 - $vrlex->{foo}[$lex+1][$lex]: value ok 2963 - $vrlex->{foo}[$lex+1][$lex] = 123: no exception ok 2964 - $vrlex->{foo}[$lex+1][$lex] = 123: value ok 2965 - exists $vrlex->{foo}[$lex+1][$lex]: no exception ok 2966 - exists $vrlex->{foo}[$lex+1][$lex]: value ok 2967 - delete $vrlex->{foo}[$lex+1][$lex]: no exception ok 2968 - delete $vrlex->{foo}[$lex+1][$lex]: value ok 2969 - $vrgbl->{foo}[$lex+1][$lex]: no exception ok 2970 - $vrgbl->{foo}[$lex+1][$lex]: value ok 2971 - $vrgbl->{foo}[$lex+1][$lex] = 123: no exception ok 2972 - $vrgbl->{foo}[$lex+1][$lex] = 123: value ok 2973 - exists $vrgbl->{foo}[$lex+1][$lex]: no exception ok 2974 - exists $vrgbl->{foo}[$lex+1][$lex]: value ok 2975 - delete $vrgbl->{foo}[$lex+1][$lex]: no exception ok 2976 - delete $vrgbl->{foo}[$lex+1][$lex]: value ok 2977 - $vlex{$lex}[$lex+1][$lex]: no exception ok 2978 - $vlex{$lex}[$lex+1][$lex]: value ok 2979 - $vlex{$lex}[$lex+1][$lex] = 123: no exception ok 2980 - $vlex{$lex}[$lex+1][$lex] = 123: value ok 2981 - exists $vlex{$lex}[$lex+1][$lex]: no exception ok 2982 - exists $vlex{$lex}[$lex+1][$lex]: value ok 2983 - delete $vlex{$lex}[$lex+1][$lex]: no exception ok 2984 - delete $vlex{$lex}[$lex+1][$lex]: value ok 2985 - $vgbl{$lex}[$lex+1][$lex]: no exception ok 2986 - $vgbl{$lex}[$lex+1][$lex]: value ok 2987 - $vgbl{$lex}[$lex+1][$lex] = 123: no exception ok 2988 - $vgbl{$lex}[$lex+1][$lex] = 123: value ok 2989 - exists $vgbl{$lex}[$lex+1][$lex]: no exception ok 2990 - exists $vgbl{$lex}[$lex+1][$lex]: value ok 2991 - delete $vgbl{$lex}[$lex+1][$lex]: no exception ok 2992 - delete $vgbl{$lex}[$lex+1][$lex]: value ok 2993 - $vrlex->{$lex}[$lex+1][$lex]: no exception ok 2994 - $vrlex->{$lex}[$lex+1][$lex]: value ok 2995 - $vrlex->{$lex}[$lex+1][$lex] = 123: no exception ok 2996 - $vrlex->{$lex}[$lex+1][$lex] = 123: value ok 2997 - exists $vrlex->{$lex}[$lex+1][$lex]: no exception ok 2998 - exists $vrlex->{$lex}[$lex+1][$lex]: value ok 2999 - delete $vrlex->{$lex}[$lex+1][$lex]: no exception ok 3000 - delete $vrlex->{$lex}[$lex+1][$lex]: value ok 3001 - $vrgbl->{$lex}[$lex+1][$lex]: no exception ok 3002 - $vrgbl->{$lex}[$lex+1][$lex]: value ok 3003 - $vrgbl->{$lex}[$lex+1][$lex] = 123: no exception ok 3004 - $vrgbl->{$lex}[$lex+1][$lex] = 123: value ok 3005 - exists $vrgbl->{$lex}[$lex+1][$lex]: no exception ok 3006 - exists $vrgbl->{$lex}[$lex+1][$lex]: value ok 3007 - delete $vrgbl->{$lex}[$lex+1][$lex]: no exception ok 3008 - delete $vrgbl->{$lex}[$lex+1][$lex]: value ok 3009 - $vlex{$gbl}[$lex+1][$lex]: no exception ok 3010 - $vlex{$gbl}[$lex+1][$lex]: value ok 3011 - $vlex{$gbl}[$lex+1][$lex] = 123: no exception ok 3012 - $vlex{$gbl}[$lex+1][$lex] = 123: value ok 3013 - exists $vlex{$gbl}[$lex+1][$lex]: no exception ok 3014 - exists $vlex{$gbl}[$lex+1][$lex]: value ok 3015 - delete $vlex{$gbl}[$lex+1][$lex]: no exception ok 3016 - delete $vlex{$gbl}[$lex+1][$lex]: value ok 3017 - $vgbl{$gbl}[$lex+1][$lex]: no exception ok 3018 - $vgbl{$gbl}[$lex+1][$lex]: value ok 3019 - $vgbl{$gbl}[$lex+1][$lex] = 123: no exception ok 3020 - $vgbl{$gbl}[$lex+1][$lex] = 123: value ok 3021 - exists $vgbl{$gbl}[$lex+1][$lex]: no exception ok 3022 - exists $vgbl{$gbl}[$lex+1][$lex]: value ok 3023 - delete $vgbl{$gbl}[$lex+1][$lex]: no exception ok 3024 - delete $vgbl{$gbl}[$lex+1][$lex]: value ok 3025 - $vrlex->{$gbl}[$lex+1][$lex]: no exception ok 3026 - $vrlex->{$gbl}[$lex+1][$lex]: value ok 3027 - $vrlex->{$gbl}[$lex+1][$lex] = 123: no exception ok 3028 - $vrlex->{$gbl}[$lex+1][$lex] = 123: value ok 3029 - exists $vrlex->{$gbl}[$lex+1][$lex]: no exception ok 3030 - exists $vrlex->{$gbl}[$lex+1][$lex]: value ok 3031 - delete $vrlex->{$gbl}[$lex+1][$lex]: no exception ok 3032 - delete $vrlex->{$gbl}[$lex+1][$lex]: value ok 3033 - $vrgbl->{$gbl}[$lex+1][$lex]: no exception ok 3034 - $vrgbl->{$gbl}[$lex+1][$lex]: value ok 3035 - $vrgbl->{$gbl}[$lex+1][$lex] = 123: no exception ok 3036 - $vrgbl->{$gbl}[$lex+1][$lex] = 123: value ok 3037 - exists $vrgbl->{$gbl}[$lex+1][$lex]: no exception ok 3038 - exists $vrgbl->{$gbl}[$lex+1][$lex]: value ok 3039 - delete $vrgbl->{$gbl}[$lex+1][$lex]: no exception ok 3040 - delete $vrgbl->{$gbl}[$lex+1][$lex]: value ok 3041 - $vlex{"x$lex"}[$lex+1][$lex]: no exception ok 3042 - $vlex{"x$lex"}[$lex+1][$lex]: value ok 3043 - $vlex{"x$lex"}[$lex+1][$lex] = 123: no exception ok 3044 - $vlex{"x$lex"}[$lex+1][$lex] = 123: value ok 3045 - exists $vlex{"x$lex"}[$lex+1][$lex]: no exception ok 3046 - exists $vlex{"x$lex"}[$lex+1][$lex]: value ok 3047 - delete $vlex{"x$lex"}[$lex+1][$lex]: no exception ok 3048 - delete $vlex{"x$lex"}[$lex+1][$lex]: value ok 3049 - $vgbl{"x$lex"}[$lex+1][$lex]: no exception ok 3050 - $vgbl{"x$lex"}[$lex+1][$lex]: value ok 3051 - $vgbl{"x$lex"}[$lex+1][$lex] = 123: no exception ok 3052 - $vgbl{"x$lex"}[$lex+1][$lex] = 123: value ok 3053 - exists $vgbl{"x$lex"}[$lex+1][$lex]: no exception ok 3054 - exists $vgbl{"x$lex"}[$lex+1][$lex]: value ok 3055 - delete $vgbl{"x$lex"}[$lex+1][$lex]: no exception ok 3056 - delete $vgbl{"x$lex"}[$lex+1][$lex]: value ok 3057 - $vrlex->{"x$lex"}[$lex+1][$lex]: no exception ok 3058 - $vrlex->{"x$lex"}[$lex+1][$lex]: value ok 3059 - $vrlex->{"x$lex"}[$lex+1][$lex] = 123: no exception ok 3060 - $vrlex->{"x$lex"}[$lex+1][$lex] = 123: value ok 3061 - exists $vrlex->{"x$lex"}[$lex+1][$lex]: no exception ok 3062 - exists $vrlex->{"x$lex"}[$lex+1][$lex]: value ok 3063 - delete $vrlex->{"x$lex"}[$lex+1][$lex]: no exception ok 3064 - delete $vrlex->{"x$lex"}[$lex+1][$lex]: value ok 3065 - $vrgbl->{"x$lex"}[$lex+1][$lex]: no exception ok 3066 - $vrgbl->{"x$lex"}[$lex+1][$lex]: value ok 3067 - $vrgbl->{"x$lex"}[$lex+1][$lex] = 123: no exception ok 3068 - $vrgbl->{"x$lex"}[$lex+1][$lex] = 123: value ok 3069 - exists $vrgbl->{"x$lex"}[$lex+1][$lex]: no exception ok 3070 - exists $vrgbl->{"x$lex"}[$lex+1][$lex]: value ok 3071 - delete $vrgbl->{"x$lex"}[$lex+1][$lex]: no exception ok 3072 - delete $vrgbl->{"x$lex"}[$lex+1][$lex]: value ok 3073 - $vlex[0]{foo}[$lex]: no exception ok 3074 - $vlex[0]{foo}[$lex]: value ok 3075 - $vlex[0]{foo}[$lex] = 123: no exception ok 3076 - $vlex[0]{foo}[$lex] = 123: value ok 3077 - exists $vlex[0]{foo}[$lex]: no exception ok 3078 - exists $vlex[0]{foo}[$lex]: value ok 3079 - delete $vlex[0]{foo}[$lex]: no exception ok 3080 - delete $vlex[0]{foo}[$lex]: value ok 3081 - $vgbl[0]{foo}[$lex]: no exception ok 3082 - $vgbl[0]{foo}[$lex]: value ok 3083 - $vgbl[0]{foo}[$lex] = 123: no exception ok 3084 - $vgbl[0]{foo}[$lex] = 123: value ok 3085 - exists $vgbl[0]{foo}[$lex]: no exception ok 3086 - exists $vgbl[0]{foo}[$lex]: value ok 3087 - delete $vgbl[0]{foo}[$lex]: no exception ok 3088 - delete $vgbl[0]{foo}[$lex]: value ok 3089 - $vrlex->[0]{foo}[$lex]: no exception ok 3090 - $vrlex->[0]{foo}[$lex]: value ok 3091 - $vrlex->[0]{foo}[$lex] = 123: no exception ok 3092 - $vrlex->[0]{foo}[$lex] = 123: value ok 3093 - exists $vrlex->[0]{foo}[$lex]: no exception ok 3094 - exists $vrlex->[0]{foo}[$lex]: value ok 3095 - delete $vrlex->[0]{foo}[$lex]: no exception ok 3096 - delete $vrlex->[0]{foo}[$lex]: value ok 3097 - $vrgbl->[0]{foo}[$lex]: no exception ok 3098 - $vrgbl->[0]{foo}[$lex]: value ok 3099 - $vrgbl->[0]{foo}[$lex] = 123: no exception ok 3100 - $vrgbl->[0]{foo}[$lex] = 123: value ok 3101 - exists $vrgbl->[0]{foo}[$lex]: no exception ok 3102 - exists $vrgbl->[0]{foo}[$lex]: value ok 3103 - delete $vrgbl->[0]{foo}[$lex]: no exception ok 3104 - delete $vrgbl->[0]{foo}[$lex]: value ok 3105 - $vlex[$lex]{foo}[$lex]: no exception ok 3106 - $vlex[$lex]{foo}[$lex]: value ok 3107 - $vlex[$lex]{foo}[$lex] = 123: no exception ok 3108 - $vlex[$lex]{foo}[$lex] = 123: value ok 3109 - exists $vlex[$lex]{foo}[$lex]: no exception ok 3110 - exists $vlex[$lex]{foo}[$lex]: value ok 3111 - delete $vlex[$lex]{foo}[$lex]: no exception ok 3112 - delete $vlex[$lex]{foo}[$lex]: value ok 3113 - $vgbl[$lex]{foo}[$lex]: no exception ok 3114 - $vgbl[$lex]{foo}[$lex]: value ok 3115 - $vgbl[$lex]{foo}[$lex] = 123: no exception ok 3116 - $vgbl[$lex]{foo}[$lex] = 123: value ok 3117 - exists $vgbl[$lex]{foo}[$lex]: no exception ok 3118 - exists $vgbl[$lex]{foo}[$lex]: value ok 3119 - delete $vgbl[$lex]{foo}[$lex]: no exception ok 3120 - delete $vgbl[$lex]{foo}[$lex]: value ok 3121 - $vrlex->[$lex]{foo}[$lex]: no exception ok 3122 - $vrlex->[$lex]{foo}[$lex]: value ok 3123 - $vrlex->[$lex]{foo}[$lex] = 123: no exception ok 3124 - $vrlex->[$lex]{foo}[$lex] = 123: value ok 3125 - exists $vrlex->[$lex]{foo}[$lex]: no exception ok 3126 - exists $vrlex->[$lex]{foo}[$lex]: value ok 3127 - delete $vrlex->[$lex]{foo}[$lex]: no exception ok 3128 - delete $vrlex->[$lex]{foo}[$lex]: value ok 3129 - $vrgbl->[$lex]{foo}[$lex]: no exception ok 3130 - $vrgbl->[$lex]{foo}[$lex]: value ok 3131 - $vrgbl->[$lex]{foo}[$lex] = 123: no exception ok 3132 - $vrgbl->[$lex]{foo}[$lex] = 123: value ok 3133 - exists $vrgbl->[$lex]{foo}[$lex]: no exception ok 3134 - exists $vrgbl->[$lex]{foo}[$lex]: value ok 3135 - delete $vrgbl->[$lex]{foo}[$lex]: no exception ok 3136 - delete $vrgbl->[$lex]{foo}[$lex]: value ok 3137 - $vlex[$gbl]{foo}[$lex]: no exception ok 3138 - $vlex[$gbl]{foo}[$lex]: value ok 3139 - $vlex[$gbl]{foo}[$lex] = 123: no exception ok 3140 - $vlex[$gbl]{foo}[$lex] = 123: value ok 3141 - exists $vlex[$gbl]{foo}[$lex]: no exception ok 3142 - exists $vlex[$gbl]{foo}[$lex]: value ok 3143 - delete $vlex[$gbl]{foo}[$lex]: no exception ok 3144 - delete $vlex[$gbl]{foo}[$lex]: value ok 3145 - $vgbl[$gbl]{foo}[$lex]: no exception ok 3146 - $vgbl[$gbl]{foo}[$lex]: value ok 3147 - $vgbl[$gbl]{foo}[$lex] = 123: no exception ok 3148 - $vgbl[$gbl]{foo}[$lex] = 123: value ok 3149 - exists $vgbl[$gbl]{foo}[$lex]: no exception ok 3150 - exists $vgbl[$gbl]{foo}[$lex]: value ok 3151 - delete $vgbl[$gbl]{foo}[$lex]: no exception ok 3152 - delete $vgbl[$gbl]{foo}[$lex]: value ok 3153 - $vrlex->[$gbl]{foo}[$lex]: no exception ok 3154 - $vrlex->[$gbl]{foo}[$lex]: value ok 3155 - $vrlex->[$gbl]{foo}[$lex] = 123: no exception ok 3156 - $vrlex->[$gbl]{foo}[$lex] = 123: value ok 3157 - exists $vrlex->[$gbl]{foo}[$lex]: no exception ok 3158 - exists $vrlex->[$gbl]{foo}[$lex]: value ok 3159 - delete $vrlex->[$gbl]{foo}[$lex]: no exception ok 3160 - delete $vrlex->[$gbl]{foo}[$lex]: value ok 3161 - $vrgbl->[$gbl]{foo}[$lex]: no exception ok 3162 - $vrgbl->[$gbl]{foo}[$lex]: value ok 3163 - $vrgbl->[$gbl]{foo}[$lex] = 123: no exception ok 3164 - $vrgbl->[$gbl]{foo}[$lex] = 123: value ok 3165 - exists $vrgbl->[$gbl]{foo}[$lex]: no exception ok 3166 - exists $vrgbl->[$gbl]{foo}[$lex]: value ok 3167 - delete $vrgbl->[$gbl]{foo}[$lex]: no exception ok 3168 - delete $vrgbl->[$gbl]{foo}[$lex]: value ok 3169 - $vlex[$lex+1]{foo}[$lex]: no exception ok 3170 - $vlex[$lex+1]{foo}[$lex]: value ok 3171 - $vlex[$lex+1]{foo}[$lex] = 123: no exception ok 3172 - $vlex[$lex+1]{foo}[$lex] = 123: value ok 3173 - exists $vlex[$lex+1]{foo}[$lex]: no exception ok 3174 - exists $vlex[$lex+1]{foo}[$lex]: value ok 3175 - delete $vlex[$lex+1]{foo}[$lex]: no exception ok 3176 - delete $vlex[$lex+1]{foo}[$lex]: value ok 3177 - $vgbl[$lex+1]{foo}[$lex]: no exception ok 3178 - $vgbl[$lex+1]{foo}[$lex]: value ok 3179 - $vgbl[$lex+1]{foo}[$lex] = 123: no exception ok 3180 - $vgbl[$lex+1]{foo}[$lex] = 123: value ok 3181 - exists $vgbl[$lex+1]{foo}[$lex]: no exception ok 3182 - exists $vgbl[$lex+1]{foo}[$lex]: value ok 3183 - delete $vgbl[$lex+1]{foo}[$lex]: no exception ok 3184 - delete $vgbl[$lex+1]{foo}[$lex]: value ok 3185 - $vrlex->[$lex+1]{foo}[$lex]: no exception ok 3186 - $vrlex->[$lex+1]{foo}[$lex]: value ok 3187 - $vrlex->[$lex+1]{foo}[$lex] = 123: no exception ok 3188 - $vrlex->[$lex+1]{foo}[$lex] = 123: value ok 3189 - exists $vrlex->[$lex+1]{foo}[$lex]: no exception ok 3190 - exists $vrlex->[$lex+1]{foo}[$lex]: value ok 3191 - delete $vrlex->[$lex+1]{foo}[$lex]: no exception ok 3192 - delete $vrlex->[$lex+1]{foo}[$lex]: value ok 3193 - $vrgbl->[$lex+1]{foo}[$lex]: no exception ok 3194 - $vrgbl->[$lex+1]{foo}[$lex]: value ok 3195 - $vrgbl->[$lex+1]{foo}[$lex] = 123: no exception ok 3196 - $vrgbl->[$lex+1]{foo}[$lex] = 123: value ok 3197 - exists $vrgbl->[$lex+1]{foo}[$lex]: no exception ok 3198 - exists $vrgbl->[$lex+1]{foo}[$lex]: value ok 3199 - delete $vrgbl->[$lex+1]{foo}[$lex]: no exception ok 3200 - delete $vrgbl->[$lex+1]{foo}[$lex]: value ok 3201 - $vlex{foo}{foo}[$lex]: no exception ok 3202 - $vlex{foo}{foo}[$lex]: value ok 3203 - $vlex{foo}{foo}[$lex] = 123: no exception ok 3204 - $vlex{foo}{foo}[$lex] = 123: value ok 3205 - exists $vlex{foo}{foo}[$lex]: no exception ok 3206 - exists $vlex{foo}{foo}[$lex]: value ok 3207 - delete $vlex{foo}{foo}[$lex]: no exception ok 3208 - delete $vlex{foo}{foo}[$lex]: value ok 3209 - $vgbl{foo}{foo}[$lex]: no exception ok 3210 - $vgbl{foo}{foo}[$lex]: value ok 3211 - $vgbl{foo}{foo}[$lex] = 123: no exception ok 3212 - $vgbl{foo}{foo}[$lex] = 123: value ok 3213 - exists $vgbl{foo}{foo}[$lex]: no exception ok 3214 - exists $vgbl{foo}{foo}[$lex]: value ok 3215 - delete $vgbl{foo}{foo}[$lex]: no exception ok 3216 - delete $vgbl{foo}{foo}[$lex]: value ok 3217 - $vrlex->{foo}{foo}[$lex]: no exception ok 3218 - $vrlex->{foo}{foo}[$lex]: value ok 3219 - $vrlex->{foo}{foo}[$lex] = 123: no exception ok 3220 - $vrlex->{foo}{foo}[$lex] = 123: value ok 3221 - exists $vrlex->{foo}{foo}[$lex]: no exception ok 3222 - exists $vrlex->{foo}{foo}[$lex]: value ok 3223 - delete $vrlex->{foo}{foo}[$lex]: no exception ok 3224 - delete $vrlex->{foo}{foo}[$lex]: value ok 3225 - $vrgbl->{foo}{foo}[$lex]: no exception ok 3226 - $vrgbl->{foo}{foo}[$lex]: value ok 3227 - $vrgbl->{foo}{foo}[$lex] = 123: no exception ok 3228 - $vrgbl->{foo}{foo}[$lex] = 123: value ok 3229 - exists $vrgbl->{foo}{foo}[$lex]: no exception ok 3230 - exists $vrgbl->{foo}{foo}[$lex]: value ok 3231 - delete $vrgbl->{foo}{foo}[$lex]: no exception ok 3232 - delete $vrgbl->{foo}{foo}[$lex]: value ok 3233 - $vlex{$lex}{foo}[$lex]: no exception ok 3234 - $vlex{$lex}{foo}[$lex]: value ok 3235 - $vlex{$lex}{foo}[$lex] = 123: no exception ok 3236 - $vlex{$lex}{foo}[$lex] = 123: value ok 3237 - exists $vlex{$lex}{foo}[$lex]: no exception ok 3238 - exists $vlex{$lex}{foo}[$lex]: value ok 3239 - delete $vlex{$lex}{foo}[$lex]: no exception ok 3240 - delete $vlex{$lex}{foo}[$lex]: value ok 3241 - $vgbl{$lex}{foo}[$lex]: no exception ok 3242 - $vgbl{$lex}{foo}[$lex]: value ok 3243 - $vgbl{$lex}{foo}[$lex] = 123: no exception ok 3244 - $vgbl{$lex}{foo}[$lex] = 123: value ok 3245 - exists $vgbl{$lex}{foo}[$lex]: no exception ok 3246 - exists $vgbl{$lex}{foo}[$lex]: value ok 3247 - delete $vgbl{$lex}{foo}[$lex]: no exception ok 3248 - delete $vgbl{$lex}{foo}[$lex]: value ok 3249 - $vrlex->{$lex}{foo}[$lex]: no exception ok 3250 - $vrlex->{$lex}{foo}[$lex]: value ok 3251 - $vrlex->{$lex}{foo}[$lex] = 123: no exception ok 3252 - $vrlex->{$lex}{foo}[$lex] = 123: value ok 3253 - exists $vrlex->{$lex}{foo}[$lex]: no exception ok 3254 - exists $vrlex->{$lex}{foo}[$lex]: value ok 3255 - delete $vrlex->{$lex}{foo}[$lex]: no exception ok 3256 - delete $vrlex->{$lex}{foo}[$lex]: value ok 3257 - $vrgbl->{$lex}{foo}[$lex]: no exception ok 3258 - $vrgbl->{$lex}{foo}[$lex]: value ok 3259 - $vrgbl->{$lex}{foo}[$lex] = 123: no exception ok 3260 - $vrgbl->{$lex}{foo}[$lex] = 123: value ok 3261 - exists $vrgbl->{$lex}{foo}[$lex]: no exception ok 3262 - exists $vrgbl->{$lex}{foo}[$lex]: value ok 3263 - delete $vrgbl->{$lex}{foo}[$lex]: no exception ok 3264 - delete $vrgbl->{$lex}{foo}[$lex]: value ok 3265 - $vlex{$gbl}{foo}[$lex]: no exception ok 3266 - $vlex{$gbl}{foo}[$lex]: value ok 3267 - $vlex{$gbl}{foo}[$lex] = 123: no exception ok 3268 - $vlex{$gbl}{foo}[$lex] = 123: value ok 3269 - exists $vlex{$gbl}{foo}[$lex]: no exception ok 3270 - exists $vlex{$gbl}{foo}[$lex]: value ok 3271 - delete $vlex{$gbl}{foo}[$lex]: no exception ok 3272 - delete $vlex{$gbl}{foo}[$lex]: value ok 3273 - $vgbl{$gbl}{foo}[$lex]: no exception ok 3274 - $vgbl{$gbl}{foo}[$lex]: value ok 3275 - $vgbl{$gbl}{foo}[$lex] = 123: no exception ok 3276 - $vgbl{$gbl}{foo}[$lex] = 123: value ok 3277 - exists $vgbl{$gbl}{foo}[$lex]: no exception ok 3278 - exists $vgbl{$gbl}{foo}[$lex]: value ok 3279 - delete $vgbl{$gbl}{foo}[$lex]: no exception ok 3280 - delete $vgbl{$gbl}{foo}[$lex]: value ok 3281 - $vrlex->{$gbl}{foo}[$lex]: no exception ok 3282 - $vrlex->{$gbl}{foo}[$lex]: value ok 3283 - $vrlex->{$gbl}{foo}[$lex] = 123: no exception ok 3284 - $vrlex->{$gbl}{foo}[$lex] = 123: value ok 3285 - exists $vrlex->{$gbl}{foo}[$lex]: no exception ok 3286 - exists $vrlex->{$gbl}{foo}[$lex]: value ok 3287 - delete $vrlex->{$gbl}{foo}[$lex]: no exception ok 3288 - delete $vrlex->{$gbl}{foo}[$lex]: value ok 3289 - $vrgbl->{$gbl}{foo}[$lex]: no exception ok 3290 - $vrgbl->{$gbl}{foo}[$lex]: value ok 3291 - $vrgbl->{$gbl}{foo}[$lex] = 123: no exception ok 3292 - $vrgbl->{$gbl}{foo}[$lex] = 123: value ok 3293 - exists $vrgbl->{$gbl}{foo}[$lex]: no exception ok 3294 - exists $vrgbl->{$gbl}{foo}[$lex]: value ok 3295 - delete $vrgbl->{$gbl}{foo}[$lex]: no exception ok 3296 - delete $vrgbl->{$gbl}{foo}[$lex]: value ok 3297 - $vlex{"x$lex"}{foo}[$lex]: no exception ok 3298 - $vlex{"x$lex"}{foo}[$lex]: value ok 3299 - $vlex{"x$lex"}{foo}[$lex] = 123: no exception ok 3300 - $vlex{"x$lex"}{foo}[$lex] = 123: value ok 3301 - exists $vlex{"x$lex"}{foo}[$lex]: no exception ok 3302 - exists $vlex{"x$lex"}{foo}[$lex]: value ok 3303 - delete $vlex{"x$lex"}{foo}[$lex]: no exception ok 3304 - delete $vlex{"x$lex"}{foo}[$lex]: value ok 3305 - $vgbl{"x$lex"}{foo}[$lex]: no exception ok 3306 - $vgbl{"x$lex"}{foo}[$lex]: value ok 3307 - $vgbl{"x$lex"}{foo}[$lex] = 123: no exception ok 3308 - $vgbl{"x$lex"}{foo}[$lex] = 123: value ok 3309 - exists $vgbl{"x$lex"}{foo}[$lex]: no exception ok 3310 - exists $vgbl{"x$lex"}{foo}[$lex]: value ok 3311 - delete $vgbl{"x$lex"}{foo}[$lex]: no exception ok 3312 - delete $vgbl{"x$lex"}{foo}[$lex]: value ok 3313 - $vrlex->{"x$lex"}{foo}[$lex]: no exception ok 3314 - $vrlex->{"x$lex"}{foo}[$lex]: value ok 3315 - $vrlex->{"x$lex"}{foo}[$lex] = 123: no exception ok 3316 - $vrlex->{"x$lex"}{foo}[$lex] = 123: value ok 3317 - exists $vrlex->{"x$lex"}{foo}[$lex]: no exception ok 3318 - exists $vrlex->{"x$lex"}{foo}[$lex]: value ok 3319 - delete $vrlex->{"x$lex"}{foo}[$lex]: no exception ok 3320 - delete $vrlex->{"x$lex"}{foo}[$lex]: value ok 3321 - $vrgbl->{"x$lex"}{foo}[$lex]: no exception ok 3322 - $vrgbl->{"x$lex"}{foo}[$lex]: value ok 3323 - $vrgbl->{"x$lex"}{foo}[$lex] = 123: no exception ok 3324 - $vrgbl->{"x$lex"}{foo}[$lex] = 123: value ok 3325 - exists $vrgbl->{"x$lex"}{foo}[$lex]: no exception ok 3326 - exists $vrgbl->{"x$lex"}{foo}[$lex]: value ok 3327 - delete $vrgbl->{"x$lex"}{foo}[$lex]: no exception ok 3328 - delete $vrgbl->{"x$lex"}{foo}[$lex]: value ok 3329 - $vlex[0]{$lex}[$lex]: no exception ok 3330 - $vlex[0]{$lex}[$lex]: value ok 3331 - $vlex[0]{$lex}[$lex] = 123: no exception ok 3332 - $vlex[0]{$lex}[$lex] = 123: value ok 3333 - exists $vlex[0]{$lex}[$lex]: no exception ok 3334 - exists $vlex[0]{$lex}[$lex]: value ok 3335 - delete $vlex[0]{$lex}[$lex]: no exception ok 3336 - delete $vlex[0]{$lex}[$lex]: value ok 3337 - $vgbl[0]{$lex}[$lex]: no exception ok 3338 - $vgbl[0]{$lex}[$lex]: value ok 3339 - $vgbl[0]{$lex}[$lex] = 123: no exception ok 3340 - $vgbl[0]{$lex}[$lex] = 123: value ok 3341 - exists $vgbl[0]{$lex}[$lex]: no exception ok 3342 - exists $vgbl[0]{$lex}[$lex]: value ok 3343 - delete $vgbl[0]{$lex}[$lex]: no exception ok 3344 - delete $vgbl[0]{$lex}[$lex]: value ok 3345 - $vrlex->[0]{$lex}[$lex]: no exception ok 3346 - $vrlex->[0]{$lex}[$lex]: value ok 3347 - $vrlex->[0]{$lex}[$lex] = 123: no exception ok 3348 - $vrlex->[0]{$lex}[$lex] = 123: value ok 3349 - exists $vrlex->[0]{$lex}[$lex]: no exception ok 3350 - exists $vrlex->[0]{$lex}[$lex]: value ok 3351 - delete $vrlex->[0]{$lex}[$lex]: no exception ok 3352 - delete $vrlex->[0]{$lex}[$lex]: value ok 3353 - $vrgbl->[0]{$lex}[$lex]: no exception ok 3354 - $vrgbl->[0]{$lex}[$lex]: value ok 3355 - $vrgbl->[0]{$lex}[$lex] = 123: no exception ok 3356 - $vrgbl->[0]{$lex}[$lex] = 123: value ok 3357 - exists $vrgbl->[0]{$lex}[$lex]: no exception ok 3358 - exists $vrgbl->[0]{$lex}[$lex]: value ok 3359 - delete $vrgbl->[0]{$lex}[$lex]: no exception ok 3360 - delete $vrgbl->[0]{$lex}[$lex]: value ok 3361 - $vlex[$lex]{$lex}[$lex]: no exception ok 3362 - $vlex[$lex]{$lex}[$lex]: value ok 3363 - $vlex[$lex]{$lex}[$lex] = 123: no exception ok 3364 - $vlex[$lex]{$lex}[$lex] = 123: value ok 3365 - exists $vlex[$lex]{$lex}[$lex]: no exception ok 3366 - exists $vlex[$lex]{$lex}[$lex]: value ok 3367 - delete $vlex[$lex]{$lex}[$lex]: no exception ok 3368 - delete $vlex[$lex]{$lex}[$lex]: value ok 3369 - $vgbl[$lex]{$lex}[$lex]: no exception ok 3370 - $vgbl[$lex]{$lex}[$lex]: value ok 3371 - $vgbl[$lex]{$lex}[$lex] = 123: no exception ok 3372 - $vgbl[$lex]{$lex}[$lex] = 123: value ok 3373 - exists $vgbl[$lex]{$lex}[$lex]: no exception ok 3374 - exists $vgbl[$lex]{$lex}[$lex]: value ok 3375 - delete $vgbl[$lex]{$lex}[$lex]: no exception ok 3376 - delete $vgbl[$lex]{$lex}[$lex]: value ok 3377 - $vrlex->[$lex]{$lex}[$lex]: no exception ok 3378 - $vrlex->[$lex]{$lex}[$lex]: value ok 3379 - $vrlex->[$lex]{$lex}[$lex] = 123: no exception ok 3380 - $vrlex->[$lex]{$lex}[$lex] = 123: value ok 3381 - exists $vrlex->[$lex]{$lex}[$lex]: no exception ok 3382 - exists $vrlex->[$lex]{$lex}[$lex]: value ok 3383 - delete $vrlex->[$lex]{$lex}[$lex]: no exception ok 3384 - delete $vrlex->[$lex]{$lex}[$lex]: value ok 3385 - $vrgbl->[$lex]{$lex}[$lex]: no exception ok 3386 - $vrgbl->[$lex]{$lex}[$lex]: value ok 3387 - $vrgbl->[$lex]{$lex}[$lex] = 123: no exception ok 3388 - $vrgbl->[$lex]{$lex}[$lex] = 123: value ok 3389 - exists $vrgbl->[$lex]{$lex}[$lex]: no exception ok 3390 - exists $vrgbl->[$lex]{$lex}[$lex]: value ok 3391 - delete $vrgbl->[$lex]{$lex}[$lex]: no exception ok 3392 - delete $vrgbl->[$lex]{$lex}[$lex]: value ok 3393 - $vlex[$gbl]{$lex}[$lex]: no exception ok 3394 - $vlex[$gbl]{$lex}[$lex]: value ok 3395 - $vlex[$gbl]{$lex}[$lex] = 123: no exception ok 3396 - $vlex[$gbl]{$lex}[$lex] = 123: value ok 3397 - exists $vlex[$gbl]{$lex}[$lex]: no exception ok 3398 - exists $vlex[$gbl]{$lex}[$lex]: value ok 3399 - delete $vlex[$gbl]{$lex}[$lex]: no exception ok 3400 - delete $vlex[$gbl]{$lex}[$lex]: value ok 3401 - $vgbl[$gbl]{$lex}[$lex]: no exception ok 3402 - $vgbl[$gbl]{$lex}[$lex]: value ok 3403 - $vgbl[$gbl]{$lex}[$lex] = 123: no exception ok 3404 - $vgbl[$gbl]{$lex}[$lex] = 123: value ok 3405 - exists $vgbl[$gbl]{$lex}[$lex]: no exception ok 3406 - exists $vgbl[$gbl]{$lex}[$lex]: value ok 3407 - delete $vgbl[$gbl]{$lex}[$lex]: no exception ok 3408 - delete $vgbl[$gbl]{$lex}[$lex]: value ok 3409 - $vrlex->[$gbl]{$lex}[$lex]: no exception ok 3410 - $vrlex->[$gbl]{$lex}[$lex]: value ok 3411 - $vrlex->[$gbl]{$lex}[$lex] = 123: no exception ok 3412 - $vrlex->[$gbl]{$lex}[$lex] = 123: value ok 3413 - exists $vrlex->[$gbl]{$lex}[$lex]: no exception ok 3414 - exists $vrlex->[$gbl]{$lex}[$lex]: value ok 3415 - delete $vrlex->[$gbl]{$lex}[$lex]: no exception ok 3416 - delete $vrlex->[$gbl]{$lex}[$lex]: value ok 3417 - $vrgbl->[$gbl]{$lex}[$lex]: no exception ok 3418 - $vrgbl->[$gbl]{$lex}[$lex]: value ok 3419 - $vrgbl->[$gbl]{$lex}[$lex] = 123: no exception ok 3420 - $vrgbl->[$gbl]{$lex}[$lex] = 123: value ok 3421 - exists $vrgbl->[$gbl]{$lex}[$lex]: no exception ok 3422 - exists $vrgbl->[$gbl]{$lex}[$lex]: value ok 3423 - delete $vrgbl->[$gbl]{$lex}[$lex]: no exception ok 3424 - delete $vrgbl->[$gbl]{$lex}[$lex]: value ok 3425 - $vlex[$lex+1]{$lex}[$lex]: no exception ok 3426 - $vlex[$lex+1]{$lex}[$lex]: value ok 3427 - $vlex[$lex+1]{$lex}[$lex] = 123: no exception ok 3428 - $vlex[$lex+1]{$lex}[$lex] = 123: value ok 3429 - exists $vlex[$lex+1]{$lex}[$lex]: no exception ok 3430 - exists $vlex[$lex+1]{$lex}[$lex]: value ok 3431 - delete $vlex[$lex+1]{$lex}[$lex]: no exception ok 3432 - delete $vlex[$lex+1]{$lex}[$lex]: value ok 3433 - $vgbl[$lex+1]{$lex}[$lex]: no exception ok 3434 - $vgbl[$lex+1]{$lex}[$lex]: value ok 3435 - $vgbl[$lex+1]{$lex}[$lex] = 123: no exception ok 3436 - $vgbl[$lex+1]{$lex}[$lex] = 123: value ok 3437 - exists $vgbl[$lex+1]{$lex}[$lex]: no exception ok 3438 - exists $vgbl[$lex+1]{$lex}[$lex]: value ok 3439 - delete $vgbl[$lex+1]{$lex}[$lex]: no exception ok 3440 - delete $vgbl[$lex+1]{$lex}[$lex]: value ok 3441 - $vrlex->[$lex+1]{$lex}[$lex]: no exception ok 3442 - $vrlex->[$lex+1]{$lex}[$lex]: value ok 3443 - $vrlex->[$lex+1]{$lex}[$lex] = 123: no exception ok 3444 - $vrlex->[$lex+1]{$lex}[$lex] = 123: value ok 3445 - exists $vrlex->[$lex+1]{$lex}[$lex]: no exception ok 3446 - exists $vrlex->[$lex+1]{$lex}[$lex]: value ok 3447 - delete $vrlex->[$lex+1]{$lex}[$lex]: no exception ok 3448 - delete $vrlex->[$lex+1]{$lex}[$lex]: value ok 3449 - $vrgbl->[$lex+1]{$lex}[$lex]: no exception ok 3450 - $vrgbl->[$lex+1]{$lex}[$lex]: value ok 3451 - $vrgbl->[$lex+1]{$lex}[$lex] = 123: no exception ok 3452 - $vrgbl->[$lex+1]{$lex}[$lex] = 123: value ok 3453 - exists $vrgbl->[$lex+1]{$lex}[$lex]: no exception ok 3454 - exists $vrgbl->[$lex+1]{$lex}[$lex]: value ok 3455 - delete $vrgbl->[$lex+1]{$lex}[$lex]: no exception ok 3456 - delete $vrgbl->[$lex+1]{$lex}[$lex]: value ok 3457 - $vlex{foo}{$lex}[$lex]: no exception ok 3458 - $vlex{foo}{$lex}[$lex]: value ok 3459 - $vlex{foo}{$lex}[$lex] = 123: no exception ok 3460 - $vlex{foo}{$lex}[$lex] = 123: value ok 3461 - exists $vlex{foo}{$lex}[$lex]: no exception ok 3462 - exists $vlex{foo}{$lex}[$lex]: value ok 3463 - delete $vlex{foo}{$lex}[$lex]: no exception ok 3464 - delete $vlex{foo}{$lex}[$lex]: value ok 3465 - $vgbl{foo}{$lex}[$lex]: no exception ok 3466 - $vgbl{foo}{$lex}[$lex]: value ok 3467 - $vgbl{foo}{$lex}[$lex] = 123: no exception ok 3468 - $vgbl{foo}{$lex}[$lex] = 123: value ok 3469 - exists $vgbl{foo}{$lex}[$lex]: no exception ok 3470 - exists $vgbl{foo}{$lex}[$lex]: value ok 3471 - delete $vgbl{foo}{$lex}[$lex]: no exception ok 3472 - delete $vgbl{foo}{$lex}[$lex]: value ok 3473 - $vrlex->{foo}{$lex}[$lex]: no exception ok 3474 - $vrlex->{foo}{$lex}[$lex]: value ok 3475 - $vrlex->{foo}{$lex}[$lex] = 123: no exception ok 3476 - $vrlex->{foo}{$lex}[$lex] = 123: value ok 3477 - exists $vrlex->{foo}{$lex}[$lex]: no exception ok 3478 - exists $vrlex->{foo}{$lex}[$lex]: value ok 3479 - delete $vrlex->{foo}{$lex}[$lex]: no exception ok 3480 - delete $vrlex->{foo}{$lex}[$lex]: value ok 3481 - $vrgbl->{foo}{$lex}[$lex]: no exception ok 3482 - $vrgbl->{foo}{$lex}[$lex]: value ok 3483 - $vrgbl->{foo}{$lex}[$lex] = 123: no exception ok 3484 - $vrgbl->{foo}{$lex}[$lex] = 123: value ok 3485 - exists $vrgbl->{foo}{$lex}[$lex]: no exception ok 3486 - exists $vrgbl->{foo}{$lex}[$lex]: value ok 3487 - delete $vrgbl->{foo}{$lex}[$lex]: no exception ok 3488 - delete $vrgbl->{foo}{$lex}[$lex]: value ok 3489 - $vlex{$lex}{$lex}[$lex]: no exception ok 3490 - $vlex{$lex}{$lex}[$lex]: value ok 3491 - $vlex{$lex}{$lex}[$lex] = 123: no exception ok 3492 - $vlex{$lex}{$lex}[$lex] = 123: value ok 3493 - exists $vlex{$lex}{$lex}[$lex]: no exception ok 3494 - exists $vlex{$lex}{$lex}[$lex]: value ok 3495 - delete $vlex{$lex}{$lex}[$lex]: no exception ok 3496 - delete $vlex{$lex}{$lex}[$lex]: value ok 3497 - $vgbl{$lex}{$lex}[$lex]: no exception ok 3498 - $vgbl{$lex}{$lex}[$lex]: value ok 3499 - $vgbl{$lex}{$lex}[$lex] = 123: no exception ok 3500 - $vgbl{$lex}{$lex}[$lex] = 123: value ok 3501 - exists $vgbl{$lex}{$lex}[$lex]: no exception ok 3502 - exists $vgbl{$lex}{$lex}[$lex]: value ok 3503 - delete $vgbl{$lex}{$lex}[$lex]: no exception ok 3504 - delete $vgbl{$lex}{$lex}[$lex]: value ok 3505 - $vrlex->{$lex}{$lex}[$lex]: no exception ok 3506 - $vrlex->{$lex}{$lex}[$lex]: value ok 3507 - $vrlex->{$lex}{$lex}[$lex] = 123: no exception ok 3508 - $vrlex->{$lex}{$lex}[$lex] = 123: value ok 3509 - exists $vrlex->{$lex}{$lex}[$lex]: no exception ok 3510 - exists $vrlex->{$lex}{$lex}[$lex]: value ok 3511 - delete $vrlex->{$lex}{$lex}[$lex]: no exception ok 3512 - delete $vrlex->{$lex}{$lex}[$lex]: value ok 3513 - $vrgbl->{$lex}{$lex}[$lex]: no exception ok 3514 - $vrgbl->{$lex}{$lex}[$lex]: value ok 3515 - $vrgbl->{$lex}{$lex}[$lex] = 123: no exception ok 3516 - $vrgbl->{$lex}{$lex}[$lex] = 123: value ok 3517 - exists $vrgbl->{$lex}{$lex}[$lex]: no exception ok 3518 - exists $vrgbl->{$lex}{$lex}[$lex]: value ok 3519 - delete $vrgbl->{$lex}{$lex}[$lex]: no exception ok 3520 - delete $vrgbl->{$lex}{$lex}[$lex]: value ok 3521 - $vlex{$gbl}{$lex}[$lex]: no exception ok 3522 - $vlex{$gbl}{$lex}[$lex]: value ok 3523 - $vlex{$gbl}{$lex}[$lex] = 123: no exception ok 3524 - $vlex{$gbl}{$lex}[$lex] = 123: value ok 3525 - exists $vlex{$gbl}{$lex}[$lex]: no exception ok 3526 - exists $vlex{$gbl}{$lex}[$lex]: value ok 3527 - delete $vlex{$gbl}{$lex}[$lex]: no exception ok 3528 - delete $vlex{$gbl}{$lex}[$lex]: value ok 3529 - $vgbl{$gbl}{$lex}[$lex]: no exception ok 3530 - $vgbl{$gbl}{$lex}[$lex]: value ok 3531 - $vgbl{$gbl}{$lex}[$lex] = 123: no exception ok 3532 - $vgbl{$gbl}{$lex}[$lex] = 123: value ok 3533 - exists $vgbl{$gbl}{$lex}[$lex]: no exception ok 3534 - exists $vgbl{$gbl}{$lex}[$lex]: value ok 3535 - delete $vgbl{$gbl}{$lex}[$lex]: no exception ok 3536 - delete $vgbl{$gbl}{$lex}[$lex]: value ok 3537 - $vrlex->{$gbl}{$lex}[$lex]: no exception ok 3538 - $vrlex->{$gbl}{$lex}[$lex]: value ok 3539 - $vrlex->{$gbl}{$lex}[$lex] = 123: no exception ok 3540 - $vrlex->{$gbl}{$lex}[$lex] = 123: value ok 3541 - exists $vrlex->{$gbl}{$lex}[$lex]: no exception ok 3542 - exists $vrlex->{$gbl}{$lex}[$lex]: value ok 3543 - delete $vrlex->{$gbl}{$lex}[$lex]: no exception ok 3544 - delete $vrlex->{$gbl}{$lex}[$lex]: value ok 3545 - $vrgbl->{$gbl}{$lex}[$lex]: no exception ok 3546 - $vrgbl->{$gbl}{$lex}[$lex]: value ok 3547 - $vrgbl->{$gbl}{$lex}[$lex] = 123: no exception ok 3548 - $vrgbl->{$gbl}{$lex}[$lex] = 123: value ok 3549 - exists $vrgbl->{$gbl}{$lex}[$lex]: no exception ok 3550 - exists $vrgbl->{$gbl}{$lex}[$lex]: value ok 3551 - delete $vrgbl->{$gbl}{$lex}[$lex]: no exception ok 3552 - delete $vrgbl->{$gbl}{$lex}[$lex]: value ok 3553 - $vlex{"x$lex"}{$lex}[$lex]: no exception ok 3554 - $vlex{"x$lex"}{$lex}[$lex]: value ok 3555 - $vlex{"x$lex"}{$lex}[$lex] = 123: no exception ok 3556 - $vlex{"x$lex"}{$lex}[$lex] = 123: value ok 3557 - exists $vlex{"x$lex"}{$lex}[$lex]: no exception ok 3558 - exists $vlex{"x$lex"}{$lex}[$lex]: value ok 3559 - delete $vlex{"x$lex"}{$lex}[$lex]: no exception ok 3560 - delete $vlex{"x$lex"}{$lex}[$lex]: value ok 3561 - $vgbl{"x$lex"}{$lex}[$lex]: no exception ok 3562 - $vgbl{"x$lex"}{$lex}[$lex]: value ok 3563 - $vgbl{"x$lex"}{$lex}[$lex] = 123: no exception ok 3564 - $vgbl{"x$lex"}{$lex}[$lex] = 123: value ok 3565 - exists $vgbl{"x$lex"}{$lex}[$lex]: no exception ok 3566 - exists $vgbl{"x$lex"}{$lex}[$lex]: value ok 3567 - delete $vgbl{"x$lex"}{$lex}[$lex]: no exception ok 3568 - delete $vgbl{"x$lex"}{$lex}[$lex]: value ok 3569 - $vrlex->{"x$lex"}{$lex}[$lex]: no exception ok 3570 - $vrlex->{"x$lex"}{$lex}[$lex]: value ok 3571 - $vrlex->{"x$lex"}{$lex}[$lex] = 123: no exception ok 3572 - $vrlex->{"x$lex"}{$lex}[$lex] = 123: value ok 3573 - exists $vrlex->{"x$lex"}{$lex}[$lex]: no exception ok 3574 - exists $vrlex->{"x$lex"}{$lex}[$lex]: value ok 3575 - delete $vrlex->{"x$lex"}{$lex}[$lex]: no exception ok 3576 - delete $vrlex->{"x$lex"}{$lex}[$lex]: value ok 3577 - $vrgbl->{"x$lex"}{$lex}[$lex]: no exception ok 3578 - $vrgbl->{"x$lex"}{$lex}[$lex]: value ok 3579 - $vrgbl->{"x$lex"}{$lex}[$lex] = 123: no exception ok 3580 - $vrgbl->{"x$lex"}{$lex}[$lex] = 123: value ok 3581 - exists $vrgbl->{"x$lex"}{$lex}[$lex]: no exception ok 3582 - exists $vrgbl->{"x$lex"}{$lex}[$lex]: value ok 3583 - delete $vrgbl->{"x$lex"}{$lex}[$lex]: no exception ok 3584 - delete $vrgbl->{"x$lex"}{$lex}[$lex]: value ok 3585 - $vlex[0]{$gbl}[$lex]: no exception ok 3586 - $vlex[0]{$gbl}[$lex]: value ok 3587 - $vlex[0]{$gbl}[$lex] = 123: no exception ok 3588 - $vlex[0]{$gbl}[$lex] = 123: value ok 3589 - exists $vlex[0]{$gbl}[$lex]: no exception ok 3590 - exists $vlex[0]{$gbl}[$lex]: value ok 3591 - delete $vlex[0]{$gbl}[$lex]: no exception ok 3592 - delete $vlex[0]{$gbl}[$lex]: value ok 3593 - $vgbl[0]{$gbl}[$lex]: no exception ok 3594 - $vgbl[0]{$gbl}[$lex]: value ok 3595 - $vgbl[0]{$gbl}[$lex] = 123: no exception ok 3596 - $vgbl[0]{$gbl}[$lex] = 123: value ok 3597 - exists $vgbl[0]{$gbl}[$lex]: no exception ok 3598 - exists $vgbl[0]{$gbl}[$lex]: value ok 3599 - delete $vgbl[0]{$gbl}[$lex]: no exception ok 3600 - delete $vgbl[0]{$gbl}[$lex]: value ok 3601 - $vrlex->[0]{$gbl}[$lex]: no exception ok 3602 - $vrlex->[0]{$gbl}[$lex]: value ok 3603 - $vrlex->[0]{$gbl}[$lex] = 123: no exception ok 3604 - $vrlex->[0]{$gbl}[$lex] = 123: value ok 3605 - exists $vrlex->[0]{$gbl}[$lex]: no exception ok 3606 - exists $vrlex->[0]{$gbl}[$lex]: value ok 3607 - delete $vrlex->[0]{$gbl}[$lex]: no exception ok 3608 - delete $vrlex->[0]{$gbl}[$lex]: value ok 3609 - $vrgbl->[0]{$gbl}[$lex]: no exception ok 3610 - $vrgbl->[0]{$gbl}[$lex]: value ok 3611 - $vrgbl->[0]{$gbl}[$lex] = 123: no exception ok 3612 - $vrgbl->[0]{$gbl}[$lex] = 123: value ok 3613 - exists $vrgbl->[0]{$gbl}[$lex]: no exception ok 3614 - exists $vrgbl->[0]{$gbl}[$lex]: value ok 3615 - delete $vrgbl->[0]{$gbl}[$lex]: no exception ok 3616 - delete $vrgbl->[0]{$gbl}[$lex]: value ok 3617 - $vlex[$lex]{$gbl}[$lex]: no exception ok 3618 - $vlex[$lex]{$gbl}[$lex]: value ok 3619 - $vlex[$lex]{$gbl}[$lex] = 123: no exception ok 3620 - $vlex[$lex]{$gbl}[$lex] = 123: value ok 3621 - exists $vlex[$lex]{$gbl}[$lex]: no exception ok 3622 - exists $vlex[$lex]{$gbl}[$lex]: value ok 3623 - delete $vlex[$lex]{$gbl}[$lex]: no exception ok 3624 - delete $vlex[$lex]{$gbl}[$lex]: value ok 3625 - $vgbl[$lex]{$gbl}[$lex]: no exception ok 3626 - $vgbl[$lex]{$gbl}[$lex]: value ok 3627 - $vgbl[$lex]{$gbl}[$lex] = 123: no exception ok 3628 - $vgbl[$lex]{$gbl}[$lex] = 123: value ok 3629 - exists $vgbl[$lex]{$gbl}[$lex]: no exception ok 3630 - exists $vgbl[$lex]{$gbl}[$lex]: value ok 3631 - delete $vgbl[$lex]{$gbl}[$lex]: no exception ok 3632 - delete $vgbl[$lex]{$gbl}[$lex]: value ok 3633 - $vrlex->[$lex]{$gbl}[$lex]: no exception ok 3634 - $vrlex->[$lex]{$gbl}[$lex]: value ok 3635 - $vrlex->[$lex]{$gbl}[$lex] = 123: no exception ok 3636 - $vrlex->[$lex]{$gbl}[$lex] = 123: value ok 3637 - exists $vrlex->[$lex]{$gbl}[$lex]: no exception ok 3638 - exists $vrlex->[$lex]{$gbl}[$lex]: value ok 3639 - delete $vrlex->[$lex]{$gbl}[$lex]: no exception ok 3640 - delete $vrlex->[$lex]{$gbl}[$lex]: value ok 3641 - $vrgbl->[$lex]{$gbl}[$lex]: no exception ok 3642 - $vrgbl->[$lex]{$gbl}[$lex]: value ok 3643 - $vrgbl->[$lex]{$gbl}[$lex] = 123: no exception ok 3644 - $vrgbl->[$lex]{$gbl}[$lex] = 123: value ok 3645 - exists $vrgbl->[$lex]{$gbl}[$lex]: no exception ok 3646 - exists $vrgbl->[$lex]{$gbl}[$lex]: value ok 3647 - delete $vrgbl->[$lex]{$gbl}[$lex]: no exception ok 3648 - delete $vrgbl->[$lex]{$gbl}[$lex]: value ok 3649 - $vlex[$gbl]{$gbl}[$lex]: no exception ok 3650 - $vlex[$gbl]{$gbl}[$lex]: value ok 3651 - $vlex[$gbl]{$gbl}[$lex] = 123: no exception ok 3652 - $vlex[$gbl]{$gbl}[$lex] = 123: value ok 3653 - exists $vlex[$gbl]{$gbl}[$lex]: no exception ok 3654 - exists $vlex[$gbl]{$gbl}[$lex]: value ok 3655 - delete $vlex[$gbl]{$gbl}[$lex]: no exception ok 3656 - delete $vlex[$gbl]{$gbl}[$lex]: value ok 3657 - $vgbl[$gbl]{$gbl}[$lex]: no exception ok 3658 - $vgbl[$gbl]{$gbl}[$lex]: value ok 3659 - $vgbl[$gbl]{$gbl}[$lex] = 123: no exception ok 3660 - $vgbl[$gbl]{$gbl}[$lex] = 123: value ok 3661 - exists $vgbl[$gbl]{$gbl}[$lex]: no exception ok 3662 - exists $vgbl[$gbl]{$gbl}[$lex]: value ok 3663 - delete $vgbl[$gbl]{$gbl}[$lex]: no exception ok 3664 - delete $vgbl[$gbl]{$gbl}[$lex]: value ok 3665 - $vrlex->[$gbl]{$gbl}[$lex]: no exception ok 3666 - $vrlex->[$gbl]{$gbl}[$lex]: value ok 3667 - $vrlex->[$gbl]{$gbl}[$lex] = 123: no exception ok 3668 - $vrlex->[$gbl]{$gbl}[$lex] = 123: value ok 3669 - exists $vrlex->[$gbl]{$gbl}[$lex]: no exception ok 3670 - exists $vrlex->[$gbl]{$gbl}[$lex]: value ok 3671 - delete $vrlex->[$gbl]{$gbl}[$lex]: no exception ok 3672 - delete $vrlex->[$gbl]{$gbl}[$lex]: value ok 3673 - $vrgbl->[$gbl]{$gbl}[$lex]: no exception ok 3674 - $vrgbl->[$gbl]{$gbl}[$lex]: value ok 3675 - $vrgbl->[$gbl]{$gbl}[$lex] = 123: no exception ok 3676 - $vrgbl->[$gbl]{$gbl}[$lex] = 123: value ok 3677 - exists $vrgbl->[$gbl]{$gbl}[$lex]: no exception ok 3678 - exists $vrgbl->[$gbl]{$gbl}[$lex]: value ok 3679 - delete $vrgbl->[$gbl]{$gbl}[$lex]: no exception ok 3680 - delete $vrgbl->[$gbl]{$gbl}[$lex]: value ok 3681 - $vlex[$lex+1]{$gbl}[$lex]: no exception ok 3682 - $vlex[$lex+1]{$gbl}[$lex]: value ok 3683 - $vlex[$lex+1]{$gbl}[$lex] = 123: no exception ok 3684 - $vlex[$lex+1]{$gbl}[$lex] = 123: value ok 3685 - exists $vlex[$lex+1]{$gbl}[$lex]: no exception ok 3686 - exists $vlex[$lex+1]{$gbl}[$lex]: value ok 3687 - delete $vlex[$lex+1]{$gbl}[$lex]: no exception ok 3688 - delete $vlex[$lex+1]{$gbl}[$lex]: value ok 3689 - $vgbl[$lex+1]{$gbl}[$lex]: no exception ok 3690 - $vgbl[$lex+1]{$gbl}[$lex]: value ok 3691 - $vgbl[$lex+1]{$gbl}[$lex] = 123: no exception ok 3692 - $vgbl[$lex+1]{$gbl}[$lex] = 123: value ok 3693 - exists $vgbl[$lex+1]{$gbl}[$lex]: no exception ok 3694 - exists $vgbl[$lex+1]{$gbl}[$lex]: value ok 3695 - delete $vgbl[$lex+1]{$gbl}[$lex]: no exception ok 3696 - delete $vgbl[$lex+1]{$gbl}[$lex]: value ok 3697 - $vrlex->[$lex+1]{$gbl}[$lex]: no exception ok 3698 - $vrlex->[$lex+1]{$gbl}[$lex]: value ok 3699 - $vrlex->[$lex+1]{$gbl}[$lex] = 123: no exception ok 3700 - $vrlex->[$lex+1]{$gbl}[$lex] = 123: value ok 3701 - exists $vrlex->[$lex+1]{$gbl}[$lex]: no exception ok 3702 - exists $vrlex->[$lex+1]{$gbl}[$lex]: value ok 3703 - delete $vrlex->[$lex+1]{$gbl}[$lex]: no exception ok 3704 - delete $vrlex->[$lex+1]{$gbl}[$lex]: value ok 3705 - $vrgbl->[$lex+1]{$gbl}[$lex]: no exception ok 3706 - $vrgbl->[$lex+1]{$gbl}[$lex]: value ok 3707 - $vrgbl->[$lex+1]{$gbl}[$lex] = 123: no exception ok 3708 - $vrgbl->[$lex+1]{$gbl}[$lex] = 123: value ok 3709 - exists $vrgbl->[$lex+1]{$gbl}[$lex]: no exception ok 3710 - exists $vrgbl->[$lex+1]{$gbl}[$lex]: value ok 3711 - delete $vrgbl->[$lex+1]{$gbl}[$lex]: no exception ok 3712 - delete $vrgbl->[$lex+1]{$gbl}[$lex]: value ok 3713 - $vlex{foo}{$gbl}[$lex]: no exception ok 3714 - $vlex{foo}{$gbl}[$lex]: value ok 3715 - $vlex{foo}{$gbl}[$lex] = 123: no exception ok 3716 - $vlex{foo}{$gbl}[$lex] = 123: value ok 3717 - exists $vlex{foo}{$gbl}[$lex]: no exception ok 3718 - exists $vlex{foo}{$gbl}[$lex]: value ok 3719 - delete $vlex{foo}{$gbl}[$lex]: no exception ok 3720 - delete $vlex{foo}{$gbl}[$lex]: value ok 3721 - $vgbl{foo}{$gbl}[$lex]: no exception ok 3722 - $vgbl{foo}{$gbl}[$lex]: value ok 3723 - $vgbl{foo}{$gbl}[$lex] = 123: no exception ok 3724 - $vgbl{foo}{$gbl}[$lex] = 123: value ok 3725 - exists $vgbl{foo}{$gbl}[$lex]: no exception ok 3726 - exists $vgbl{foo}{$gbl}[$lex]: value ok 3727 - delete $vgbl{foo}{$gbl}[$lex]: no exception ok 3728 - delete $vgbl{foo}{$gbl}[$lex]: value ok 3729 - $vrlex->{foo}{$gbl}[$lex]: no exception ok 3730 - $vrlex->{foo}{$gbl}[$lex]: value ok 3731 - $vrlex->{foo}{$gbl}[$lex] = 123: no exception ok 3732 - $vrlex->{foo}{$gbl}[$lex] = 123: value ok 3733 - exists $vrlex->{foo}{$gbl}[$lex]: no exception ok 3734 - exists $vrlex->{foo}{$gbl}[$lex]: value ok 3735 - delete $vrlex->{foo}{$gbl}[$lex]: no exception ok 3736 - delete $vrlex->{foo}{$gbl}[$lex]: value ok 3737 - $vrgbl->{foo}{$gbl}[$lex]: no exception ok 3738 - $vrgbl->{foo}{$gbl}[$lex]: value ok 3739 - $vrgbl->{foo}{$gbl}[$lex] = 123: no exception ok 3740 - $vrgbl->{foo}{$gbl}[$lex] = 123: value ok 3741 - exists $vrgbl->{foo}{$gbl}[$lex]: no exception ok 3742 - exists $vrgbl->{foo}{$gbl}[$lex]: value ok 3743 - delete $vrgbl->{foo}{$gbl}[$lex]: no exception ok 3744 - delete $vrgbl->{foo}{$gbl}[$lex]: value ok 3745 - $vlex{$lex}{$gbl}[$lex]: no exception ok 3746 - $vlex{$lex}{$gbl}[$lex]: value ok 3747 - $vlex{$lex}{$gbl}[$lex] = 123: no exception ok 3748 - $vlex{$lex}{$gbl}[$lex] = 123: value ok 3749 - exists $vlex{$lex}{$gbl}[$lex]: no exception ok 3750 - exists $vlex{$lex}{$gbl}[$lex]: value ok 3751 - delete $vlex{$lex}{$gbl}[$lex]: no exception ok 3752 - delete $vlex{$lex}{$gbl}[$lex]: value ok 3753 - $vgbl{$lex}{$gbl}[$lex]: no exception ok 3754 - $vgbl{$lex}{$gbl}[$lex]: value ok 3755 - $vgbl{$lex}{$gbl}[$lex] = 123: no exception ok 3756 - $vgbl{$lex}{$gbl}[$lex] = 123: value ok 3757 - exists $vgbl{$lex}{$gbl}[$lex]: no exception ok 3758 - exists $vgbl{$lex}{$gbl}[$lex]: value ok 3759 - delete $vgbl{$lex}{$gbl}[$lex]: no exception ok 3760 - delete $vgbl{$lex}{$gbl}[$lex]: value ok 3761 - $vrlex->{$lex}{$gbl}[$lex]: no exception ok 3762 - $vrlex->{$lex}{$gbl}[$lex]: value ok 3763 - $vrlex->{$lex}{$gbl}[$lex] = 123: no exception ok 3764 - $vrlex->{$lex}{$gbl}[$lex] = 123: value ok 3765 - exists $vrlex->{$lex}{$gbl}[$lex]: no exception ok 3766 - exists $vrlex->{$lex}{$gbl}[$lex]: value ok 3767 - delete $vrlex->{$lex}{$gbl}[$lex]: no exception ok 3768 - delete $vrlex->{$lex}{$gbl}[$lex]: value ok 3769 - $vrgbl->{$lex}{$gbl}[$lex]: no exception ok 3770 - $vrgbl->{$lex}{$gbl}[$lex]: value ok 3771 - $vrgbl->{$lex}{$gbl}[$lex] = 123: no exception ok 3772 - $vrgbl->{$lex}{$gbl}[$lex] = 123: value ok 3773 - exists $vrgbl->{$lex}{$gbl}[$lex]: no exception ok 3774 - exists $vrgbl->{$lex}{$gbl}[$lex]: value ok 3775 - delete $vrgbl->{$lex}{$gbl}[$lex]: no exception ok 3776 - delete $vrgbl->{$lex}{$gbl}[$lex]: value ok 3777 - $vlex{$gbl}{$gbl}[$lex]: no exception ok 3778 - $vlex{$gbl}{$gbl}[$lex]: value ok 3779 - $vlex{$gbl}{$gbl}[$lex] = 123: no exception ok 3780 - $vlex{$gbl}{$gbl}[$lex] = 123: value ok 3781 - exists $vlex{$gbl}{$gbl}[$lex]: no exception ok 3782 - exists $vlex{$gbl}{$gbl}[$lex]: value ok 3783 - delete $vlex{$gbl}{$gbl}[$lex]: no exception ok 3784 - delete $vlex{$gbl}{$gbl}[$lex]: value ok 3785 - $vgbl{$gbl}{$gbl}[$lex]: no exception ok 3786 - $vgbl{$gbl}{$gbl}[$lex]: value ok 3787 - $vgbl{$gbl}{$gbl}[$lex] = 123: no exception ok 3788 - $vgbl{$gbl}{$gbl}[$lex] = 123: value ok 3789 - exists $vgbl{$gbl}{$gbl}[$lex]: no exception ok 3790 - exists $vgbl{$gbl}{$gbl}[$lex]: value ok 3791 - delete $vgbl{$gbl}{$gbl}[$lex]: no exception ok 3792 - delete $vgbl{$gbl}{$gbl}[$lex]: value ok 3793 - $vrlex->{$gbl}{$gbl}[$lex]: no exception ok 3794 - $vrlex->{$gbl}{$gbl}[$lex]: value ok 3795 - $vrlex->{$gbl}{$gbl}[$lex] = 123: no exception ok 3796 - $vrlex->{$gbl}{$gbl}[$lex] = 123: value ok 3797 - exists $vrlex->{$gbl}{$gbl}[$lex]: no exception ok 3798 - exists $vrlex->{$gbl}{$gbl}[$lex]: value ok 3799 - delete $vrlex->{$gbl}{$gbl}[$lex]: no exception ok 3800 - delete $vrlex->{$gbl}{$gbl}[$lex]: value ok 3801 - $vrgbl->{$gbl}{$gbl}[$lex]: no exception ok 3802 - $vrgbl->{$gbl}{$gbl}[$lex]: value ok 3803 - $vrgbl->{$gbl}{$gbl}[$lex] = 123: no exception ok 3804 - $vrgbl->{$gbl}{$gbl}[$lex] = 123: value ok 3805 - exists $vrgbl->{$gbl}{$gbl}[$lex]: no exception ok 3806 - exists $vrgbl->{$gbl}{$gbl}[$lex]: value ok 3807 - delete $vrgbl->{$gbl}{$gbl}[$lex]: no exception ok 3808 - delete $vrgbl->{$gbl}{$gbl}[$lex]: value ok 3809 - $vlex{"x$lex"}{$gbl}[$lex]: no exception ok 3810 - $vlex{"x$lex"}{$gbl}[$lex]: value ok 3811 - $vlex{"x$lex"}{$gbl}[$lex] = 123: no exception ok 3812 - $vlex{"x$lex"}{$gbl}[$lex] = 123: value ok 3813 - exists $vlex{"x$lex"}{$gbl}[$lex]: no exception ok 3814 - exists $vlex{"x$lex"}{$gbl}[$lex]: value ok 3815 - delete $vlex{"x$lex"}{$gbl}[$lex]: no exception ok 3816 - delete $vlex{"x$lex"}{$gbl}[$lex]: value ok 3817 - $vgbl{"x$lex"}{$gbl}[$lex]: no exception ok 3818 - $vgbl{"x$lex"}{$gbl}[$lex]: value ok 3819 - $vgbl{"x$lex"}{$gbl}[$lex] = 123: no exception ok 3820 - $vgbl{"x$lex"}{$gbl}[$lex] = 123: value ok 3821 - exists $vgbl{"x$lex"}{$gbl}[$lex]: no exception ok 3822 - exists $vgbl{"x$lex"}{$gbl}[$lex]: value ok 3823 - delete $vgbl{"x$lex"}{$gbl}[$lex]: no exception ok 3824 - delete $vgbl{"x$lex"}{$gbl}[$lex]: value ok 3825 - $vrlex->{"x$lex"}{$gbl}[$lex]: no exception ok 3826 - $vrlex->{"x$lex"}{$gbl}[$lex]: value ok 3827 - $vrlex->{"x$lex"}{$gbl}[$lex] = 123: no exception ok 3828 - $vrlex->{"x$lex"}{$gbl}[$lex] = 123: value ok 3829 - exists $vrlex->{"x$lex"}{$gbl}[$lex]: no exception ok 3830 - exists $vrlex->{"x$lex"}{$gbl}[$lex]: value ok 3831 - delete $vrlex->{"x$lex"}{$gbl}[$lex]: no exception ok 3832 - delete $vrlex->{"x$lex"}{$gbl}[$lex]: value ok 3833 - $vrgbl->{"x$lex"}{$gbl}[$lex]: no exception ok 3834 - $vrgbl->{"x$lex"}{$gbl}[$lex]: value ok 3835 - $vrgbl->{"x$lex"}{$gbl}[$lex] = 123: no exception ok 3836 - $vrgbl->{"x$lex"}{$gbl}[$lex] = 123: value ok 3837 - exists $vrgbl->{"x$lex"}{$gbl}[$lex]: no exception ok 3838 - exists $vrgbl->{"x$lex"}{$gbl}[$lex]: value ok 3839 - delete $vrgbl->{"x$lex"}{$gbl}[$lex]: no exception ok 3840 - delete $vrgbl->{"x$lex"}{$gbl}[$lex]: value ok 3841 - $vlex[0]{"x$lex"}[$lex]: no exception ok 3842 - $vlex[0]{"x$lex"}[$lex]: value ok 3843 - $vlex[0]{"x$lex"}[$lex] = 123: no exception ok 3844 - $vlex[0]{"x$lex"}[$lex] = 123: value ok 3845 - exists $vlex[0]{"x$lex"}[$lex]: no exception ok 3846 - exists $vlex[0]{"x$lex"}[$lex]: value ok 3847 - delete $vlex[0]{"x$lex"}[$lex]: no exception ok 3848 - delete $vlex[0]{"x$lex"}[$lex]: value ok 3849 - $vgbl[0]{"x$lex"}[$lex]: no exception ok 3850 - $vgbl[0]{"x$lex"}[$lex]: value ok 3851 - $vgbl[0]{"x$lex"}[$lex] = 123: no exception ok 3852 - $vgbl[0]{"x$lex"}[$lex] = 123: value ok 3853 - exists $vgbl[0]{"x$lex"}[$lex]: no exception ok 3854 - exists $vgbl[0]{"x$lex"}[$lex]: value ok 3855 - delete $vgbl[0]{"x$lex"}[$lex]: no exception ok 3856 - delete $vgbl[0]{"x$lex"}[$lex]: value ok 3857 - $vrlex->[0]{"x$lex"}[$lex]: no exception ok 3858 - $vrlex->[0]{"x$lex"}[$lex]: value ok 3859 - $vrlex->[0]{"x$lex"}[$lex] = 123: no exception ok 3860 - $vrlex->[0]{"x$lex"}[$lex] = 123: value ok 3861 - exists $vrlex->[0]{"x$lex"}[$lex]: no exception ok 3862 - exists $vrlex->[0]{"x$lex"}[$lex]: value ok 3863 - delete $vrlex->[0]{"x$lex"}[$lex]: no exception ok 3864 - delete $vrlex->[0]{"x$lex"}[$lex]: value ok 3865 - $vrgbl->[0]{"x$lex"}[$lex]: no exception ok 3866 - $vrgbl->[0]{"x$lex"}[$lex]: value ok 3867 - $vrgbl->[0]{"x$lex"}[$lex] = 123: no exception ok 3868 - $vrgbl->[0]{"x$lex"}[$lex] = 123: value ok 3869 - exists $vrgbl->[0]{"x$lex"}[$lex]: no exception ok 3870 - exists $vrgbl->[0]{"x$lex"}[$lex]: value ok 3871 - delete $vrgbl->[0]{"x$lex"}[$lex]: no exception ok 3872 - delete $vrgbl->[0]{"x$lex"}[$lex]: value ok 3873 - $vlex[$lex]{"x$lex"}[$lex]: no exception ok 3874 - $vlex[$lex]{"x$lex"}[$lex]: value ok 3875 - $vlex[$lex]{"x$lex"}[$lex] = 123: no exception ok 3876 - $vlex[$lex]{"x$lex"}[$lex] = 123: value ok 3877 - exists $vlex[$lex]{"x$lex"}[$lex]: no exception ok 3878 - exists $vlex[$lex]{"x$lex"}[$lex]: value ok 3879 - delete $vlex[$lex]{"x$lex"}[$lex]: no exception ok 3880 - delete $vlex[$lex]{"x$lex"}[$lex]: value ok 3881 - $vgbl[$lex]{"x$lex"}[$lex]: no exception ok 3882 - $vgbl[$lex]{"x$lex"}[$lex]: value ok 3883 - $vgbl[$lex]{"x$lex"}[$lex] = 123: no exception ok 3884 - $vgbl[$lex]{"x$lex"}[$lex] = 123: value ok 3885 - exists $vgbl[$lex]{"x$lex"}[$lex]: no exception ok 3886 - exists $vgbl[$lex]{"x$lex"}[$lex]: value ok 3887 - delete $vgbl[$lex]{"x$lex"}[$lex]: no exception ok 3888 - delete $vgbl[$lex]{"x$lex"}[$lex]: value ok 3889 - $vrlex->[$lex]{"x$lex"}[$lex]: no exception ok 3890 - $vrlex->[$lex]{"x$lex"}[$lex]: value ok 3891 - $vrlex->[$lex]{"x$lex"}[$lex] = 123: no exception ok 3892 - $vrlex->[$lex]{"x$lex"}[$lex] = 123: value ok 3893 - exists $vrlex->[$lex]{"x$lex"}[$lex]: no exception ok 3894 - exists $vrlex->[$lex]{"x$lex"}[$lex]: value ok 3895 - delete $vrlex->[$lex]{"x$lex"}[$lex]: no exception ok 3896 - delete $vrlex->[$lex]{"x$lex"}[$lex]: value ok 3897 - $vrgbl->[$lex]{"x$lex"}[$lex]: no exception ok 3898 - $vrgbl->[$lex]{"x$lex"}[$lex]: value ok 3899 - $vrgbl->[$lex]{"x$lex"}[$lex] = 123: no exception ok 3900 - $vrgbl->[$lex]{"x$lex"}[$lex] = 123: value ok 3901 - exists $vrgbl->[$lex]{"x$lex"}[$lex]: no exception ok 3902 - exists $vrgbl->[$lex]{"x$lex"}[$lex]: value ok 3903 - delete $vrgbl->[$lex]{"x$lex"}[$lex]: no exception ok 3904 - delete $vrgbl->[$lex]{"x$lex"}[$lex]: value ok 3905 - $vlex[$gbl]{"x$lex"}[$lex]: no exception ok 3906 - $vlex[$gbl]{"x$lex"}[$lex]: value ok 3907 - $vlex[$gbl]{"x$lex"}[$lex] = 123: no exception ok 3908 - $vlex[$gbl]{"x$lex"}[$lex] = 123: value ok 3909 - exists $vlex[$gbl]{"x$lex"}[$lex]: no exception ok 3910 - exists $vlex[$gbl]{"x$lex"}[$lex]: value ok 3911 - delete $vlex[$gbl]{"x$lex"}[$lex]: no exception ok 3912 - delete $vlex[$gbl]{"x$lex"}[$lex]: value ok 3913 - $vgbl[$gbl]{"x$lex"}[$lex]: no exception ok 3914 - $vgbl[$gbl]{"x$lex"}[$lex]: value ok 3915 - $vgbl[$gbl]{"x$lex"}[$lex] = 123: no exception ok 3916 - $vgbl[$gbl]{"x$lex"}[$lex] = 123: value ok 3917 - exists $vgbl[$gbl]{"x$lex"}[$lex]: no exception ok 3918 - exists $vgbl[$gbl]{"x$lex"}[$lex]: value ok 3919 - delete $vgbl[$gbl]{"x$lex"}[$lex]: no exception ok 3920 - delete $vgbl[$gbl]{"x$lex"}[$lex]: value ok 3921 - $vrlex->[$gbl]{"x$lex"}[$lex]: no exception ok 3922 - $vrlex->[$gbl]{"x$lex"}[$lex]: value ok 3923 - $vrlex->[$gbl]{"x$lex"}[$lex] = 123: no exception ok 3924 - $vrlex->[$gbl]{"x$lex"}[$lex] = 123: value ok 3925 - exists $vrlex->[$gbl]{"x$lex"}[$lex]: no exception ok 3926 - exists $vrlex->[$gbl]{"x$lex"}[$lex]: value ok 3927 - delete $vrlex->[$gbl]{"x$lex"}[$lex]: no exception ok 3928 - delete $vrlex->[$gbl]{"x$lex"}[$lex]: value ok 3929 - $vrgbl->[$gbl]{"x$lex"}[$lex]: no exception ok 3930 - $vrgbl->[$gbl]{"x$lex"}[$lex]: value ok 3931 - $vrgbl->[$gbl]{"x$lex"}[$lex] = 123: no exception ok 3932 - $vrgbl->[$gbl]{"x$lex"}[$lex] = 123: value ok 3933 - exists $vrgbl->[$gbl]{"x$lex"}[$lex]: no exception ok 3934 - exists $vrgbl->[$gbl]{"x$lex"}[$lex]: value ok 3935 - delete $vrgbl->[$gbl]{"x$lex"}[$lex]: no exception ok 3936 - delete $vrgbl->[$gbl]{"x$lex"}[$lex]: value ok 3937 - $vlex[$lex+1]{"x$lex"}[$lex]: no exception ok 3938 - $vlex[$lex+1]{"x$lex"}[$lex]: value ok 3939 - $vlex[$lex+1]{"x$lex"}[$lex] = 123: no exception ok 3940 - $vlex[$lex+1]{"x$lex"}[$lex] = 123: value ok 3941 - exists $vlex[$lex+1]{"x$lex"}[$lex]: no exception ok 3942 - exists $vlex[$lex+1]{"x$lex"}[$lex]: value ok 3943 - delete $vlex[$lex+1]{"x$lex"}[$lex]: no exception ok 3944 - delete $vlex[$lex+1]{"x$lex"}[$lex]: value ok 3945 - $vgbl[$lex+1]{"x$lex"}[$lex]: no exception ok 3946 - $vgbl[$lex+1]{"x$lex"}[$lex]: value ok 3947 - $vgbl[$lex+1]{"x$lex"}[$lex] = 123: no exception ok 3948 - $vgbl[$lex+1]{"x$lex"}[$lex] = 123: value ok 3949 - exists $vgbl[$lex+1]{"x$lex"}[$lex]: no exception ok 3950 - exists $vgbl[$lex+1]{"x$lex"}[$lex]: value ok 3951 - delete $vgbl[$lex+1]{"x$lex"}[$lex]: no exception ok 3952 - delete $vgbl[$lex+1]{"x$lex"}[$lex]: value ok 3953 - $vrlex->[$lex+1]{"x$lex"}[$lex]: no exception ok 3954 - $vrlex->[$lex+1]{"x$lex"}[$lex]: value ok 3955 - $vrlex->[$lex+1]{"x$lex"}[$lex] = 123: no exception ok 3956 - $vrlex->[$lex+1]{"x$lex"}[$lex] = 123: value ok 3957 - exists $vrlex->[$lex+1]{"x$lex"}[$lex]: no exception ok 3958 - exists $vrlex->[$lex+1]{"x$lex"}[$lex]: value ok 3959 - delete $vrlex->[$lex+1]{"x$lex"}[$lex]: no exception ok 3960 - delete $vrlex->[$lex+1]{"x$lex"}[$lex]: value ok 3961 - $vrgbl->[$lex+1]{"x$lex"}[$lex]: no exception ok 3962 - $vrgbl->[$lex+1]{"x$lex"}[$lex]: value ok 3963 - $vrgbl->[$lex+1]{"x$lex"}[$lex] = 123: no exception ok 3964 - $vrgbl->[$lex+1]{"x$lex"}[$lex] = 123: value ok 3965 - exists $vrgbl->[$lex+1]{"x$lex"}[$lex]: no exception ok 3966 - exists $vrgbl->[$lex+1]{"x$lex"}[$lex]: value ok 3967 - delete $vrgbl->[$lex+1]{"x$lex"}[$lex]: no exception ok 3968 - delete $vrgbl->[$lex+1]{"x$lex"}[$lex]: value ok 3969 - $vlex{foo}{"x$lex"}[$lex]: no exception ok 3970 - $vlex{foo}{"x$lex"}[$lex]: value ok 3971 - $vlex{foo}{"x$lex"}[$lex] = 123: no exception ok 3972 - $vlex{foo}{"x$lex"}[$lex] = 123: value ok 3973 - exists $vlex{foo}{"x$lex"}[$lex]: no exception ok 3974 - exists $vlex{foo}{"x$lex"}[$lex]: value ok 3975 - delete $vlex{foo}{"x$lex"}[$lex]: no exception ok 3976 - delete $vlex{foo}{"x$lex"}[$lex]: value ok 3977 - $vgbl{foo}{"x$lex"}[$lex]: no exception ok 3978 - $vgbl{foo}{"x$lex"}[$lex]: value ok 3979 - $vgbl{foo}{"x$lex"}[$lex] = 123: no exception ok 3980 - $vgbl{foo}{"x$lex"}[$lex] = 123: value ok 3981 - exists $vgbl{foo}{"x$lex"}[$lex]: no exception ok 3982 - exists $vgbl{foo}{"x$lex"}[$lex]: value ok 3983 - delete $vgbl{foo}{"x$lex"}[$lex]: no exception ok 3984 - delete $vgbl{foo}{"x$lex"}[$lex]: value ok 3985 - $vrlex->{foo}{"x$lex"}[$lex]: no exception ok 3986 - $vrlex->{foo}{"x$lex"}[$lex]: value ok 3987 - $vrlex->{foo}{"x$lex"}[$lex] = 123: no exception ok 3988 - $vrlex->{foo}{"x$lex"}[$lex] = 123: value ok 3989 - exists $vrlex->{foo}{"x$lex"}[$lex]: no exception ok 3990 - exists $vrlex->{foo}{"x$lex"}[$lex]: value ok 3991 - delete $vrlex->{foo}{"x$lex"}[$lex]: no exception ok 3992 - delete $vrlex->{foo}{"x$lex"}[$lex]: value ok 3993 - $vrgbl->{foo}{"x$lex"}[$lex]: no exception ok 3994 - $vrgbl->{foo}{"x$lex"}[$lex]: value ok 3995 - $vrgbl->{foo}{"x$lex"}[$lex] = 123: no exception ok 3996 - $vrgbl->{foo}{"x$lex"}[$lex] = 123: value ok 3997 - exists $vrgbl->{foo}{"x$lex"}[$lex]: no exception ok 3998 - exists $vrgbl->{foo}{"x$lex"}[$lex]: value ok 3999 - delete $vrgbl->{foo}{"x$lex"}[$lex]: no exception ok 4000 - delete $vrgbl->{foo}{"x$lex"}[$lex]: value ok 4001 - $vlex{$lex}{"x$lex"}[$lex]: no exception ok 4002 - $vlex{$lex}{"x$lex"}[$lex]: value ok 4003 - $vlex{$lex}{"x$lex"}[$lex] = 123: no exception ok 4004 - $vlex{$lex}{"x$lex"}[$lex] = 123: value ok 4005 - exists $vlex{$lex}{"x$lex"}[$lex]: no exception ok 4006 - exists $vlex{$lex}{"x$lex"}[$lex]: value ok 4007 - delete $vlex{$lex}{"x$lex"}[$lex]: no exception ok 4008 - delete $vlex{$lex}{"x$lex"}[$lex]: value ok 4009 - $vgbl{$lex}{"x$lex"}[$lex]: no exception ok 4010 - $vgbl{$lex}{"x$lex"}[$lex]: value ok 4011 - $vgbl{$lex}{"x$lex"}[$lex] = 123: no exception ok 4012 - $vgbl{$lex}{"x$lex"}[$lex] = 123: value ok 4013 - exists $vgbl{$lex}{"x$lex"}[$lex]: no exception ok 4014 - exists $vgbl{$lex}{"x$lex"}[$lex]: value ok 4015 - delete $vgbl{$lex}{"x$lex"}[$lex]: no exception ok 4016 - delete $vgbl{$lex}{"x$lex"}[$lex]: value ok 4017 - $vrlex->{$lex}{"x$lex"}[$lex]: no exception ok 4018 - $vrlex->{$lex}{"x$lex"}[$lex]: value ok 4019 - $vrlex->{$lex}{"x$lex"}[$lex] = 123: no exception ok 4020 - $vrlex->{$lex}{"x$lex"}[$lex] = 123: value ok 4021 - exists $vrlex->{$lex}{"x$lex"}[$lex]: no exception ok 4022 - exists $vrlex->{$lex}{"x$lex"}[$lex]: value ok 4023 - delete $vrlex->{$lex}{"x$lex"}[$lex]: no exception ok 4024 - delete $vrlex->{$lex}{"x$lex"}[$lex]: value ok 4025 - $vrgbl->{$lex}{"x$lex"}[$lex]: no exception ok 4026 - $vrgbl->{$lex}{"x$lex"}[$lex]: value ok 4027 - $vrgbl->{$lex}{"x$lex"}[$lex] = 123: no exception ok 4028 - $vrgbl->{$lex}{"x$lex"}[$lex] = 123: value ok 4029 - exists $vrgbl->{$lex}{"x$lex"}[$lex]: no exception ok 4030 - exists $vrgbl->{$lex}{"x$lex"}[$lex]: value ok 4031 - delete $vrgbl->{$lex}{"x$lex"}[$lex]: no exception ok 4032 - delete $vrgbl->{$lex}{"x$lex"}[$lex]: value ok 4033 - $vlex{$gbl}{"x$lex"}[$lex]: no exception ok 4034 - $vlex{$gbl}{"x$lex"}[$lex]: value ok 4035 - $vlex{$gbl}{"x$lex"}[$lex] = 123: no exception ok 4036 - $vlex{$gbl}{"x$lex"}[$lex] = 123: value ok 4037 - exists $vlex{$gbl}{"x$lex"}[$lex]: no exception ok 4038 - exists $vlex{$gbl}{"x$lex"}[$lex]: value ok 4039 - delete $vlex{$gbl}{"x$lex"}[$lex]: no exception ok 4040 - delete $vlex{$gbl}{"x$lex"}[$lex]: value ok 4041 - $vgbl{$gbl}{"x$lex"}[$lex]: no exception ok 4042 - $vgbl{$gbl}{"x$lex"}[$lex]: value ok 4043 - $vgbl{$gbl}{"x$lex"}[$lex] = 123: no exception ok 4044 - $vgbl{$gbl}{"x$lex"}[$lex] = 123: value ok 4045 - exists $vgbl{$gbl}{"x$lex"}[$lex]: no exception ok 4046 - exists $vgbl{$gbl}{"x$lex"}[$lex]: value ok 4047 - delete $vgbl{$gbl}{"x$lex"}[$lex]: no exception ok 4048 - delete $vgbl{$gbl}{"x$lex"}[$lex]: value ok 4049 - $vrlex->{$gbl}{"x$lex"}[$lex]: no exception ok 4050 - $vrlex->{$gbl}{"x$lex"}[$lex]: value ok 4051 - $vrlex->{$gbl}{"x$lex"}[$lex] = 123: no exception ok 4052 - $vrlex->{$gbl}{"x$lex"}[$lex] = 123: value ok 4053 - exists $vrlex->{$gbl}{"x$lex"}[$lex]: no exception ok 4054 - exists $vrlex->{$gbl}{"x$lex"}[$lex]: value ok 4055 - delete $vrlex->{$gbl}{"x$lex"}[$lex]: no exception ok 4056 - delete $vrlex->{$gbl}{"x$lex"}[$lex]: value ok 4057 - $vrgbl->{$gbl}{"x$lex"}[$lex]: no exception ok 4058 - $vrgbl->{$gbl}{"x$lex"}[$lex]: value ok 4059 - $vrgbl->{$gbl}{"x$lex"}[$lex] = 123: no exception ok 4060 - $vrgbl->{$gbl}{"x$lex"}[$lex] = 123: value ok 4061 - exists $vrgbl->{$gbl}{"x$lex"}[$lex]: no exception ok 4062 - exists $vrgbl->{$gbl}{"x$lex"}[$lex]: value ok 4063 - delete $vrgbl->{$gbl}{"x$lex"}[$lex]: no exception ok 4064 - delete $vrgbl->{$gbl}{"x$lex"}[$lex]: value ok 4065 - $vlex{"x$lex"}{"x$lex"}[$lex]: no exception ok 4066 - $vlex{"x$lex"}{"x$lex"}[$lex]: value ok 4067 - $vlex{"x$lex"}{"x$lex"}[$lex] = 123: no exception ok 4068 - $vlex{"x$lex"}{"x$lex"}[$lex] = 123: value ok 4069 - exists $vlex{"x$lex"}{"x$lex"}[$lex]: no exception ok 4070 - exists $vlex{"x$lex"}{"x$lex"}[$lex]: value ok 4071 - delete $vlex{"x$lex"}{"x$lex"}[$lex]: no exception ok 4072 - delete $vlex{"x$lex"}{"x$lex"}[$lex]: value ok 4073 - $vgbl{"x$lex"}{"x$lex"}[$lex]: no exception ok 4074 - $vgbl{"x$lex"}{"x$lex"}[$lex]: value ok 4075 - $vgbl{"x$lex"}{"x$lex"}[$lex] = 123: no exception ok 4076 - $vgbl{"x$lex"}{"x$lex"}[$lex] = 123: value ok 4077 - exists $vgbl{"x$lex"}{"x$lex"}[$lex]: no exception ok 4078 - exists $vgbl{"x$lex"}{"x$lex"}[$lex]: value ok 4079 - delete $vgbl{"x$lex"}{"x$lex"}[$lex]: no exception ok 4080 - delete $vgbl{"x$lex"}{"x$lex"}[$lex]: value ok 4081 - $vrlex->{"x$lex"}{"x$lex"}[$lex]: no exception ok 4082 - $vrlex->{"x$lex"}{"x$lex"}[$lex]: value ok 4083 - $vrlex->{"x$lex"}{"x$lex"}[$lex] = 123: no exception ok 4084 - $vrlex->{"x$lex"}{"x$lex"}[$lex] = 123: value ok 4085 - exists $vrlex->{"x$lex"}{"x$lex"}[$lex]: no exception ok 4086 - exists $vrlex->{"x$lex"}{"x$lex"}[$lex]: value ok 4087 - delete $vrlex->{"x$lex"}{"x$lex"}[$lex]: no exception ok 4088 - delete $vrlex->{"x$lex"}{"x$lex"}[$lex]: value ok 4089 - $vrgbl->{"x$lex"}{"x$lex"}[$lex]: no exception ok 4090 - $vrgbl->{"x$lex"}{"x$lex"}[$lex]: value ok 4091 - $vrgbl->{"x$lex"}{"x$lex"}[$lex] = 123: no exception ok 4092 - $vrgbl->{"x$lex"}{"x$lex"}[$lex] = 123: value ok 4093 - exists $vrgbl->{"x$lex"}{"x$lex"}[$lex]: no exception ok 4094 - exists $vrgbl->{"x$lex"}{"x$lex"}[$lex]: value ok 4095 - delete $vrgbl->{"x$lex"}{"x$lex"}[$lex]: no exception ok 4096 - delete $vrgbl->{"x$lex"}{"x$lex"}[$lex]: value ok 4097 - $vlex[0][0][$gbl]: no exception ok 4098 - $vlex[0][0][$gbl]: value ok 4099 - $vlex[0][0][$gbl] = 123: no exception ok 4100 - $vlex[0][0][$gbl] = 123: value ok 4101 - exists $vlex[0][0][$gbl]: no exception ok 4102 - exists $vlex[0][0][$gbl]: value ok 4103 - delete $vlex[0][0][$gbl]: no exception ok 4104 - delete $vlex[0][0][$gbl]: value ok 4105 - $vgbl[0][0][$gbl]: no exception ok 4106 - $vgbl[0][0][$gbl]: value ok 4107 - $vgbl[0][0][$gbl] = 123: no exception ok 4108 - $vgbl[0][0][$gbl] = 123: value ok 4109 - exists $vgbl[0][0][$gbl]: no exception ok 4110 - exists $vgbl[0][0][$gbl]: value ok 4111 - delete $vgbl[0][0][$gbl]: no exception ok 4112 - delete $vgbl[0][0][$gbl]: value ok 4113 - $vrlex->[0][0][$gbl]: no exception ok 4114 - $vrlex->[0][0][$gbl]: value ok 4115 - $vrlex->[0][0][$gbl] = 123: no exception ok 4116 - $vrlex->[0][0][$gbl] = 123: value ok 4117 - exists $vrlex->[0][0][$gbl]: no exception ok 4118 - exists $vrlex->[0][0][$gbl]: value ok 4119 - delete $vrlex->[0][0][$gbl]: no exception ok 4120 - delete $vrlex->[0][0][$gbl]: value ok 4121 - $vrgbl->[0][0][$gbl]: no exception ok 4122 - $vrgbl->[0][0][$gbl]: value ok 4123 - $vrgbl->[0][0][$gbl] = 123: no exception ok 4124 - $vrgbl->[0][0][$gbl] = 123: value ok 4125 - exists $vrgbl->[0][0][$gbl]: no exception ok 4126 - exists $vrgbl->[0][0][$gbl]: value ok 4127 - delete $vrgbl->[0][0][$gbl]: no exception ok 4128 - delete $vrgbl->[0][0][$gbl]: value ok 4129 - $vlex[$lex][0][$gbl]: no exception ok 4130 - $vlex[$lex][0][$gbl]: value ok 4131 - $vlex[$lex][0][$gbl] = 123: no exception ok 4132 - $vlex[$lex][0][$gbl] = 123: value ok 4133 - exists $vlex[$lex][0][$gbl]: no exception ok 4134 - exists $vlex[$lex][0][$gbl]: value ok 4135 - delete $vlex[$lex][0][$gbl]: no exception ok 4136 - delete $vlex[$lex][0][$gbl]: value ok 4137 - $vgbl[$lex][0][$gbl]: no exception ok 4138 - $vgbl[$lex][0][$gbl]: value ok 4139 - $vgbl[$lex][0][$gbl] = 123: no exception ok 4140 - $vgbl[$lex][0][$gbl] = 123: value ok 4141 - exists $vgbl[$lex][0][$gbl]: no exception ok 4142 - exists $vgbl[$lex][0][$gbl]: value ok 4143 - delete $vgbl[$lex][0][$gbl]: no exception ok 4144 - delete $vgbl[$lex][0][$gbl]: value ok 4145 - $vrlex->[$lex][0][$gbl]: no exception ok 4146 - $vrlex->[$lex][0][$gbl]: value ok 4147 - $vrlex->[$lex][0][$gbl] = 123: no exception ok 4148 - $vrlex->[$lex][0][$gbl] = 123: value ok 4149 - exists $vrlex->[$lex][0][$gbl]: no exception ok 4150 - exists $vrlex->[$lex][0][$gbl]: value ok 4151 - delete $vrlex->[$lex][0][$gbl]: no exception ok 4152 - delete $vrlex->[$lex][0][$gbl]: value ok 4153 - $vrgbl->[$lex][0][$gbl]: no exception ok 4154 - $vrgbl->[$lex][0][$gbl]: value ok 4155 - $vrgbl->[$lex][0][$gbl] = 123: no exception ok 4156 - $vrgbl->[$lex][0][$gbl] = 123: value ok 4157 - exists $vrgbl->[$lex][0][$gbl]: no exception ok 4158 - exists $vrgbl->[$lex][0][$gbl]: value ok 4159 - delete $vrgbl->[$lex][0][$gbl]: no exception ok 4160 - delete $vrgbl->[$lex][0][$gbl]: value ok 4161 - $vlex[$gbl][0][$gbl]: no exception ok 4162 - $vlex[$gbl][0][$gbl]: value ok 4163 - $vlex[$gbl][0][$gbl] = 123: no exception ok 4164 - $vlex[$gbl][0][$gbl] = 123: value ok 4165 - exists $vlex[$gbl][0][$gbl]: no exception ok 4166 - exists $vlex[$gbl][0][$gbl]: value ok 4167 - delete $vlex[$gbl][0][$gbl]: no exception ok 4168 - delete $vlex[$gbl][0][$gbl]: value ok 4169 - $vgbl[$gbl][0][$gbl]: no exception ok 4170 - $vgbl[$gbl][0][$gbl]: value ok 4171 - $vgbl[$gbl][0][$gbl] = 123: no exception ok 4172 - $vgbl[$gbl][0][$gbl] = 123: value ok 4173 - exists $vgbl[$gbl][0][$gbl]: no exception ok 4174 - exists $vgbl[$gbl][0][$gbl]: value ok 4175 - delete $vgbl[$gbl][0][$gbl]: no exception ok 4176 - delete $vgbl[$gbl][0][$gbl]: value ok 4177 - $vrlex->[$gbl][0][$gbl]: no exception ok 4178 - $vrlex->[$gbl][0][$gbl]: value ok 4179 - $vrlex->[$gbl][0][$gbl] = 123: no exception ok 4180 - $vrlex->[$gbl][0][$gbl] = 123: value ok 4181 - exists $vrlex->[$gbl][0][$gbl]: no exception ok 4182 - exists $vrlex->[$gbl][0][$gbl]: value ok 4183 - delete $vrlex->[$gbl][0][$gbl]: no exception ok 4184 - delete $vrlex->[$gbl][0][$gbl]: value ok 4185 - $vrgbl->[$gbl][0][$gbl]: no exception ok 4186 - $vrgbl->[$gbl][0][$gbl]: value ok 4187 - $vrgbl->[$gbl][0][$gbl] = 123: no exception ok 4188 - $vrgbl->[$gbl][0][$gbl] = 123: value ok 4189 - exists $vrgbl->[$gbl][0][$gbl]: no exception ok 4190 - exists $vrgbl->[$gbl][0][$gbl]: value ok 4191 - delete $vrgbl->[$gbl][0][$gbl]: no exception ok 4192 - delete $vrgbl->[$gbl][0][$gbl]: value ok 4193 - $vlex[$lex+1][0][$gbl]: no exception ok 4194 - $vlex[$lex+1][0][$gbl]: value ok 4195 - $vlex[$lex+1][0][$gbl] = 123: no exception ok 4196 - $vlex[$lex+1][0][$gbl] = 123: value ok 4197 - exists $vlex[$lex+1][0][$gbl]: no exception ok 4198 - exists $vlex[$lex+1][0][$gbl]: value ok 4199 - delete $vlex[$lex+1][0][$gbl]: no exception ok 4200 - delete $vlex[$lex+1][0][$gbl]: value ok 4201 - $vgbl[$lex+1][0][$gbl]: no exception ok 4202 - $vgbl[$lex+1][0][$gbl]: value ok 4203 - $vgbl[$lex+1][0][$gbl] = 123: no exception ok 4204 - $vgbl[$lex+1][0][$gbl] = 123: value ok 4205 - exists $vgbl[$lex+1][0][$gbl]: no exception ok 4206 - exists $vgbl[$lex+1][0][$gbl]: value ok 4207 - delete $vgbl[$lex+1][0][$gbl]: no exception ok 4208 - delete $vgbl[$lex+1][0][$gbl]: value ok 4209 - $vrlex->[$lex+1][0][$gbl]: no exception ok 4210 - $vrlex->[$lex+1][0][$gbl]: value ok 4211 - $vrlex->[$lex+1][0][$gbl] = 123: no exception ok 4212 - $vrlex->[$lex+1][0][$gbl] = 123: value ok 4213 - exists $vrlex->[$lex+1][0][$gbl]: no exception ok 4214 - exists $vrlex->[$lex+1][0][$gbl]: value ok 4215 - delete $vrlex->[$lex+1][0][$gbl]: no exception ok 4216 - delete $vrlex->[$lex+1][0][$gbl]: value ok 4217 - $vrgbl->[$lex+1][0][$gbl]: no exception ok 4218 - $vrgbl->[$lex+1][0][$gbl]: value ok 4219 - $vrgbl->[$lex+1][0][$gbl] = 123: no exception ok 4220 - $vrgbl->[$lex+1][0][$gbl] = 123: value ok 4221 - exists $vrgbl->[$lex+1][0][$gbl]: no exception ok 4222 - exists $vrgbl->[$lex+1][0][$gbl]: value ok 4223 - delete $vrgbl->[$lex+1][0][$gbl]: no exception ok 4224 - delete $vrgbl->[$lex+1][0][$gbl]: value ok 4225 - $vlex{foo}[0][$gbl]: no exception ok 4226 - $vlex{foo}[0][$gbl]: value ok 4227 - $vlex{foo}[0][$gbl] = 123: no exception ok 4228 - $vlex{foo}[0][$gbl] = 123: value ok 4229 - exists $vlex{foo}[0][$gbl]: no exception ok 4230 - exists $vlex{foo}[0][$gbl]: value ok 4231 - delete $vlex{foo}[0][$gbl]: no exception ok 4232 - delete $vlex{foo}[0][$gbl]: value ok 4233 - $vgbl{foo}[0][$gbl]: no exception ok 4234 - $vgbl{foo}[0][$gbl]: value ok 4235 - $vgbl{foo}[0][$gbl] = 123: no exception ok 4236 - $vgbl{foo}[0][$gbl] = 123: value ok 4237 - exists $vgbl{foo}[0][$gbl]: no exception ok 4238 - exists $vgbl{foo}[0][$gbl]: value ok 4239 - delete $vgbl{foo}[0][$gbl]: no exception ok 4240 - delete $vgbl{foo}[0][$gbl]: value ok 4241 - $vrlex->{foo}[0][$gbl]: no exception ok 4242 - $vrlex->{foo}[0][$gbl]: value ok 4243 - $vrlex->{foo}[0][$gbl] = 123: no exception ok 4244 - $vrlex->{foo}[0][$gbl] = 123: value ok 4245 - exists $vrlex->{foo}[0][$gbl]: no exception ok 4246 - exists $vrlex->{foo}[0][$gbl]: value ok 4247 - delete $vrlex->{foo}[0][$gbl]: no exception ok 4248 - delete $vrlex->{foo}[0][$gbl]: value ok 4249 - $vrgbl->{foo}[0][$gbl]: no exception ok 4250 - $vrgbl->{foo}[0][$gbl]: value ok 4251 - $vrgbl->{foo}[0][$gbl] = 123: no exception ok 4252 - $vrgbl->{foo}[0][$gbl] = 123: value ok 4253 - exists $vrgbl->{foo}[0][$gbl]: no exception ok 4254 - exists $vrgbl->{foo}[0][$gbl]: value ok 4255 - delete $vrgbl->{foo}[0][$gbl]: no exception ok 4256 - delete $vrgbl->{foo}[0][$gbl]: value ok 4257 - $vlex{$lex}[0][$gbl]: no exception ok 4258 - $vlex{$lex}[0][$gbl]: value ok 4259 - $vlex{$lex}[0][$gbl] = 123: no exception ok 4260 - $vlex{$lex}[0][$gbl] = 123: value ok 4261 - exists $vlex{$lex}[0][$gbl]: no exception ok 4262 - exists $vlex{$lex}[0][$gbl]: value ok 4263 - delete $vlex{$lex}[0][$gbl]: no exception ok 4264 - delete $vlex{$lex}[0][$gbl]: value ok 4265 - $vgbl{$lex}[0][$gbl]: no exception ok 4266 - $vgbl{$lex}[0][$gbl]: value ok 4267 - $vgbl{$lex}[0][$gbl] = 123: no exception ok 4268 - $vgbl{$lex}[0][$gbl] = 123: value ok 4269 - exists $vgbl{$lex}[0][$gbl]: no exception ok 4270 - exists $vgbl{$lex}[0][$gbl]: value ok 4271 - delete $vgbl{$lex}[0][$gbl]: no exception ok 4272 - delete $vgbl{$lex}[0][$gbl]: value ok 4273 - $vrlex->{$lex}[0][$gbl]: no exception ok 4274 - $vrlex->{$lex}[0][$gbl]: value ok 4275 - $vrlex->{$lex}[0][$gbl] = 123: no exception ok 4276 - $vrlex->{$lex}[0][$gbl] = 123: value ok 4277 - exists $vrlex->{$lex}[0][$gbl]: no exception ok 4278 - exists $vrlex->{$lex}[0][$gbl]: value ok 4279 - delete $vrlex->{$lex}[0][$gbl]: no exception ok 4280 - delete $vrlex->{$lex}[0][$gbl]: value ok 4281 - $vrgbl->{$lex}[0][$gbl]: no exception ok 4282 - $vrgbl->{$lex}[0][$gbl]: value ok 4283 - $vrgbl->{$lex}[0][$gbl] = 123: no exception ok 4284 - $vrgbl->{$lex}[0][$gbl] = 123: value ok 4285 - exists $vrgbl->{$lex}[0][$gbl]: no exception ok 4286 - exists $vrgbl->{$lex}[0][$gbl]: value ok 4287 - delete $vrgbl->{$lex}[0][$gbl]: no exception ok 4288 - delete $vrgbl->{$lex}[0][$gbl]: value ok 4289 - $vlex{$gbl}[0][$gbl]: no exception ok 4290 - $vlex{$gbl}[0][$gbl]: value ok 4291 - $vlex{$gbl}[0][$gbl] = 123: no exception ok 4292 - $vlex{$gbl}[0][$gbl] = 123: value ok 4293 - exists $vlex{$gbl}[0][$gbl]: no exception ok 4294 - exists $vlex{$gbl}[0][$gbl]: value ok 4295 - delete $vlex{$gbl}[0][$gbl]: no exception ok 4296 - delete $vlex{$gbl}[0][$gbl]: value ok 4297 - $vgbl{$gbl}[0][$gbl]: no exception ok 4298 - $vgbl{$gbl}[0][$gbl]: value ok 4299 - $vgbl{$gbl}[0][$gbl] = 123: no exception ok 4300 - $vgbl{$gbl}[0][$gbl] = 123: value ok 4301 - exists $vgbl{$gbl}[0][$gbl]: no exception ok 4302 - exists $vgbl{$gbl}[0][$gbl]: value ok 4303 - delete $vgbl{$gbl}[0][$gbl]: no exception ok 4304 - delete $vgbl{$gbl}[0][$gbl]: value ok 4305 - $vrlex->{$gbl}[0][$gbl]: no exception ok 4306 - $vrlex->{$gbl}[0][$gbl]: value ok 4307 - $vrlex->{$gbl}[0][$gbl] = 123: no exception ok 4308 - $vrlex->{$gbl}[0][$gbl] = 123: value ok 4309 - exists $vrlex->{$gbl}[0][$gbl]: no exception ok 4310 - exists $vrlex->{$gbl}[0][$gbl]: value ok 4311 - delete $vrlex->{$gbl}[0][$gbl]: no exception ok 4312 - delete $vrlex->{$gbl}[0][$gbl]: value ok 4313 - $vrgbl->{$gbl}[0][$gbl]: no exception ok 4314 - $vrgbl->{$gbl}[0][$gbl]: value ok 4315 - $vrgbl->{$gbl}[0][$gbl] = 123: no exception ok 4316 - $vrgbl->{$gbl}[0][$gbl] = 123: value ok 4317 - exists $vrgbl->{$gbl}[0][$gbl]: no exception ok 4318 - exists $vrgbl->{$gbl}[0][$gbl]: value ok 4319 - delete $vrgbl->{$gbl}[0][$gbl]: no exception ok 4320 - delete $vrgbl->{$gbl}[0][$gbl]: value ok 4321 - $vlex{"x$lex"}[0][$gbl]: no exception ok 4322 - $vlex{"x$lex"}[0][$gbl]: value ok 4323 - $vlex{"x$lex"}[0][$gbl] = 123: no exception ok 4324 - $vlex{"x$lex"}[0][$gbl] = 123: value ok 4325 - exists $vlex{"x$lex"}[0][$gbl]: no exception ok 4326 - exists $vlex{"x$lex"}[0][$gbl]: value ok 4327 - delete $vlex{"x$lex"}[0][$gbl]: no exception ok 4328 - delete $vlex{"x$lex"}[0][$gbl]: value ok 4329 - $vgbl{"x$lex"}[0][$gbl]: no exception ok 4330 - $vgbl{"x$lex"}[0][$gbl]: value ok 4331 - $vgbl{"x$lex"}[0][$gbl] = 123: no exception ok 4332 - $vgbl{"x$lex"}[0][$gbl] = 123: value ok 4333 - exists $vgbl{"x$lex"}[0][$gbl]: no exception ok 4334 - exists $vgbl{"x$lex"}[0][$gbl]: value ok 4335 - delete $vgbl{"x$lex"}[0][$gbl]: no exception ok 4336 - delete $vgbl{"x$lex"}[0][$gbl]: value ok 4337 - $vrlex->{"x$lex"}[0][$gbl]: no exception ok 4338 - $vrlex->{"x$lex"}[0][$gbl]: value ok 4339 - $vrlex->{"x$lex"}[0][$gbl] = 123: no exception ok 4340 - $vrlex->{"x$lex"}[0][$gbl] = 123: value ok 4341 - exists $vrlex->{"x$lex"}[0][$gbl]: no exception ok 4342 - exists $vrlex->{"x$lex"}[0][$gbl]: value ok 4343 - delete $vrlex->{"x$lex"}[0][$gbl]: no exception ok 4344 - delete $vrlex->{"x$lex"}[0][$gbl]: value ok 4345 - $vrgbl->{"x$lex"}[0][$gbl]: no exception ok 4346 - $vrgbl->{"x$lex"}[0][$gbl]: value ok 4347 - $vrgbl->{"x$lex"}[0][$gbl] = 123: no exception ok 4348 - $vrgbl->{"x$lex"}[0][$gbl] = 123: value ok 4349 - exists $vrgbl->{"x$lex"}[0][$gbl]: no exception ok 4350 - exists $vrgbl->{"x$lex"}[0][$gbl]: value ok 4351 - delete $vrgbl->{"x$lex"}[0][$gbl]: no exception ok 4352 - delete $vrgbl->{"x$lex"}[0][$gbl]: value ok 4353 - $vlex[0][$lex][$gbl]: no exception ok 4354 - $vlex[0][$lex][$gbl]: value ok 4355 - $vlex[0][$lex][$gbl] = 123: no exception ok 4356 - $vlex[0][$lex][$gbl] = 123: value ok 4357 - exists $vlex[0][$lex][$gbl]: no exception ok 4358 - exists $vlex[0][$lex][$gbl]: value ok 4359 - delete $vlex[0][$lex][$gbl]: no exception ok 4360 - delete $vlex[0][$lex][$gbl]: value ok 4361 - $vgbl[0][$lex][$gbl]: no exception ok 4362 - $vgbl[0][$lex][$gbl]: value ok 4363 - $vgbl[0][$lex][$gbl] = 123: no exception ok 4364 - $vgbl[0][$lex][$gbl] = 123: value ok 4365 - exists $vgbl[0][$lex][$gbl]: no exception ok 4366 - exists $vgbl[0][$lex][$gbl]: value ok 4367 - delete $vgbl[0][$lex][$gbl]: no exception ok 4368 - delete $vgbl[0][$lex][$gbl]: value ok 4369 - $vrlex->[0][$lex][$gbl]: no exception ok 4370 - $vrlex->[0][$lex][$gbl]: value ok 4371 - $vrlex->[0][$lex][$gbl] = 123: no exception ok 4372 - $vrlex->[0][$lex][$gbl] = 123: value ok 4373 - exists $vrlex->[0][$lex][$gbl]: no exception ok 4374 - exists $vrlex->[0][$lex][$gbl]: value ok 4375 - delete $vrlex->[0][$lex][$gbl]: no exception ok 4376 - delete $vrlex->[0][$lex][$gbl]: value ok 4377 - $vrgbl->[0][$lex][$gbl]: no exception ok 4378 - $vrgbl->[0][$lex][$gbl]: value ok 4379 - $vrgbl->[0][$lex][$gbl] = 123: no exception ok 4380 - $vrgbl->[0][$lex][$gbl] = 123: value ok 4381 - exists $vrgbl->[0][$lex][$gbl]: no exception ok 4382 - exists $vrgbl->[0][$lex][$gbl]: value ok 4383 - delete $vrgbl->[0][$lex][$gbl]: no exception ok 4384 - delete $vrgbl->[0][$lex][$gbl]: value ok 4385 - $vlex[$lex][$lex][$gbl]: no exception ok 4386 - $vlex[$lex][$lex][$gbl]: value ok 4387 - $vlex[$lex][$lex][$gbl] = 123: no exception ok 4388 - $vlex[$lex][$lex][$gbl] = 123: value ok 4389 - exists $vlex[$lex][$lex][$gbl]: no exception ok 4390 - exists $vlex[$lex][$lex][$gbl]: value ok 4391 - delete $vlex[$lex][$lex][$gbl]: no exception ok 4392 - delete $vlex[$lex][$lex][$gbl]: value ok 4393 - $vgbl[$lex][$lex][$gbl]: no exception ok 4394 - $vgbl[$lex][$lex][$gbl]: value ok 4395 - $vgbl[$lex][$lex][$gbl] = 123: no exception ok 4396 - $vgbl[$lex][$lex][$gbl] = 123: value ok 4397 - exists $vgbl[$lex][$lex][$gbl]: no exception ok 4398 - exists $vgbl[$lex][$lex][$gbl]: value ok 4399 - delete $vgbl[$lex][$lex][$gbl]: no exception ok 4400 - delete $vgbl[$lex][$lex][$gbl]: value ok 4401 - $vrlex->[$lex][$lex][$gbl]: no exception ok 4402 - $vrlex->[$lex][$lex][$gbl]: value ok 4403 - $vrlex->[$lex][$lex][$gbl] = 123: no exception ok 4404 - $vrlex->[$lex][$lex][$gbl] = 123: value ok 4405 - exists $vrlex->[$lex][$lex][$gbl]: no exception ok 4406 - exists $vrlex->[$lex][$lex][$gbl]: value ok 4407 - delete $vrlex->[$lex][$lex][$gbl]: no exception ok 4408 - delete $vrlex->[$lex][$lex][$gbl]: value ok 4409 - $vrgbl->[$lex][$lex][$gbl]: no exception ok 4410 - $vrgbl->[$lex][$lex][$gbl]: value ok 4411 - $vrgbl->[$lex][$lex][$gbl] = 123: no exception ok 4412 - $vrgbl->[$lex][$lex][$gbl] = 123: value ok 4413 - exists $vrgbl->[$lex][$lex][$gbl]: no exception ok 4414 - exists $vrgbl->[$lex][$lex][$gbl]: value ok 4415 - delete $vrgbl->[$lex][$lex][$gbl]: no exception ok 4416 - delete $vrgbl->[$lex][$lex][$gbl]: value ok 4417 - $vlex[$gbl][$lex][$gbl]: no exception ok 4418 - $vlex[$gbl][$lex][$gbl]: value ok 4419 - $vlex[$gbl][$lex][$gbl] = 123: no exception ok 4420 - $vlex[$gbl][$lex][$gbl] = 123: value ok 4421 - exists $vlex[$gbl][$lex][$gbl]: no exception ok 4422 - exists $vlex[$gbl][$lex][$gbl]: value ok 4423 - delete $vlex[$gbl][$lex][$gbl]: no exception ok 4424 - delete $vlex[$gbl][$lex][$gbl]: value ok 4425 - $vgbl[$gbl][$lex][$gbl]: no exception ok 4426 - $vgbl[$gbl][$lex][$gbl]: value ok 4427 - $vgbl[$gbl][$lex][$gbl] = 123: no exception ok 4428 - $vgbl[$gbl][$lex][$gbl] = 123: value ok 4429 - exists $vgbl[$gbl][$lex][$gbl]: no exception ok 4430 - exists $vgbl[$gbl][$lex][$gbl]: value ok 4431 - delete $vgbl[$gbl][$lex][$gbl]: no exception ok 4432 - delete $vgbl[$gbl][$lex][$gbl]: value ok 4433 - $vrlex->[$gbl][$lex][$gbl]: no exception ok 4434 - $vrlex->[$gbl][$lex][$gbl]: value ok 4435 - $vrlex->[$gbl][$lex][$gbl] = 123: no exception ok 4436 - $vrlex->[$gbl][$lex][$gbl] = 123: value ok 4437 - exists $vrlex->[$gbl][$lex][$gbl]: no exception ok 4438 - exists $vrlex->[$gbl][$lex][$gbl]: value ok 4439 - delete $vrlex->[$gbl][$lex][$gbl]: no exception ok 4440 - delete $vrlex->[$gbl][$lex][$gbl]: value ok 4441 - $vrgbl->[$gbl][$lex][$gbl]: no exception ok 4442 - $vrgbl->[$gbl][$lex][$gbl]: value ok 4443 - $vrgbl->[$gbl][$lex][$gbl] = 123: no exception ok 4444 - $vrgbl->[$gbl][$lex][$gbl] = 123: value ok 4445 - exists $vrgbl->[$gbl][$lex][$gbl]: no exception ok 4446 - exists $vrgbl->[$gbl][$lex][$gbl]: value ok 4447 - delete $vrgbl->[$gbl][$lex][$gbl]: no exception ok 4448 - delete $vrgbl->[$gbl][$lex][$gbl]: value ok 4449 - $vlex[$lex+1][$lex][$gbl]: no exception ok 4450 - $vlex[$lex+1][$lex][$gbl]: value ok 4451 - $vlex[$lex+1][$lex][$gbl] = 123: no exception ok 4452 - $vlex[$lex+1][$lex][$gbl] = 123: value ok 4453 - exists $vlex[$lex+1][$lex][$gbl]: no exception ok 4454 - exists $vlex[$lex+1][$lex][$gbl]: value ok 4455 - delete $vlex[$lex+1][$lex][$gbl]: no exception ok 4456 - delete $vlex[$lex+1][$lex][$gbl]: value ok 4457 - $vgbl[$lex+1][$lex][$gbl]: no exception ok 4458 - $vgbl[$lex+1][$lex][$gbl]: value ok 4459 - $vgbl[$lex+1][$lex][$gbl] = 123: no exception ok 4460 - $vgbl[$lex+1][$lex][$gbl] = 123: value ok 4461 - exists $vgbl[$lex+1][$lex][$gbl]: no exception ok 4462 - exists $vgbl[$lex+1][$lex][$gbl]: value ok 4463 - delete $vgbl[$lex+1][$lex][$gbl]: no exception ok 4464 - delete $vgbl[$lex+1][$lex][$gbl]: value ok 4465 - $vrlex->[$lex+1][$lex][$gbl]: no exception ok 4466 - $vrlex->[$lex+1][$lex][$gbl]: value ok 4467 - $vrlex->[$lex+1][$lex][$gbl] = 123: no exception ok 4468 - $vrlex->[$lex+1][$lex][$gbl] = 123: value ok 4469 - exists $vrlex->[$lex+1][$lex][$gbl]: no exception ok 4470 - exists $vrlex->[$lex+1][$lex][$gbl]: value ok 4471 - delete $vrlex->[$lex+1][$lex][$gbl]: no exception ok 4472 - delete $vrlex->[$lex+1][$lex][$gbl]: value ok 4473 - $vrgbl->[$lex+1][$lex][$gbl]: no exception ok 4474 - $vrgbl->[$lex+1][$lex][$gbl]: value ok 4475 - $vrgbl->[$lex+1][$lex][$gbl] = 123: no exception ok 4476 - $vrgbl->[$lex+1][$lex][$gbl] = 123: value ok 4477 - exists $vrgbl->[$lex+1][$lex][$gbl]: no exception ok 4478 - exists $vrgbl->[$lex+1][$lex][$gbl]: value ok 4479 - delete $vrgbl->[$lex+1][$lex][$gbl]: no exception ok 4480 - delete $vrgbl->[$lex+1][$lex][$gbl]: value ok 4481 - $vlex{foo}[$lex][$gbl]: no exception ok 4482 - $vlex{foo}[$lex][$gbl]: value ok 4483 - $vlex{foo}[$lex][$gbl] = 123: no exception ok 4484 - $vlex{foo}[$lex][$gbl] = 123: value ok 4485 - exists $vlex{foo}[$lex][$gbl]: no exception ok 4486 - exists $vlex{foo}[$lex][$gbl]: value ok 4487 - delete $vlex{foo}[$lex][$gbl]: no exception ok 4488 - delete $vlex{foo}[$lex][$gbl]: value ok 4489 - $vgbl{foo}[$lex][$gbl]: no exception ok 4490 - $vgbl{foo}[$lex][$gbl]: value ok 4491 - $vgbl{foo}[$lex][$gbl] = 123: no exception ok 4492 - $vgbl{foo}[$lex][$gbl] = 123: value ok 4493 - exists $vgbl{foo}[$lex][$gbl]: no exception ok 4494 - exists $vgbl{foo}[$lex][$gbl]: value ok 4495 - delete $vgbl{foo}[$lex][$gbl]: no exception ok 4496 - delete $vgbl{foo}[$lex][$gbl]: value ok 4497 - $vrlex->{foo}[$lex][$gbl]: no exception ok 4498 - $vrlex->{foo}[$lex][$gbl]: value ok 4499 - $vrlex->{foo}[$lex][$gbl] = 123: no exception ok 4500 - $vrlex->{foo}[$lex][$gbl] = 123: value ok 4501 - exists $vrlex->{foo}[$lex][$gbl]: no exception ok 4502 - exists $vrlex->{foo}[$lex][$gbl]: value ok 4503 - delete $vrlex->{foo}[$lex][$gbl]: no exception ok 4504 - delete $vrlex->{foo}[$lex][$gbl]: value ok 4505 - $vrgbl->{foo}[$lex][$gbl]: no exception ok 4506 - $vrgbl->{foo}[$lex][$gbl]: value ok 4507 - $vrgbl->{foo}[$lex][$gbl] = 123: no exception ok 4508 - $vrgbl->{foo}[$lex][$gbl] = 123: value ok 4509 - exists $vrgbl->{foo}[$lex][$gbl]: no exception ok 4510 - exists $vrgbl->{foo}[$lex][$gbl]: value ok 4511 - delete $vrgbl->{foo}[$lex][$gbl]: no exception ok 4512 - delete $vrgbl->{foo}[$lex][$gbl]: value ok 4513 - $vlex{$lex}[$lex][$gbl]: no exception ok 4514 - $vlex{$lex}[$lex][$gbl]: value ok 4515 - $vlex{$lex}[$lex][$gbl] = 123: no exception ok 4516 - $vlex{$lex}[$lex][$gbl] = 123: value ok 4517 - exists $vlex{$lex}[$lex][$gbl]: no exception ok 4518 - exists $vlex{$lex}[$lex][$gbl]: value ok 4519 - delete $vlex{$lex}[$lex][$gbl]: no exception ok 4520 - delete $vlex{$lex}[$lex][$gbl]: value ok 4521 - $vgbl{$lex}[$lex][$gbl]: no exception ok 4522 - $vgbl{$lex}[$lex][$gbl]: value ok 4523 - $vgbl{$lex}[$lex][$gbl] = 123: no exception ok 4524 - $vgbl{$lex}[$lex][$gbl] = 123: value ok 4525 - exists $vgbl{$lex}[$lex][$gbl]: no exception ok 4526 - exists $vgbl{$lex}[$lex][$gbl]: value ok 4527 - delete $vgbl{$lex}[$lex][$gbl]: no exception ok 4528 - delete $vgbl{$lex}[$lex][$gbl]: value ok 4529 - $vrlex->{$lex}[$lex][$gbl]: no exception ok 4530 - $vrlex->{$lex}[$lex][$gbl]: value ok 4531 - $vrlex->{$lex}[$lex][$gbl] = 123: no exception ok 4532 - $vrlex->{$lex}[$lex][$gbl] = 123: value ok 4533 - exists $vrlex->{$lex}[$lex][$gbl]: no exception ok 4534 - exists $vrlex->{$lex}[$lex][$gbl]: value ok 4535 - delete $vrlex->{$lex}[$lex][$gbl]: no exception ok 4536 - delete $vrlex->{$lex}[$lex][$gbl]: value ok 4537 - $vrgbl->{$lex}[$lex][$gbl]: no exception ok 4538 - $vrgbl->{$lex}[$lex][$gbl]: value ok 4539 - $vrgbl->{$lex}[$lex][$gbl] = 123: no exception ok 4540 - $vrgbl->{$lex}[$lex][$gbl] = 123: value ok 4541 - exists $vrgbl->{$lex}[$lex][$gbl]: no exception ok 4542 - exists $vrgbl->{$lex}[$lex][$gbl]: value ok 4543 - delete $vrgbl->{$lex}[$lex][$gbl]: no exception ok 4544 - delete $vrgbl->{$lex}[$lex][$gbl]: value ok 4545 - $vlex{$gbl}[$lex][$gbl]: no exception ok 4546 - $vlex{$gbl}[$lex][$gbl]: value ok 4547 - $vlex{$gbl}[$lex][$gbl] = 123: no exception ok 4548 - $vlex{$gbl}[$lex][$gbl] = 123: value ok 4549 - exists $vlex{$gbl}[$lex][$gbl]: no exception ok 4550 - exists $vlex{$gbl}[$lex][$gbl]: value ok 4551 - delete $vlex{$gbl}[$lex][$gbl]: no exception ok 4552 - delete $vlex{$gbl}[$lex][$gbl]: value ok 4553 - $vgbl{$gbl}[$lex][$gbl]: no exception ok 4554 - $vgbl{$gbl}[$lex][$gbl]: value ok 4555 - $vgbl{$gbl}[$lex][$gbl] = 123: no exception ok 4556 - $vgbl{$gbl}[$lex][$gbl] = 123: value ok 4557 - exists $vgbl{$gbl}[$lex][$gbl]: no exception ok 4558 - exists $vgbl{$gbl}[$lex][$gbl]: value ok 4559 - delete $vgbl{$gbl}[$lex][$gbl]: no exception ok 4560 - delete $vgbl{$gbl}[$lex][$gbl]: value ok 4561 - $vrlex->{$gbl}[$lex][$gbl]: no exception ok 4562 - $vrlex->{$gbl}[$lex][$gbl]: value ok 4563 - $vrlex->{$gbl}[$lex][$gbl] = 123: no exception ok 4564 - $vrlex->{$gbl}[$lex][$gbl] = 123: value ok 4565 - exists $vrlex->{$gbl}[$lex][$gbl]: no exception ok 4566 - exists $vrlex->{$gbl}[$lex][$gbl]: value ok 4567 - delete $vrlex->{$gbl}[$lex][$gbl]: no exception ok 4568 - delete $vrlex->{$gbl}[$lex][$gbl]: value ok 4569 - $vrgbl->{$gbl}[$lex][$gbl]: no exception ok 4570 - $vrgbl->{$gbl}[$lex][$gbl]: value ok 4571 - $vrgbl->{$gbl}[$lex][$gbl] = 123: no exception ok 4572 - $vrgbl->{$gbl}[$lex][$gbl] = 123: value ok 4573 - exists $vrgbl->{$gbl}[$lex][$gbl]: no exception ok 4574 - exists $vrgbl->{$gbl}[$lex][$gbl]: value ok 4575 - delete $vrgbl->{$gbl}[$lex][$gbl]: no exception ok 4576 - delete $vrgbl->{$gbl}[$lex][$gbl]: value ok 4577 - $vlex{"x$lex"}[$lex][$gbl]: no exception ok 4578 - $vlex{"x$lex"}[$lex][$gbl]: value ok 4579 - $vlex{"x$lex"}[$lex][$gbl] = 123: no exception ok 4580 - $vlex{"x$lex"}[$lex][$gbl] = 123: value ok 4581 - exists $vlex{"x$lex"}[$lex][$gbl]: no exception ok 4582 - exists $vlex{"x$lex"}[$lex][$gbl]: value ok 4583 - delete $vlex{"x$lex"}[$lex][$gbl]: no exception ok 4584 - delete $vlex{"x$lex"}[$lex][$gbl]: value ok 4585 - $vgbl{"x$lex"}[$lex][$gbl]: no exception ok 4586 - $vgbl{"x$lex"}[$lex][$gbl]: value ok 4587 - $vgbl{"x$lex"}[$lex][$gbl] = 123: no exception ok 4588 - $vgbl{"x$lex"}[$lex][$gbl] = 123: value ok 4589 - exists $vgbl{"x$lex"}[$lex][$gbl]: no exception ok 4590 - exists $vgbl{"x$lex"}[$lex][$gbl]: value ok 4591 - delete $vgbl{"x$lex"}[$lex][$gbl]: no exception ok 4592 - delete $vgbl{"x$lex"}[$lex][$gbl]: value ok 4593 - $vrlex->{"x$lex"}[$lex][$gbl]: no exception ok 4594 - $vrlex->{"x$lex"}[$lex][$gbl]: value ok 4595 - $vrlex->{"x$lex"}[$lex][$gbl] = 123: no exception ok 4596 - $vrlex->{"x$lex"}[$lex][$gbl] = 123: value ok 4597 - exists $vrlex->{"x$lex"}[$lex][$gbl]: no exception ok 4598 - exists $vrlex->{"x$lex"}[$lex][$gbl]: value ok 4599 - delete $vrlex->{"x$lex"}[$lex][$gbl]: no exception ok 4600 - delete $vrlex->{"x$lex"}[$lex][$gbl]: value ok 4601 - $vrgbl->{"x$lex"}[$lex][$gbl]: no exception ok 4602 - $vrgbl->{"x$lex"}[$lex][$gbl]: value ok 4603 - $vrgbl->{"x$lex"}[$lex][$gbl] = 123: no exception ok 4604 - $vrgbl->{"x$lex"}[$lex][$gbl] = 123: value ok 4605 - exists $vrgbl->{"x$lex"}[$lex][$gbl]: no exception ok 4606 - exists $vrgbl->{"x$lex"}[$lex][$gbl]: value ok 4607 - delete $vrgbl->{"x$lex"}[$lex][$gbl]: no exception ok 4608 - delete $vrgbl->{"x$lex"}[$lex][$gbl]: value ok 4609 - $vlex[0][$gbl][$gbl]: no exception ok 4610 - $vlex[0][$gbl][$gbl]: value ok 4611 - $vlex[0][$gbl][$gbl] = 123: no exception ok 4612 - $vlex[0][$gbl][$gbl] = 123: value ok 4613 - exists $vlex[0][$gbl][$gbl]: no exception ok 4614 - exists $vlex[0][$gbl][$gbl]: value ok 4615 - delete $vlex[0][$gbl][$gbl]: no exception ok 4616 - delete $vlex[0][$gbl][$gbl]: value ok 4617 - $vgbl[0][$gbl][$gbl]: no exception ok 4618 - $vgbl[0][$gbl][$gbl]: value ok 4619 - $vgbl[0][$gbl][$gbl] = 123: no exception ok 4620 - $vgbl[0][$gbl][$gbl] = 123: value ok 4621 - exists $vgbl[0][$gbl][$gbl]: no exception ok 4622 - exists $vgbl[0][$gbl][$gbl]: value ok 4623 - delete $vgbl[0][$gbl][$gbl]: no exception ok 4624 - delete $vgbl[0][$gbl][$gbl]: value ok 4625 - $vrlex->[0][$gbl][$gbl]: no exception ok 4626 - $vrlex->[0][$gbl][$gbl]: value ok 4627 - $vrlex->[0][$gbl][$gbl] = 123: no exception ok 4628 - $vrlex->[0][$gbl][$gbl] = 123: value ok 4629 - exists $vrlex->[0][$gbl][$gbl]: no exception ok 4630 - exists $vrlex->[0][$gbl][$gbl]: value ok 4631 - delete $vrlex->[0][$gbl][$gbl]: no exception ok 4632 - delete $vrlex->[0][$gbl][$gbl]: value ok 4633 - $vrgbl->[0][$gbl][$gbl]: no exception ok 4634 - $vrgbl->[0][$gbl][$gbl]: value ok 4635 - $vrgbl->[0][$gbl][$gbl] = 123: no exception ok 4636 - $vrgbl->[0][$gbl][$gbl] = 123: value ok 4637 - exists $vrgbl->[0][$gbl][$gbl]: no exception ok 4638 - exists $vrgbl->[0][$gbl][$gbl]: value ok 4639 - delete $vrgbl->[0][$gbl][$gbl]: no exception ok 4640 - delete $vrgbl->[0][$gbl][$gbl]: value ok 4641 - $vlex[$lex][$gbl][$gbl]: no exception ok 4642 - $vlex[$lex][$gbl][$gbl]: value ok 4643 - $vlex[$lex][$gbl][$gbl] = 123: no exception ok 4644 - $vlex[$lex][$gbl][$gbl] = 123: value ok 4645 - exists $vlex[$lex][$gbl][$gbl]: no exception ok 4646 - exists $vlex[$lex][$gbl][$gbl]: value ok 4647 - delete $vlex[$lex][$gbl][$gbl]: no exception ok 4648 - delete $vlex[$lex][$gbl][$gbl]: value ok 4649 - $vgbl[$lex][$gbl][$gbl]: no exception ok 4650 - $vgbl[$lex][$gbl][$gbl]: value ok 4651 - $vgbl[$lex][$gbl][$gbl] = 123: no exception ok 4652 - $vgbl[$lex][$gbl][$gbl] = 123: value ok 4653 - exists $vgbl[$lex][$gbl][$gbl]: no exception ok 4654 - exists $vgbl[$lex][$gbl][$gbl]: value ok 4655 - delete $vgbl[$lex][$gbl][$gbl]: no exception ok 4656 - delete $vgbl[$lex][$gbl][$gbl]: value ok 4657 - $vrlex->[$lex][$gbl][$gbl]: no exception ok 4658 - $vrlex->[$lex][$gbl][$gbl]: value ok 4659 - $vrlex->[$lex][$gbl][$gbl] = 123: no exception ok 4660 - $vrlex->[$lex][$gbl][$gbl] = 123: value ok 4661 - exists $vrlex->[$lex][$gbl][$gbl]: no exception ok 4662 - exists $vrlex->[$lex][$gbl][$gbl]: value ok 4663 - delete $vrlex->[$lex][$gbl][$gbl]: no exception ok 4664 - delete $vrlex->[$lex][$gbl][$gbl]: value ok 4665 - $vrgbl->[$lex][$gbl][$gbl]: no exception ok 4666 - $vrgbl->[$lex][$gbl][$gbl]: value ok 4667 - $vrgbl->[$lex][$gbl][$gbl] = 123: no exception ok 4668 - $vrgbl->[$lex][$gbl][$gbl] = 123: value ok 4669 - exists $vrgbl->[$lex][$gbl][$gbl]: no exception ok 4670 - exists $vrgbl->[$lex][$gbl][$gbl]: value ok 4671 - delete $vrgbl->[$lex][$gbl][$gbl]: no exception ok 4672 - delete $vrgbl->[$lex][$gbl][$gbl]: value ok 4673 - $vlex[$gbl][$gbl][$gbl]: no exception ok 4674 - $vlex[$gbl][$gbl][$gbl]: value ok 4675 - $vlex[$gbl][$gbl][$gbl] = 123: no exception ok 4676 - $vlex[$gbl][$gbl][$gbl] = 123: value ok 4677 - exists $vlex[$gbl][$gbl][$gbl]: no exception ok 4678 - exists $vlex[$gbl][$gbl][$gbl]: value ok 4679 - delete $vlex[$gbl][$gbl][$gbl]: no exception ok 4680 - delete $vlex[$gbl][$gbl][$gbl]: value ok 4681 - $vgbl[$gbl][$gbl][$gbl]: no exception ok 4682 - $vgbl[$gbl][$gbl][$gbl]: value ok 4683 - $vgbl[$gbl][$gbl][$gbl] = 123: no exception ok 4684 - $vgbl[$gbl][$gbl][$gbl] = 123: value ok 4685 - exists $vgbl[$gbl][$gbl][$gbl]: no exception ok 4686 - exists $vgbl[$gbl][$gbl][$gbl]: value ok 4687 - delete $vgbl[$gbl][$gbl][$gbl]: no exception ok 4688 - delete $vgbl[$gbl][$gbl][$gbl]: value ok 4689 - $vrlex->[$gbl][$gbl][$gbl]: no exception ok 4690 - $vrlex->[$gbl][$gbl][$gbl]: value ok 4691 - $vrlex->[$gbl][$gbl][$gbl] = 123: no exception ok 4692 - $vrlex->[$gbl][$gbl][$gbl] = 123: value ok 4693 - exists $vrlex->[$gbl][$gbl][$gbl]: no exception ok 4694 - exists $vrlex->[$gbl][$gbl][$gbl]: value ok 4695 - delete $vrlex->[$gbl][$gbl][$gbl]: no exception ok 4696 - delete $vrlex->[$gbl][$gbl][$gbl]: value ok 4697 - $vrgbl->[$gbl][$gbl][$gbl]: no exception ok 4698 - $vrgbl->[$gbl][$gbl][$gbl]: value ok 4699 - $vrgbl->[$gbl][$gbl][$gbl] = 123: no exception ok 4700 - $vrgbl->[$gbl][$gbl][$gbl] = 123: value ok 4701 - exists $vrgbl->[$gbl][$gbl][$gbl]: no exception ok 4702 - exists $vrgbl->[$gbl][$gbl][$gbl]: value ok 4703 - delete $vrgbl->[$gbl][$gbl][$gbl]: no exception ok 4704 - delete $vrgbl->[$gbl][$gbl][$gbl]: value ok 4705 - $vlex[$lex+1][$gbl][$gbl]: no exception ok 4706 - $vlex[$lex+1][$gbl][$gbl]: value ok 4707 - $vlex[$lex+1][$gbl][$gbl] = 123: no exception ok 4708 - $vlex[$lex+1][$gbl][$gbl] = 123: value ok 4709 - exists $vlex[$lex+1][$gbl][$gbl]: no exception ok 4710 - exists $vlex[$lex+1][$gbl][$gbl]: value ok 4711 - delete $vlex[$lex+1][$gbl][$gbl]: no exception ok 4712 - delete $vlex[$lex+1][$gbl][$gbl]: value ok 4713 - $vgbl[$lex+1][$gbl][$gbl]: no exception ok 4714 - $vgbl[$lex+1][$gbl][$gbl]: value ok 4715 - $vgbl[$lex+1][$gbl][$gbl] = 123: no exception ok 4716 - $vgbl[$lex+1][$gbl][$gbl] = 123: value ok 4717 - exists $vgbl[$lex+1][$gbl][$gbl]: no exception ok 4718 - exists $vgbl[$lex+1][$gbl][$gbl]: value ok 4719 - delete $vgbl[$lex+1][$gbl][$gbl]: no exception ok 4720 - delete $vgbl[$lex+1][$gbl][$gbl]: value ok 4721 - $vrlex->[$lex+1][$gbl][$gbl]: no exception ok 4722 - $vrlex->[$lex+1][$gbl][$gbl]: value ok 4723 - $vrlex->[$lex+1][$gbl][$gbl] = 123: no exception ok 4724 - $vrlex->[$lex+1][$gbl][$gbl] = 123: value ok 4725 - exists $vrlex->[$lex+1][$gbl][$gbl]: no exception ok 4726 - exists $vrlex->[$lex+1][$gbl][$gbl]: value ok 4727 - delete $vrlex->[$lex+1][$gbl][$gbl]: no exception ok 4728 - delete $vrlex->[$lex+1][$gbl][$gbl]: value ok 4729 - $vrgbl->[$lex+1][$gbl][$gbl]: no exception ok 4730 - $vrgbl->[$lex+1][$gbl][$gbl]: value ok 4731 - $vrgbl->[$lex+1][$gbl][$gbl] = 123: no exception ok 4732 - $vrgbl->[$lex+1][$gbl][$gbl] = 123: value ok 4733 - exists $vrgbl->[$lex+1][$gbl][$gbl]: no exception ok 4734 - exists $vrgbl->[$lex+1][$gbl][$gbl]: value ok 4735 - delete $vrgbl->[$lex+1][$gbl][$gbl]: no exception ok 4736 - delete $vrgbl->[$lex+1][$gbl][$gbl]: value ok 4737 - $vlex{foo}[$gbl][$gbl]: no exception ok 4738 - $vlex{foo}[$gbl][$gbl]: value ok 4739 - $vlex{foo}[$gbl][$gbl] = 123: no exception ok 4740 - $vlex{foo}[$gbl][$gbl] = 123: value ok 4741 - exists $vlex{foo}[$gbl][$gbl]: no exception ok 4742 - exists $vlex{foo}[$gbl][$gbl]: value ok 4743 - delete $vlex{foo}[$gbl][$gbl]: no exception ok 4744 - delete $vlex{foo}[$gbl][$gbl]: value ok 4745 - $vgbl{foo}[$gbl][$gbl]: no exception ok 4746 - $vgbl{foo}[$gbl][$gbl]: value ok 4747 - $vgbl{foo}[$gbl][$gbl] = 123: no exception ok 4748 - $vgbl{foo}[$gbl][$gbl] = 123: value ok 4749 - exists $vgbl{foo}[$gbl][$gbl]: no exception ok 4750 - exists $vgbl{foo}[$gbl][$gbl]: value ok 4751 - delete $vgbl{foo}[$gbl][$gbl]: no exception ok 4752 - delete $vgbl{foo}[$gbl][$gbl]: value ok 4753 - $vrlex->{foo}[$gbl][$gbl]: no exception ok 4754 - $vrlex->{foo}[$gbl][$gbl]: value ok 4755 - $vrlex->{foo}[$gbl][$gbl] = 123: no exception ok 4756 - $vrlex->{foo}[$gbl][$gbl] = 123: value ok 4757 - exists $vrlex->{foo}[$gbl][$gbl]: no exception ok 4758 - exists $vrlex->{foo}[$gbl][$gbl]: value ok 4759 - delete $vrlex->{foo}[$gbl][$gbl]: no exception ok 4760 - delete $vrlex->{foo}[$gbl][$gbl]: value ok 4761 - $vrgbl->{foo}[$gbl][$gbl]: no exception ok 4762 - $vrgbl->{foo}[$gbl][$gbl]: value ok 4763 - $vrgbl->{foo}[$gbl][$gbl] = 123: no exception ok 4764 - $vrgbl->{foo}[$gbl][$gbl] = 123: value ok 4765 - exists $vrgbl->{foo}[$gbl][$gbl]: no exception ok 4766 - exists $vrgbl->{foo}[$gbl][$gbl]: value ok 4767 - delete $vrgbl->{foo}[$gbl][$gbl]: no exception ok 4768 - delete $vrgbl->{foo}[$gbl][$gbl]: value ok 4769 - $vlex{$lex}[$gbl][$gbl]: no exception ok 4770 - $vlex{$lex}[$gbl][$gbl]: value ok 4771 - $vlex{$lex}[$gbl][$gbl] = 123: no exception ok 4772 - $vlex{$lex}[$gbl][$gbl] = 123: value ok 4773 - exists $vlex{$lex}[$gbl][$gbl]: no exception ok 4774 - exists $vlex{$lex}[$gbl][$gbl]: value ok 4775 - delete $vlex{$lex}[$gbl][$gbl]: no exception ok 4776 - delete $vlex{$lex}[$gbl][$gbl]: value ok 4777 - $vgbl{$lex}[$gbl][$gbl]: no exception ok 4778 - $vgbl{$lex}[$gbl][$gbl]: value ok 4779 - $vgbl{$lex}[$gbl][$gbl] = 123: no exception ok 4780 - $vgbl{$lex}[$gbl][$gbl] = 123: value ok 4781 - exists $vgbl{$lex}[$gbl][$gbl]: no exception ok 4782 - exists $vgbl{$lex}[$gbl][$gbl]: value ok 4783 - delete $vgbl{$lex}[$gbl][$gbl]: no exception ok 4784 - delete $vgbl{$lex}[$gbl][$gbl]: value ok 4785 - $vrlex->{$lex}[$gbl][$gbl]: no exception ok 4786 - $vrlex->{$lex}[$gbl][$gbl]: value ok 4787 - $vrlex->{$lex}[$gbl][$gbl] = 123: no exception ok 4788 - $vrlex->{$lex}[$gbl][$gbl] = 123: value ok 4789 - exists $vrlex->{$lex}[$gbl][$gbl]: no exception ok 4790 - exists $vrlex->{$lex}[$gbl][$gbl]: value ok 4791 - delete $vrlex->{$lex}[$gbl][$gbl]: no exception ok 4792 - delete $vrlex->{$lex}[$gbl][$gbl]: value ok 4793 - $vrgbl->{$lex}[$gbl][$gbl]: no exception ok 4794 - $vrgbl->{$lex}[$gbl][$gbl]: value ok 4795 - $vrgbl->{$lex}[$gbl][$gbl] = 123: no exception ok 4796 - $vrgbl->{$lex}[$gbl][$gbl] = 123: value ok 4797 - exists $vrgbl->{$lex}[$gbl][$gbl]: no exception ok 4798 - exists $vrgbl->{$lex}[$gbl][$gbl]: value ok 4799 - delete $vrgbl->{$lex}[$gbl][$gbl]: no exception ok 4800 - delete $vrgbl->{$lex}[$gbl][$gbl]: value ok 4801 - $vlex{$gbl}[$gbl][$gbl]: no exception ok 4802 - $vlex{$gbl}[$gbl][$gbl]: value ok 4803 - $vlex{$gbl}[$gbl][$gbl] = 123: no exception ok 4804 - $vlex{$gbl}[$gbl][$gbl] = 123: value ok 4805 - exists $vlex{$gbl}[$gbl][$gbl]: no exception ok 4806 - exists $vlex{$gbl}[$gbl][$gbl]: value ok 4807 - delete $vlex{$gbl}[$gbl][$gbl]: no exception ok 4808 - delete $vlex{$gbl}[$gbl][$gbl]: value ok 4809 - $vgbl{$gbl}[$gbl][$gbl]: no exception ok 4810 - $vgbl{$gbl}[$gbl][$gbl]: value ok 4811 - $vgbl{$gbl}[$gbl][$gbl] = 123: no exception ok 4812 - $vgbl{$gbl}[$gbl][$gbl] = 123: value ok 4813 - exists $vgbl{$gbl}[$gbl][$gbl]: no exception ok 4814 - exists $vgbl{$gbl}[$gbl][$gbl]: value ok 4815 - delete $vgbl{$gbl}[$gbl][$gbl]: no exception ok 4816 - delete $vgbl{$gbl}[$gbl][$gbl]: value ok 4817 - $vrlex->{$gbl}[$gbl][$gbl]: no exception ok 4818 - $vrlex->{$gbl}[$gbl][$gbl]: value ok 4819 - $vrlex->{$gbl}[$gbl][$gbl] = 123: no exception ok 4820 - $vrlex->{$gbl}[$gbl][$gbl] = 123: value ok 4821 - exists $vrlex->{$gbl}[$gbl][$gbl]: no exception ok 4822 - exists $vrlex->{$gbl}[$gbl][$gbl]: value ok 4823 - delete $vrlex->{$gbl}[$gbl][$gbl]: no exception ok 4824 - delete $vrlex->{$gbl}[$gbl][$gbl]: value ok 4825 - $vrgbl->{$gbl}[$gbl][$gbl]: no exception ok 4826 - $vrgbl->{$gbl}[$gbl][$gbl]: value ok 4827 - $vrgbl->{$gbl}[$gbl][$gbl] = 123: no exception ok 4828 - $vrgbl->{$gbl}[$gbl][$gbl] = 123: value ok 4829 - exists $vrgbl->{$gbl}[$gbl][$gbl]: no exception ok 4830 - exists $vrgbl->{$gbl}[$gbl][$gbl]: value ok 4831 - delete $vrgbl->{$gbl}[$gbl][$gbl]: no exception ok 4832 - delete $vrgbl->{$gbl}[$gbl][$gbl]: value ok 4833 - $vlex{"x$lex"}[$gbl][$gbl]: no exception ok 4834 - $vlex{"x$lex"}[$gbl][$gbl]: value ok 4835 - $vlex{"x$lex"}[$gbl][$gbl] = 123: no exception ok 4836 - $vlex{"x$lex"}[$gbl][$gbl] = 123: value ok 4837 - exists $vlex{"x$lex"}[$gbl][$gbl]: no exception ok 4838 - exists $vlex{"x$lex"}[$gbl][$gbl]: value ok 4839 - delete $vlex{"x$lex"}[$gbl][$gbl]: no exception ok 4840 - delete $vlex{"x$lex"}[$gbl][$gbl]: value ok 4841 - $vgbl{"x$lex"}[$gbl][$gbl]: no exception ok 4842 - $vgbl{"x$lex"}[$gbl][$gbl]: value ok 4843 - $vgbl{"x$lex"}[$gbl][$gbl] = 123: no exception ok 4844 - $vgbl{"x$lex"}[$gbl][$gbl] = 123: value ok 4845 - exists $vgbl{"x$lex"}[$gbl][$gbl]: no exception ok 4846 - exists $vgbl{"x$lex"}[$gbl][$gbl]: value ok 4847 - delete $vgbl{"x$lex"}[$gbl][$gbl]: no exception ok 4848 - delete $vgbl{"x$lex"}[$gbl][$gbl]: value ok 4849 - $vrlex->{"x$lex"}[$gbl][$gbl]: no exception ok 4850 - $vrlex->{"x$lex"}[$gbl][$gbl]: value ok 4851 - $vrlex->{"x$lex"}[$gbl][$gbl] = 123: no exception ok 4852 - $vrlex->{"x$lex"}[$gbl][$gbl] = 123: value ok 4853 - exists $vrlex->{"x$lex"}[$gbl][$gbl]: no exception ok 4854 - exists $vrlex->{"x$lex"}[$gbl][$gbl]: value ok 4855 - delete $vrlex->{"x$lex"}[$gbl][$gbl]: no exception ok 4856 - delete $vrlex->{"x$lex"}[$gbl][$gbl]: value ok 4857 - $vrgbl->{"x$lex"}[$gbl][$gbl]: no exception ok 4858 - $vrgbl->{"x$lex"}[$gbl][$gbl]: value ok 4859 - $vrgbl->{"x$lex"}[$gbl][$gbl] = 123: no exception ok 4860 - $vrgbl->{"x$lex"}[$gbl][$gbl] = 123: value ok 4861 - exists $vrgbl->{"x$lex"}[$gbl][$gbl]: no exception ok 4862 - exists $vrgbl->{"x$lex"}[$gbl][$gbl]: value ok 4863 - delete $vrgbl->{"x$lex"}[$gbl][$gbl]: no exception ok 4864 - delete $vrgbl->{"x$lex"}[$gbl][$gbl]: value ok 4865 - $vlex[0][$lex+1][$gbl]: no exception ok 4866 - $vlex[0][$lex+1][$gbl]: value ok 4867 - $vlex[0][$lex+1][$gbl] = 123: no exception ok 4868 - $vlex[0][$lex+1][$gbl] = 123: value ok 4869 - exists $vlex[0][$lex+1][$gbl]: no exception ok 4870 - exists $vlex[0][$lex+1][$gbl]: value ok 4871 - delete $vlex[0][$lex+1][$gbl]: no exception ok 4872 - delete $vlex[0][$lex+1][$gbl]: value ok 4873 - $vgbl[0][$lex+1][$gbl]: no exception ok 4874 - $vgbl[0][$lex+1][$gbl]: value ok 4875 - $vgbl[0][$lex+1][$gbl] = 123: no exception ok 4876 - $vgbl[0][$lex+1][$gbl] = 123: value ok 4877 - exists $vgbl[0][$lex+1][$gbl]: no exception ok 4878 - exists $vgbl[0][$lex+1][$gbl]: value ok 4879 - delete $vgbl[0][$lex+1][$gbl]: no exception ok 4880 - delete $vgbl[0][$lex+1][$gbl]: value ok 4881 - $vrlex->[0][$lex+1][$gbl]: no exception ok 4882 - $vrlex->[0][$lex+1][$gbl]: value ok 4883 - $vrlex->[0][$lex+1][$gbl] = 123: no exception ok 4884 - $vrlex->[0][$lex+1][$gbl] = 123: value ok 4885 - exists $vrlex->[0][$lex+1][$gbl]: no exception ok 4886 - exists $vrlex->[0][$lex+1][$gbl]: value ok 4887 - delete $vrlex->[0][$lex+1][$gbl]: no exception ok 4888 - delete $vrlex->[0][$lex+1][$gbl]: value ok 4889 - $vrgbl->[0][$lex+1][$gbl]: no exception ok 4890 - $vrgbl->[0][$lex+1][$gbl]: value ok 4891 - $vrgbl->[0][$lex+1][$gbl] = 123: no exception ok 4892 - $vrgbl->[0][$lex+1][$gbl] = 123: value ok 4893 - exists $vrgbl->[0][$lex+1][$gbl]: no exception ok 4894 - exists $vrgbl->[0][$lex+1][$gbl]: value ok 4895 - delete $vrgbl->[0][$lex+1][$gbl]: no exception ok 4896 - delete $vrgbl->[0][$lex+1][$gbl]: value ok 4897 - $vlex[$lex][$lex+1][$gbl]: no exception ok 4898 - $vlex[$lex][$lex+1][$gbl]: value ok 4899 - $vlex[$lex][$lex+1][$gbl] = 123: no exception ok 4900 - $vlex[$lex][$lex+1][$gbl] = 123: value ok 4901 - exists $vlex[$lex][$lex+1][$gbl]: no exception ok 4902 - exists $vlex[$lex][$lex+1][$gbl]: value ok 4903 - delete $vlex[$lex][$lex+1][$gbl]: no exception ok 4904 - delete $vlex[$lex][$lex+1][$gbl]: value ok 4905 - $vgbl[$lex][$lex+1][$gbl]: no exception ok 4906 - $vgbl[$lex][$lex+1][$gbl]: value ok 4907 - $vgbl[$lex][$lex+1][$gbl] = 123: no exception ok 4908 - $vgbl[$lex][$lex+1][$gbl] = 123: value ok 4909 - exists $vgbl[$lex][$lex+1][$gbl]: no exception ok 4910 - exists $vgbl[$lex][$lex+1][$gbl]: value ok 4911 - delete $vgbl[$lex][$lex+1][$gbl]: no exception ok 4912 - delete $vgbl[$lex][$lex+1][$gbl]: value ok 4913 - $vrlex->[$lex][$lex+1][$gbl]: no exception ok 4914 - $vrlex->[$lex][$lex+1][$gbl]: value ok 4915 - $vrlex->[$lex][$lex+1][$gbl] = 123: no exception ok 4916 - $vrlex->[$lex][$lex+1][$gbl] = 123: value ok 4917 - exists $vrlex->[$lex][$lex+1][$gbl]: no exception ok 4918 - exists $vrlex->[$lex][$lex+1][$gbl]: value ok 4919 - delete $vrlex->[$lex][$lex+1][$gbl]: no exception ok 4920 - delete $vrlex->[$lex][$lex+1][$gbl]: value ok 4921 - $vrgbl->[$lex][$lex+1][$gbl]: no exception ok 4922 - $vrgbl->[$lex][$lex+1][$gbl]: value ok 4923 - $vrgbl->[$lex][$lex+1][$gbl] = 123: no exception ok 4924 - $vrgbl->[$lex][$lex+1][$gbl] = 123: value ok 4925 - exists $vrgbl->[$lex][$lex+1][$gbl]: no exception ok 4926 - exists $vrgbl->[$lex][$lex+1][$gbl]: value ok 4927 - delete $vrgbl->[$lex][$lex+1][$gbl]: no exception ok 4928 - delete $vrgbl->[$lex][$lex+1][$gbl]: value ok 4929 - $vlex[$gbl][$lex+1][$gbl]: no exception ok 4930 - $vlex[$gbl][$lex+1][$gbl]: value ok 4931 - $vlex[$gbl][$lex+1][$gbl] = 123: no exception ok 4932 - $vlex[$gbl][$lex+1][$gbl] = 123: value ok 4933 - exists $vlex[$gbl][$lex+1][$gbl]: no exception ok 4934 - exists $vlex[$gbl][$lex+1][$gbl]: value ok 4935 - delete $vlex[$gbl][$lex+1][$gbl]: no exception ok 4936 - delete $vlex[$gbl][$lex+1][$gbl]: value ok 4937 - $vgbl[$gbl][$lex+1][$gbl]: no exception ok 4938 - $vgbl[$gbl][$lex+1][$gbl]: value ok 4939 - $vgbl[$gbl][$lex+1][$gbl] = 123: no exception ok 4940 - $vgbl[$gbl][$lex+1][$gbl] = 123: value ok 4941 - exists $vgbl[$gbl][$lex+1][$gbl]: no exception ok 4942 - exists $vgbl[$gbl][$lex+1][$gbl]: value ok 4943 - delete $vgbl[$gbl][$lex+1][$gbl]: no exception ok 4944 - delete $vgbl[$gbl][$lex+1][$gbl]: value ok 4945 - $vrlex->[$gbl][$lex+1][$gbl]: no exception ok 4946 - $vrlex->[$gbl][$lex+1][$gbl]: value ok 4947 - $vrlex->[$gbl][$lex+1][$gbl] = 123: no exception ok 4948 - $vrlex->[$gbl][$lex+1][$gbl] = 123: value ok 4949 - exists $vrlex->[$gbl][$lex+1][$gbl]: no exception ok 4950 - exists $vrlex->[$gbl][$lex+1][$gbl]: value ok 4951 - delete $vrlex->[$gbl][$lex+1][$gbl]: no exception ok 4952 - delete $vrlex->[$gbl][$lex+1][$gbl]: value ok 4953 - $vrgbl->[$gbl][$lex+1][$gbl]: no exception ok 4954 - $vrgbl->[$gbl][$lex+1][$gbl]: value ok 4955 - $vrgbl->[$gbl][$lex+1][$gbl] = 123: no exception ok 4956 - $vrgbl->[$gbl][$lex+1][$gbl] = 123: value ok 4957 - exists $vrgbl->[$gbl][$lex+1][$gbl]: no exception ok 4958 - exists $vrgbl->[$gbl][$lex+1][$gbl]: value ok 4959 - delete $vrgbl->[$gbl][$lex+1][$gbl]: no exception ok 4960 - delete $vrgbl->[$gbl][$lex+1][$gbl]: value ok 4961 - $vlex[$lex+1][$lex+1][$gbl]: no exception ok 4962 - $vlex[$lex+1][$lex+1][$gbl]: value ok 4963 - $vlex[$lex+1][$lex+1][$gbl] = 123: no exception ok 4964 - $vlex[$lex+1][$lex+1][$gbl] = 123: value ok 4965 - exists $vlex[$lex+1][$lex+1][$gbl]: no exception ok 4966 - exists $vlex[$lex+1][$lex+1][$gbl]: value ok 4967 - delete $vlex[$lex+1][$lex+1][$gbl]: no exception ok 4968 - delete $vlex[$lex+1][$lex+1][$gbl]: value ok 4969 - $vgbl[$lex+1][$lex+1][$gbl]: no exception ok 4970 - $vgbl[$lex+1][$lex+1][$gbl]: value ok 4971 - $vgbl[$lex+1][$lex+1][$gbl] = 123: no exception ok 4972 - $vgbl[$lex+1][$lex+1][$gbl] = 123: value ok 4973 - exists $vgbl[$lex+1][$lex+1][$gbl]: no exception ok 4974 - exists $vgbl[$lex+1][$lex+1][$gbl]: value ok 4975 - delete $vgbl[$lex+1][$lex+1][$gbl]: no exception ok 4976 - delete $vgbl[$lex+1][$lex+1][$gbl]: value ok 4977 - $vrlex->[$lex+1][$lex+1][$gbl]: no exception ok 4978 - $vrlex->[$lex+1][$lex+1][$gbl]: value ok 4979 - $vrlex->[$lex+1][$lex+1][$gbl] = 123: no exception ok 4980 - $vrlex->[$lex+1][$lex+1][$gbl] = 123: value ok 4981 - exists $vrlex->[$lex+1][$lex+1][$gbl]: no exception ok 4982 - exists $vrlex->[$lex+1][$lex+1][$gbl]: value ok 4983 - delete $vrlex->[$lex+1][$lex+1][$gbl]: no exception ok 4984 - delete $vrlex->[$lex+1][$lex+1][$gbl]: value ok 4985 - $vrgbl->[$lex+1][$lex+1][$gbl]: no exception ok 4986 - $vrgbl->[$lex+1][$lex+1][$gbl]: value ok 4987 - $vrgbl->[$lex+1][$lex+1][$gbl] = 123: no exception ok 4988 - $vrgbl->[$lex+1][$lex+1][$gbl] = 123: value ok 4989 - exists $vrgbl->[$lex+1][$lex+1][$gbl]: no exception ok 4990 - exists $vrgbl->[$lex+1][$lex+1][$gbl]: value ok 4991 - delete $vrgbl->[$lex+1][$lex+1][$gbl]: no exception ok 4992 - delete $vrgbl->[$lex+1][$lex+1][$gbl]: value ok 4993 - $vlex{foo}[$lex+1][$gbl]: no exception ok 4994 - $vlex{foo}[$lex+1][$gbl]: value ok 4995 - $vlex{foo}[$lex+1][$gbl] = 123: no exception ok 4996 - $vlex{foo}[$lex+1][$gbl] = 123: value ok 4997 - exists $vlex{foo}[$lex+1][$gbl]: no exception ok 4998 - exists $vlex{foo}[$lex+1][$gbl]: value ok 4999 - delete $vlex{foo}[$lex+1][$gbl]: no exception ok 5000 - delete $vlex{foo}[$lex+1][$gbl]: value ok 5001 - $vgbl{foo}[$lex+1][$gbl]: no exception ok 5002 - $vgbl{foo}[$lex+1][$gbl]: value ok 5003 - $vgbl{foo}[$lex+1][$gbl] = 123: no exception ok 5004 - $vgbl{foo}[$lex+1][$gbl] = 123: value ok 5005 - exists $vgbl{foo}[$lex+1][$gbl]: no exception ok 5006 - exists $vgbl{foo}[$lex+1][$gbl]: value ok 5007 - delete $vgbl{foo}[$lex+1][$gbl]: no exception ok 5008 - delete $vgbl{foo}[$lex+1][$gbl]: value ok 5009 - $vrlex->{foo}[$lex+1][$gbl]: no exception ok 5010 - $vrlex->{foo}[$lex+1][$gbl]: value ok 5011 - $vrlex->{foo}[$lex+1][$gbl] = 123: no exception ok 5012 - $vrlex->{foo}[$lex+1][$gbl] = 123: value ok 5013 - exists $vrlex->{foo}[$lex+1][$gbl]: no exception ok 5014 - exists $vrlex->{foo}[$lex+1][$gbl]: value ok 5015 - delete $vrlex->{foo}[$lex+1][$gbl]: no exception ok 5016 - delete $vrlex->{foo}[$lex+1][$gbl]: value ok 5017 - $vrgbl->{foo}[$lex+1][$gbl]: no exception ok 5018 - $vrgbl->{foo}[$lex+1][$gbl]: value ok 5019 - $vrgbl->{foo}[$lex+1][$gbl] = 123: no exception ok 5020 - $vrgbl->{foo}[$lex+1][$gbl] = 123: value ok 5021 - exists $vrgbl->{foo}[$lex+1][$gbl]: no exception ok 5022 - exists $vrgbl->{foo}[$lex+1][$gbl]: value ok 5023 - delete $vrgbl->{foo}[$lex+1][$gbl]: no exception ok 5024 - delete $vrgbl->{foo}[$lex+1][$gbl]: value ok 5025 - $vlex{$lex}[$lex+1][$gbl]: no exception ok 5026 - $vlex{$lex}[$lex+1][$gbl]: value ok 5027 - $vlex{$lex}[$lex+1][$gbl] = 123: no exception ok 5028 - $vlex{$lex}[$lex+1][$gbl] = 123: value ok 5029 - exists $vlex{$lex}[$lex+1][$gbl]: no exception ok 5030 - exists $vlex{$lex}[$lex+1][$gbl]: value ok 5031 - delete $vlex{$lex}[$lex+1][$gbl]: no exception ok 5032 - delete $vlex{$lex}[$lex+1][$gbl]: value ok 5033 - $vgbl{$lex}[$lex+1][$gbl]: no exception ok 5034 - $vgbl{$lex}[$lex+1][$gbl]: value ok 5035 - $vgbl{$lex}[$lex+1][$gbl] = 123: no exception ok 5036 - $vgbl{$lex}[$lex+1][$gbl] = 123: value ok 5037 - exists $vgbl{$lex}[$lex+1][$gbl]: no exception ok 5038 - exists $vgbl{$lex}[$lex+1][$gbl]: value ok 5039 - delete $vgbl{$lex}[$lex+1][$gbl]: no exception ok 5040 - delete $vgbl{$lex}[$lex+1][$gbl]: value ok 5041 - $vrlex->{$lex}[$lex+1][$gbl]: no exception ok 5042 - $vrlex->{$lex}[$lex+1][$gbl]: value ok 5043 - $vrlex->{$lex}[$lex+1][$gbl] = 123: no exception ok 5044 - $vrlex->{$lex}[$lex+1][$gbl] = 123: value ok 5045 - exists $vrlex->{$lex}[$lex+1][$gbl]: no exception ok 5046 - exists $vrlex->{$lex}[$lex+1][$gbl]: value ok 5047 - delete $vrlex->{$lex}[$lex+1][$gbl]: no exception ok 5048 - delete $vrlex->{$lex}[$lex+1][$gbl]: value ok 5049 - $vrgbl->{$lex}[$lex+1][$gbl]: no exception ok 5050 - $vrgbl->{$lex}[$lex+1][$gbl]: value ok 5051 - $vrgbl->{$lex}[$lex+1][$gbl] = 123: no exception ok 5052 - $vrgbl->{$lex}[$lex+1][$gbl] = 123: value ok 5053 - exists $vrgbl->{$lex}[$lex+1][$gbl]: no exception ok 5054 - exists $vrgbl->{$lex}[$lex+1][$gbl]: value ok 5055 - delete $vrgbl->{$lex}[$lex+1][$gbl]: no exception ok 5056 - delete $vrgbl->{$lex}[$lex+1][$gbl]: value ok 5057 - $vlex{$gbl}[$lex+1][$gbl]: no exception ok 5058 - $vlex{$gbl}[$lex+1][$gbl]: value ok 5059 - $vlex{$gbl}[$lex+1][$gbl] = 123: no exception ok 5060 - $vlex{$gbl}[$lex+1][$gbl] = 123: value ok 5061 - exists $vlex{$gbl}[$lex+1][$gbl]: no exception ok 5062 - exists $vlex{$gbl}[$lex+1][$gbl]: value ok 5063 - delete $vlex{$gbl}[$lex+1][$gbl]: no exception ok 5064 - delete $vlex{$gbl}[$lex+1][$gbl]: value ok 5065 - $vgbl{$gbl}[$lex+1][$gbl]: no exception ok 5066 - $vgbl{$gbl}[$lex+1][$gbl]: value ok 5067 - $vgbl{$gbl}[$lex+1][$gbl] = 123: no exception ok 5068 - $vgbl{$gbl}[$lex+1][$gbl] = 123: value ok 5069 - exists $vgbl{$gbl}[$lex+1][$gbl]: no exception ok 5070 - exists $vgbl{$gbl}[$lex+1][$gbl]: value ok 5071 - delete $vgbl{$gbl}[$lex+1][$gbl]: no exception ok 5072 - delete $vgbl{$gbl}[$lex+1][$gbl]: value ok 5073 - $vrlex->{$gbl}[$lex+1][$gbl]: no exception ok 5074 - $vrlex->{$gbl}[$lex+1][$gbl]: value ok 5075 - $vrlex->{$gbl}[$lex+1][$gbl] = 123: no exception ok 5076 - $vrlex->{$gbl}[$lex+1][$gbl] = 123: value ok 5077 - exists $vrlex->{$gbl}[$lex+1][$gbl]: no exception ok 5078 - exists $vrlex->{$gbl}[$lex+1][$gbl]: value ok 5079 - delete $vrlex->{$gbl}[$lex+1][$gbl]: no exception ok 5080 - delete $vrlex->{$gbl}[$lex+1][$gbl]: value ok 5081 - $vrgbl->{$gbl}[$lex+1][$gbl]: no exception ok 5082 - $vrgbl->{$gbl}[$lex+1][$gbl]: value ok 5083 - $vrgbl->{$gbl}[$lex+1][$gbl] = 123: no exception ok 5084 - $vrgbl->{$gbl}[$lex+1][$gbl] = 123: value ok 5085 - exists $vrgbl->{$gbl}[$lex+1][$gbl]: no exception ok 5086 - exists $vrgbl->{$gbl}[$lex+1][$gbl]: value ok 5087 - delete $vrgbl->{$gbl}[$lex+1][$gbl]: no exception ok 5088 - delete $vrgbl->{$gbl}[$lex+1][$gbl]: value ok 5089 - $vlex{"x$lex"}[$lex+1][$gbl]: no exception ok 5090 - $vlex{"x$lex"}[$lex+1][$gbl]: value ok 5091 - $vlex{"x$lex"}[$lex+1][$gbl] = 123: no exception ok 5092 - $vlex{"x$lex"}[$lex+1][$gbl] = 123: value ok 5093 - exists $vlex{"x$lex"}[$lex+1][$gbl]: no exception ok 5094 - exists $vlex{"x$lex"}[$lex+1][$gbl]: value ok 5095 - delete $vlex{"x$lex"}[$lex+1][$gbl]: no exception ok 5096 - delete $vlex{"x$lex"}[$lex+1][$gbl]: value ok 5097 - $vgbl{"x$lex"}[$lex+1][$gbl]: no exception ok 5098 - $vgbl{"x$lex"}[$lex+1][$gbl]: value ok 5099 - $vgbl{"x$lex"}[$lex+1][$gbl] = 123: no exception ok 5100 - $vgbl{"x$lex"}[$lex+1][$gbl] = 123: value ok 5101 - exists $vgbl{"x$lex"}[$lex+1][$gbl]: no exception ok 5102 - exists $vgbl{"x$lex"}[$lex+1][$gbl]: value ok 5103 - delete $vgbl{"x$lex"}[$lex+1][$gbl]: no exception ok 5104 - delete $vgbl{"x$lex"}[$lex+1][$gbl]: value ok 5105 - $vrlex->{"x$lex"}[$lex+1][$gbl]: no exception ok 5106 - $vrlex->{"x$lex"}[$lex+1][$gbl]: value ok 5107 - $vrlex->{"x$lex"}[$lex+1][$gbl] = 123: no exception ok 5108 - $vrlex->{"x$lex"}[$lex+1][$gbl] = 123: value ok 5109 - exists $vrlex->{"x$lex"}[$lex+1][$gbl]: no exception ok 5110 - exists $vrlex->{"x$lex"}[$lex+1][$gbl]: value ok 5111 - delete $vrlex->{"x$lex"}[$lex+1][$gbl]: no exception ok 5112 - delete $vrlex->{"x$lex"}[$lex+1][$gbl]: value ok 5113 - $vrgbl->{"x$lex"}[$lex+1][$gbl]: no exception ok 5114 - $vrgbl->{"x$lex"}[$lex+1][$gbl]: value ok 5115 - $vrgbl->{"x$lex"}[$lex+1][$gbl] = 123: no exception ok 5116 - $vrgbl->{"x$lex"}[$lex+1][$gbl] = 123: value ok 5117 - exists $vrgbl->{"x$lex"}[$lex+1][$gbl]: no exception ok 5118 - exists $vrgbl->{"x$lex"}[$lex+1][$gbl]: value ok 5119 - delete $vrgbl->{"x$lex"}[$lex+1][$gbl]: no exception ok 5120 - delete $vrgbl->{"x$lex"}[$lex+1][$gbl]: value ok 5121 - $vlex[0]{foo}[$gbl]: no exception ok 5122 - $vlex[0]{foo}[$gbl]: value ok 5123 - $vlex[0]{foo}[$gbl] = 123: no exception ok 5124 - $vlex[0]{foo}[$gbl] = 123: value ok 5125 - exists $vlex[0]{foo}[$gbl]: no exception ok 5126 - exists $vlex[0]{foo}[$gbl]: value ok 5127 - delete $vlex[0]{foo}[$gbl]: no exception ok 5128 - delete $vlex[0]{foo}[$gbl]: value ok 5129 - $vgbl[0]{foo}[$gbl]: no exception ok 5130 - $vgbl[0]{foo}[$gbl]: value ok 5131 - $vgbl[0]{foo}[$gbl] = 123: no exception ok 5132 - $vgbl[0]{foo}[$gbl] = 123: value ok 5133 - exists $vgbl[0]{foo}[$gbl]: no exception ok 5134 - exists $vgbl[0]{foo}[$gbl]: value ok 5135 - delete $vgbl[0]{foo}[$gbl]: no exception ok 5136 - delete $vgbl[0]{foo}[$gbl]: value ok 5137 - $vrlex->[0]{foo}[$gbl]: no exception ok 5138 - $vrlex->[0]{foo}[$gbl]: value ok 5139 - $vrlex->[0]{foo}[$gbl] = 123: no exception ok 5140 - $vrlex->[0]{foo}[$gbl] = 123: value ok 5141 - exists $vrlex->[0]{foo}[$gbl]: no exception ok 5142 - exists $vrlex->[0]{foo}[$gbl]: value ok 5143 - delete $vrlex->[0]{foo}[$gbl]: no exception ok 5144 - delete $vrlex->[0]{foo}[$gbl]: value ok 5145 - $vrgbl->[0]{foo}[$gbl]: no exception ok 5146 - $vrgbl->[0]{foo}[$gbl]: value ok 5147 - $vrgbl->[0]{foo}[$gbl] = 123: no exception ok 5148 - $vrgbl->[0]{foo}[$gbl] = 123: value ok 5149 - exists $vrgbl->[0]{foo}[$gbl]: no exception ok 5150 - exists $vrgbl->[0]{foo}[$gbl]: value ok 5151 - delete $vrgbl->[0]{foo}[$gbl]: no exception ok 5152 - delete $vrgbl->[0]{foo}[$gbl]: value ok 5153 - $vlex[$lex]{foo}[$gbl]: no exception ok 5154 - $vlex[$lex]{foo}[$gbl]: value ok 5155 - $vlex[$lex]{foo}[$gbl] = 123: no exception ok 5156 - $vlex[$lex]{foo}[$gbl] = 123: value ok 5157 - exists $vlex[$lex]{foo}[$gbl]: no exception ok 5158 - exists $vlex[$lex]{foo}[$gbl]: value ok 5159 - delete $vlex[$lex]{foo}[$gbl]: no exception ok 5160 - delete $vlex[$lex]{foo}[$gbl]: value ok 5161 - $vgbl[$lex]{foo}[$gbl]: no exception ok 5162 - $vgbl[$lex]{foo}[$gbl]: value ok 5163 - $vgbl[$lex]{foo}[$gbl] = 123: no exception ok 5164 - $vgbl[$lex]{foo}[$gbl] = 123: value ok 5165 - exists $vgbl[$lex]{foo}[$gbl]: no exception ok 5166 - exists $vgbl[$lex]{foo}[$gbl]: value ok 5167 - delete $vgbl[$lex]{foo}[$gbl]: no exception ok 5168 - delete $vgbl[$lex]{foo}[$gbl]: value ok 5169 - $vrlex->[$lex]{foo}[$gbl]: no exception ok 5170 - $vrlex->[$lex]{foo}[$gbl]: value ok 5171 - $vrlex->[$lex]{foo}[$gbl] = 123: no exception ok 5172 - $vrlex->[$lex]{foo}[$gbl] = 123: value ok 5173 - exists $vrlex->[$lex]{foo}[$gbl]: no exception ok 5174 - exists $vrlex->[$lex]{foo}[$gbl]: value ok 5175 - delete $vrlex->[$lex]{foo}[$gbl]: no exception ok 5176 - delete $vrlex->[$lex]{foo}[$gbl]: value ok 5177 - $vrgbl->[$lex]{foo}[$gbl]: no exception ok 5178 - $vrgbl->[$lex]{foo}[$gbl]: value ok 5179 - $vrgbl->[$lex]{foo}[$gbl] = 123: no exception ok 5180 - $vrgbl->[$lex]{foo}[$gbl] = 123: value ok 5181 - exists $vrgbl->[$lex]{foo}[$gbl]: no exception ok 5182 - exists $vrgbl->[$lex]{foo}[$gbl]: value ok 5183 - delete $vrgbl->[$lex]{foo}[$gbl]: no exception ok 5184 - delete $vrgbl->[$lex]{foo}[$gbl]: value ok 5185 - $vlex[$gbl]{foo}[$gbl]: no exception ok 5186 - $vlex[$gbl]{foo}[$gbl]: value ok 5187 - $vlex[$gbl]{foo}[$gbl] = 123: no exception ok 5188 - $vlex[$gbl]{foo}[$gbl] = 123: value ok 5189 - exists $vlex[$gbl]{foo}[$gbl]: no exception ok 5190 - exists $vlex[$gbl]{foo}[$gbl]: value ok 5191 - delete $vlex[$gbl]{foo}[$gbl]: no exception ok 5192 - delete $vlex[$gbl]{foo}[$gbl]: value ok 5193 - $vgbl[$gbl]{foo}[$gbl]: no exception ok 5194 - $vgbl[$gbl]{foo}[$gbl]: value ok 5195 - $vgbl[$gbl]{foo}[$gbl] = 123: no exception ok 5196 - $vgbl[$gbl]{foo}[$gbl] = 123: value ok 5197 - exists $vgbl[$gbl]{foo}[$gbl]: no exception ok 5198 - exists $vgbl[$gbl]{foo}[$gbl]: value ok 5199 - delete $vgbl[$gbl]{foo}[$gbl]: no exception ok 5200 - delete $vgbl[$gbl]{foo}[$gbl]: value ok 5201 - $vrlex->[$gbl]{foo}[$gbl]: no exception ok 5202 - $vrlex->[$gbl]{foo}[$gbl]: value ok 5203 - $vrlex->[$gbl]{foo}[$gbl] = 123: no exception ok 5204 - $vrlex->[$gbl]{foo}[$gbl] = 123: value ok 5205 - exists $vrlex->[$gbl]{foo}[$gbl]: no exception ok 5206 - exists $vrlex->[$gbl]{foo}[$gbl]: value ok 5207 - delete $vrlex->[$gbl]{foo}[$gbl]: no exception ok 5208 - delete $vrlex->[$gbl]{foo}[$gbl]: value ok 5209 - $vrgbl->[$gbl]{foo}[$gbl]: no exception ok 5210 - $vrgbl->[$gbl]{foo}[$gbl]: value ok 5211 - $vrgbl->[$gbl]{foo}[$gbl] = 123: no exception ok 5212 - $vrgbl->[$gbl]{foo}[$gbl] = 123: value ok 5213 - exists $vrgbl->[$gbl]{foo}[$gbl]: no exception ok 5214 - exists $vrgbl->[$gbl]{foo}[$gbl]: value ok 5215 - delete $vrgbl->[$gbl]{foo}[$gbl]: no exception ok 5216 - delete $vrgbl->[$gbl]{foo}[$gbl]: value ok 5217 - $vlex[$lex+1]{foo}[$gbl]: no exception ok 5218 - $vlex[$lex+1]{foo}[$gbl]: value ok 5219 - $vlex[$lex+1]{foo}[$gbl] = 123: no exception ok 5220 - $vlex[$lex+1]{foo}[$gbl] = 123: value ok 5221 - exists $vlex[$lex+1]{foo}[$gbl]: no exception ok 5222 - exists $vlex[$lex+1]{foo}[$gbl]: value ok 5223 - delete $vlex[$lex+1]{foo}[$gbl]: no exception ok 5224 - delete $vlex[$lex+1]{foo}[$gbl]: value ok 5225 - $vgbl[$lex+1]{foo}[$gbl]: no exception ok 5226 - $vgbl[$lex+1]{foo}[$gbl]: value ok 5227 - $vgbl[$lex+1]{foo}[$gbl] = 123: no exception ok 5228 - $vgbl[$lex+1]{foo}[$gbl] = 123: value ok 5229 - exists $vgbl[$lex+1]{foo}[$gbl]: no exception ok 5230 - exists $vgbl[$lex+1]{foo}[$gbl]: value ok 5231 - delete $vgbl[$lex+1]{foo}[$gbl]: no exception ok 5232 - delete $vgbl[$lex+1]{foo}[$gbl]: value ok 5233 - $vrlex->[$lex+1]{foo}[$gbl]: no exception ok 5234 - $vrlex->[$lex+1]{foo}[$gbl]: value ok 5235 - $vrlex->[$lex+1]{foo}[$gbl] = 123: no exception ok 5236 - $vrlex->[$lex+1]{foo}[$gbl] = 123: value ok 5237 - exists $vrlex->[$lex+1]{foo}[$gbl]: no exception ok 5238 - exists $vrlex->[$lex+1]{foo}[$gbl]: value ok 5239 - delete $vrlex->[$lex+1]{foo}[$gbl]: no exception ok 5240 - delete $vrlex->[$lex+1]{foo}[$gbl]: value ok 5241 - $vrgbl->[$lex+1]{foo}[$gbl]: no exception ok 5242 - $vrgbl->[$lex+1]{foo}[$gbl]: value ok 5243 - $vrgbl->[$lex+1]{foo}[$gbl] = 123: no exception ok 5244 - $vrgbl->[$lex+1]{foo}[$gbl] = 123: value ok 5245 - exists $vrgbl->[$lex+1]{foo}[$gbl]: no exception ok 5246 - exists $vrgbl->[$lex+1]{foo}[$gbl]: value ok 5247 - delete $vrgbl->[$lex+1]{foo}[$gbl]: no exception ok 5248 - delete $vrgbl->[$lex+1]{foo}[$gbl]: value ok 5249 - $vlex{foo}{foo}[$gbl]: no exception ok 5250 - $vlex{foo}{foo}[$gbl]: value ok 5251 - $vlex{foo}{foo}[$gbl] = 123: no exception ok 5252 - $vlex{foo}{foo}[$gbl] = 123: value ok 5253 - exists $vlex{foo}{foo}[$gbl]: no exception ok 5254 - exists $vlex{foo}{foo}[$gbl]: value ok 5255 - delete $vlex{foo}{foo}[$gbl]: no exception ok 5256 - delete $vlex{foo}{foo}[$gbl]: value ok 5257 - $vgbl{foo}{foo}[$gbl]: no exception ok 5258 - $vgbl{foo}{foo}[$gbl]: value ok 5259 - $vgbl{foo}{foo}[$gbl] = 123: no exception ok 5260 - $vgbl{foo}{foo}[$gbl] = 123: value ok 5261 - exists $vgbl{foo}{foo}[$gbl]: no exception ok 5262 - exists $vgbl{foo}{foo}[$gbl]: value ok 5263 - delete $vgbl{foo}{foo}[$gbl]: no exception ok 5264 - delete $vgbl{foo}{foo}[$gbl]: value ok 5265 - $vrlex->{foo}{foo}[$gbl]: no exception ok 5266 - $vrlex->{foo}{foo}[$gbl]: value ok 5267 - $vrlex->{foo}{foo}[$gbl] = 123: no exception ok 5268 - $vrlex->{foo}{foo}[$gbl] = 123: value ok 5269 - exists $vrlex->{foo}{foo}[$gbl]: no exception ok 5270 - exists $vrlex->{foo}{foo}[$gbl]: value ok 5271 - delete $vrlex->{foo}{foo}[$gbl]: no exception ok 5272 - delete $vrlex->{foo}{foo}[$gbl]: value ok 5273 - $vrgbl->{foo}{foo}[$gbl]: no exception ok 5274 - $vrgbl->{foo}{foo}[$gbl]: value ok 5275 - $vrgbl->{foo}{foo}[$gbl] = 123: no exception ok 5276 - $vrgbl->{foo}{foo}[$gbl] = 123: value ok 5277 - exists $vrgbl->{foo}{foo}[$gbl]: no exception ok 5278 - exists $vrgbl->{foo}{foo}[$gbl]: value ok 5279 - delete $vrgbl->{foo}{foo}[$gbl]: no exception ok 5280 - delete $vrgbl->{foo}{foo}[$gbl]: value ok 5281 - $vlex{$lex}{foo}[$gbl]: no exception ok 5282 - $vlex{$lex}{foo}[$gbl]: value ok 5283 - $vlex{$lex}{foo}[$gbl] = 123: no exception ok 5284 - $vlex{$lex}{foo}[$gbl] = 123: value ok 5285 - exists $vlex{$lex}{foo}[$gbl]: no exception ok 5286 - exists $vlex{$lex}{foo}[$gbl]: value ok 5287 - delete $vlex{$lex}{foo}[$gbl]: no exception ok 5288 - delete $vlex{$lex}{foo}[$gbl]: value ok 5289 - $vgbl{$lex}{foo}[$gbl]: no exception ok 5290 - $vgbl{$lex}{foo}[$gbl]: value ok 5291 - $vgbl{$lex}{foo}[$gbl] = 123: no exception ok 5292 - $vgbl{$lex}{foo}[$gbl] = 123: value ok 5293 - exists $vgbl{$lex}{foo}[$gbl]: no exception ok 5294 - exists $vgbl{$lex}{foo}[$gbl]: value ok 5295 - delete $vgbl{$lex}{foo}[$gbl]: no exception ok 5296 - delete $vgbl{$lex}{foo}[$gbl]: value ok 5297 - $vrlex->{$lex}{foo}[$gbl]: no exception ok 5298 - $vrlex->{$lex}{foo}[$gbl]: value ok 5299 - $vrlex->{$lex}{foo}[$gbl] = 123: no exception ok 5300 - $vrlex->{$lex}{foo}[$gbl] = 123: value ok 5301 - exists $vrlex->{$lex}{foo}[$gbl]: no exception ok 5302 - exists $vrlex->{$lex}{foo}[$gbl]: value ok 5303 - delete $vrlex->{$lex}{foo}[$gbl]: no exception ok 5304 - delete $vrlex->{$lex}{foo}[$gbl]: value ok 5305 - $vrgbl->{$lex}{foo}[$gbl]: no exception ok 5306 - $vrgbl->{$lex}{foo}[$gbl]: value ok 5307 - $vrgbl->{$lex}{foo}[$gbl] = 123: no exception ok 5308 - $vrgbl->{$lex}{foo}[$gbl] = 123: value ok 5309 - exists $vrgbl->{$lex}{foo}[$gbl]: no exception ok 5310 - exists $vrgbl->{$lex}{foo}[$gbl]: value ok 5311 - delete $vrgbl->{$lex}{foo}[$gbl]: no exception ok 5312 - delete $vrgbl->{$lex}{foo}[$gbl]: value ok 5313 - $vlex{$gbl}{foo}[$gbl]: no exception ok 5314 - $vlex{$gbl}{foo}[$gbl]: value ok 5315 - $vlex{$gbl}{foo}[$gbl] = 123: no exception ok 5316 - $vlex{$gbl}{foo}[$gbl] = 123: value ok 5317 - exists $vlex{$gbl}{foo}[$gbl]: no exception ok 5318 - exists $vlex{$gbl}{foo}[$gbl]: value ok 5319 - delete $vlex{$gbl}{foo}[$gbl]: no exception ok 5320 - delete $vlex{$gbl}{foo}[$gbl]: value ok 5321 - $vgbl{$gbl}{foo}[$gbl]: no exception ok 5322 - $vgbl{$gbl}{foo}[$gbl]: value ok 5323 - $vgbl{$gbl}{foo}[$gbl] = 123: no exception ok 5324 - $vgbl{$gbl}{foo}[$gbl] = 123: value ok 5325 - exists $vgbl{$gbl}{foo}[$gbl]: no exception ok 5326 - exists $vgbl{$gbl}{foo}[$gbl]: value ok 5327 - delete $vgbl{$gbl}{foo}[$gbl]: no exception ok 5328 - delete $vgbl{$gbl}{foo}[$gbl]: value ok 5329 - $vrlex->{$gbl}{foo}[$gbl]: no exception ok 5330 - $vrlex->{$gbl}{foo}[$gbl]: value ok 5331 - $vrlex->{$gbl}{foo}[$gbl] = 123: no exception ok 5332 - $vrlex->{$gbl}{foo}[$gbl] = 123: value ok 5333 - exists $vrlex->{$gbl}{foo}[$gbl]: no exception ok 5334 - exists $vrlex->{$gbl}{foo}[$gbl]: value ok 5335 - delete $vrlex->{$gbl}{foo}[$gbl]: no exception ok 5336 - delete $vrlex->{$gbl}{foo}[$gbl]: value ok 5337 - $vrgbl->{$gbl}{foo}[$gbl]: no exception ok 5338 - $vrgbl->{$gbl}{foo}[$gbl]: value ok 5339 - $vrgbl->{$gbl}{foo}[$gbl] = 123: no exception ok 5340 - $vrgbl->{$gbl}{foo}[$gbl] = 123: value ok 5341 - exists $vrgbl->{$gbl}{foo}[$gbl]: no exception ok 5342 - exists $vrgbl->{$gbl}{foo}[$gbl]: value ok 5343 - delete $vrgbl->{$gbl}{foo}[$gbl]: no exception ok 5344 - delete $vrgbl->{$gbl}{foo}[$gbl]: value ok 5345 - $vlex{"x$lex"}{foo}[$gbl]: no exception ok 5346 - $vlex{"x$lex"}{foo}[$gbl]: value ok 5347 - $vlex{"x$lex"}{foo}[$gbl] = 123: no exception ok 5348 - $vlex{"x$lex"}{foo}[$gbl] = 123: value ok 5349 - exists $vlex{"x$lex"}{foo}[$gbl]: no exception ok 5350 - exists $vlex{"x$lex"}{foo}[$gbl]: value ok 5351 - delete $vlex{"x$lex"}{foo}[$gbl]: no exception ok 5352 - delete $vlex{"x$lex"}{foo}[$gbl]: value ok 5353 - $vgbl{"x$lex"}{foo}[$gbl]: no exception ok 5354 - $vgbl{"x$lex"}{foo}[$gbl]: value ok 5355 - $vgbl{"x$lex"}{foo}[$gbl] = 123: no exception ok 5356 - $vgbl{"x$lex"}{foo}[$gbl] = 123: value ok 5357 - exists $vgbl{"x$lex"}{foo}[$gbl]: no exception ok 5358 - exists $vgbl{"x$lex"}{foo}[$gbl]: value ok 5359 - delete $vgbl{"x$lex"}{foo}[$gbl]: no exception ok 5360 - delete $vgbl{"x$lex"}{foo}[$gbl]: value ok 5361 - $vrlex->{"x$lex"}{foo}[$gbl]: no exception ok 5362 - $vrlex->{"x$lex"}{foo}[$gbl]: value ok 5363 - $vrlex->{"x$lex"}{foo}[$gbl] = 123: no exception ok 5364 - $vrlex->{"x$lex"}{foo}[$gbl] = 123: value ok 5365 - exists $vrlex->{"x$lex"}{foo}[$gbl]: no exception ok 5366 - exists $vrlex->{"x$lex"}{foo}[$gbl]: value ok 5367 - delete $vrlex->{"x$lex"}{foo}[$gbl]: no exception ok 5368 - delete $vrlex->{"x$lex"}{foo}[$gbl]: value ok 5369 - $vrgbl->{"x$lex"}{foo}[$gbl]: no exception ok 5370 - $vrgbl->{"x$lex"}{foo}[$gbl]: value ok 5371 - $vrgbl->{"x$lex"}{foo}[$gbl] = 123: no exception ok 5372 - $vrgbl->{"x$lex"}{foo}[$gbl] = 123: value ok 5373 - exists $vrgbl->{"x$lex"}{foo}[$gbl]: no exception ok 5374 - exists $vrgbl->{"x$lex"}{foo}[$gbl]: value ok 5375 - delete $vrgbl->{"x$lex"}{foo}[$gbl]: no exception ok 5376 - delete $vrgbl->{"x$lex"}{foo}[$gbl]: value ok 5377 - $vlex[0]{$lex}[$gbl]: no exception ok 5378 - $vlex[0]{$lex}[$gbl]: value ok 5379 - $vlex[0]{$lex}[$gbl] = 123: no exception ok 5380 - $vlex[0]{$lex}[$gbl] = 123: value ok 5381 - exists $vlex[0]{$lex}[$gbl]: no exception ok 5382 - exists $vlex[0]{$lex}[$gbl]: value ok 5383 - delete $vlex[0]{$lex}[$gbl]: no exception ok 5384 - delete $vlex[0]{$lex}[$gbl]: value ok 5385 - $vgbl[0]{$lex}[$gbl]: no exception ok 5386 - $vgbl[0]{$lex}[$gbl]: value ok 5387 - $vgbl[0]{$lex}[$gbl] = 123: no exception ok 5388 - $vgbl[0]{$lex}[$gbl] = 123: value ok 5389 - exists $vgbl[0]{$lex}[$gbl]: no exception ok 5390 - exists $vgbl[0]{$lex}[$gbl]: value ok 5391 - delete $vgbl[0]{$lex}[$gbl]: no exception ok 5392 - delete $vgbl[0]{$lex}[$gbl]: value ok 5393 - $vrlex->[0]{$lex}[$gbl]: no exception ok 5394 - $vrlex->[0]{$lex}[$gbl]: value ok 5395 - $vrlex->[0]{$lex}[$gbl] = 123: no exception ok 5396 - $vrlex->[0]{$lex}[$gbl] = 123: value ok 5397 - exists $vrlex->[0]{$lex}[$gbl]: no exception ok 5398 - exists $vrlex->[0]{$lex}[$gbl]: value ok 5399 - delete $vrlex->[0]{$lex}[$gbl]: no exception ok 5400 - delete $vrlex->[0]{$lex}[$gbl]: value ok 5401 - $vrgbl->[0]{$lex}[$gbl]: no exception ok 5402 - $vrgbl->[0]{$lex}[$gbl]: value ok 5403 - $vrgbl->[0]{$lex}[$gbl] = 123: no exception ok 5404 - $vrgbl->[0]{$lex}[$gbl] = 123: value ok 5405 - exists $vrgbl->[0]{$lex}[$gbl]: no exception ok 5406 - exists $vrgbl->[0]{$lex}[$gbl]: value ok 5407 - delete $vrgbl->[0]{$lex}[$gbl]: no exception ok 5408 - delete $vrgbl->[0]{$lex}[$gbl]: value ok 5409 - $vlex[$lex]{$lex}[$gbl]: no exception ok 5410 - $vlex[$lex]{$lex}[$gbl]: value ok 5411 - $vlex[$lex]{$lex}[$gbl] = 123: no exception ok 5412 - $vlex[$lex]{$lex}[$gbl] = 123: value ok 5413 - exists $vlex[$lex]{$lex}[$gbl]: no exception ok 5414 - exists $vlex[$lex]{$lex}[$gbl]: value ok 5415 - delete $vlex[$lex]{$lex}[$gbl]: no exception ok 5416 - delete $vlex[$lex]{$lex}[$gbl]: value ok 5417 - $vgbl[$lex]{$lex}[$gbl]: no exception ok 5418 - $vgbl[$lex]{$lex}[$gbl]: value ok 5419 - $vgbl[$lex]{$lex}[$gbl] = 123: no exception ok 5420 - $vgbl[$lex]{$lex}[$gbl] = 123: value ok 5421 - exists $vgbl[$lex]{$lex}[$gbl]: no exception ok 5422 - exists $vgbl[$lex]{$lex}[$gbl]: value ok 5423 - delete $vgbl[$lex]{$lex}[$gbl]: no exception ok 5424 - delete $vgbl[$lex]{$lex}[$gbl]: value ok 5425 - $vrlex->[$lex]{$lex}[$gbl]: no exception ok 5426 - $vrlex->[$lex]{$lex}[$gbl]: value ok 5427 - $vrlex->[$lex]{$lex}[$gbl] = 123: no exception ok 5428 - $vrlex->[$lex]{$lex}[$gbl] = 123: value ok 5429 - exists $vrlex->[$lex]{$lex}[$gbl]: no exception ok 5430 - exists $vrlex->[$lex]{$lex}[$gbl]: value ok 5431 - delete $vrlex->[$lex]{$lex}[$gbl]: no exception ok 5432 - delete $vrlex->[$lex]{$lex}[$gbl]: value ok 5433 - $vrgbl->[$lex]{$lex}[$gbl]: no exception ok 5434 - $vrgbl->[$lex]{$lex}[$gbl]: value ok 5435 - $vrgbl->[$lex]{$lex}[$gbl] = 123: no exception ok 5436 - $vrgbl->[$lex]{$lex}[$gbl] = 123: value ok 5437 - exists $vrgbl->[$lex]{$lex}[$gbl]: no exception ok 5438 - exists $vrgbl->[$lex]{$lex}[$gbl]: value ok 5439 - delete $vrgbl->[$lex]{$lex}[$gbl]: no exception ok 5440 - delete $vrgbl->[$lex]{$lex}[$gbl]: value ok 5441 - $vlex[$gbl]{$lex}[$gbl]: no exception ok 5442 - $vlex[$gbl]{$lex}[$gbl]: value ok 5443 - $vlex[$gbl]{$lex}[$gbl] = 123: no exception ok 5444 - $vlex[$gbl]{$lex}[$gbl] = 123: value ok 5445 - exists $vlex[$gbl]{$lex}[$gbl]: no exception ok 5446 - exists $vlex[$gbl]{$lex}[$gbl]: value ok 5447 - delete $vlex[$gbl]{$lex}[$gbl]: no exception ok 5448 - delete $vlex[$gbl]{$lex}[$gbl]: value ok 5449 - $vgbl[$gbl]{$lex}[$gbl]: no exception ok 5450 - $vgbl[$gbl]{$lex}[$gbl]: value ok 5451 - $vgbl[$gbl]{$lex}[$gbl] = 123: no exception ok 5452 - $vgbl[$gbl]{$lex}[$gbl] = 123: value ok 5453 - exists $vgbl[$gbl]{$lex}[$gbl]: no exception ok 5454 - exists $vgbl[$gbl]{$lex}[$gbl]: value ok 5455 - delete $vgbl[$gbl]{$lex}[$gbl]: no exception ok 5456 - delete $vgbl[$gbl]{$lex}[$gbl]: value ok 5457 - $vrlex->[$gbl]{$lex}[$gbl]: no exception ok 5458 - $vrlex->[$gbl]{$lex}[$gbl]: value ok 5459 - $vrlex->[$gbl]{$lex}[$gbl] = 123: no exception ok 5460 - $vrlex->[$gbl]{$lex}[$gbl] = 123: value ok 5461 - exists $vrlex->[$gbl]{$lex}[$gbl]: no exception ok 5462 - exists $vrlex->[$gbl]{$lex}[$gbl]: value ok 5463 - delete $vrlex->[$gbl]{$lex}[$gbl]: no exception ok 5464 - delete $vrlex->[$gbl]{$lex}[$gbl]: value ok 5465 - $vrgbl->[$gbl]{$lex}[$gbl]: no exception ok 5466 - $vrgbl->[$gbl]{$lex}[$gbl]: value ok 5467 - $vrgbl->[$gbl]{$lex}[$gbl] = 123: no exception ok 5468 - $vrgbl->[$gbl]{$lex}[$gbl] = 123: value ok 5469 - exists $vrgbl->[$gbl]{$lex}[$gbl]: no exception ok 5470 - exists $vrgbl->[$gbl]{$lex}[$gbl]: value ok 5471 - delete $vrgbl->[$gbl]{$lex}[$gbl]: no exception ok 5472 - delete $vrgbl->[$gbl]{$lex}[$gbl]: value ok 5473 - $vlex[$lex+1]{$lex}[$gbl]: no exception ok 5474 - $vlex[$lex+1]{$lex}[$gbl]: value ok 5475 - $vlex[$lex+1]{$lex}[$gbl] = 123: no exception ok 5476 - $vlex[$lex+1]{$lex}[$gbl] = 123: value ok 5477 - exists $vlex[$lex+1]{$lex}[$gbl]: no exception ok 5478 - exists $vlex[$lex+1]{$lex}[$gbl]: value ok 5479 - delete $vlex[$lex+1]{$lex}[$gbl]: no exception ok 5480 - delete $vlex[$lex+1]{$lex}[$gbl]: value ok 5481 - $vgbl[$lex+1]{$lex}[$gbl]: no exception ok 5482 - $vgbl[$lex+1]{$lex}[$gbl]: value ok 5483 - $vgbl[$lex+1]{$lex}[$gbl] = 123: no exception ok 5484 - $vgbl[$lex+1]{$lex}[$gbl] = 123: value ok 5485 - exists $vgbl[$lex+1]{$lex}[$gbl]: no exception ok 5486 - exists $vgbl[$lex+1]{$lex}[$gbl]: value ok 5487 - delete $vgbl[$lex+1]{$lex}[$gbl]: no exception ok 5488 - delete $vgbl[$lex+1]{$lex}[$gbl]: value ok 5489 - $vrlex->[$lex+1]{$lex}[$gbl]: no exception ok 5490 - $vrlex->[$lex+1]{$lex}[$gbl]: value ok 5491 - $vrlex->[$lex+1]{$lex}[$gbl] = 123: no exception ok 5492 - $vrlex->[$lex+1]{$lex}[$gbl] = 123: value ok 5493 - exists $vrlex->[$lex+1]{$lex}[$gbl]: no exception ok 5494 - exists $vrlex->[$lex+1]{$lex}[$gbl]: value ok 5495 - delete $vrlex->[$lex+1]{$lex}[$gbl]: no exception ok 5496 - delete $vrlex->[$lex+1]{$lex}[$gbl]: value ok 5497 - $vrgbl->[$lex+1]{$lex}[$gbl]: no exception ok 5498 - $vrgbl->[$lex+1]{$lex}[$gbl]: value ok 5499 - $vrgbl->[$lex+1]{$lex}[$gbl] = 123: no exception ok 5500 - $vrgbl->[$lex+1]{$lex}[$gbl] = 123: value ok 5501 - exists $vrgbl->[$lex+1]{$lex}[$gbl]: no exception ok 5502 - exists $vrgbl->[$lex+1]{$lex}[$gbl]: value ok 5503 - delete $vrgbl->[$lex+1]{$lex}[$gbl]: no exception ok 5504 - delete $vrgbl->[$lex+1]{$lex}[$gbl]: value ok 5505 - $vlex{foo}{$lex}[$gbl]: no exception ok 5506 - $vlex{foo}{$lex}[$gbl]: value ok 5507 - $vlex{foo}{$lex}[$gbl] = 123: no exception ok 5508 - $vlex{foo}{$lex}[$gbl] = 123: value ok 5509 - exists $vlex{foo}{$lex}[$gbl]: no exception ok 5510 - exists $vlex{foo}{$lex}[$gbl]: value ok 5511 - delete $vlex{foo}{$lex}[$gbl]: no exception ok 5512 - delete $vlex{foo}{$lex}[$gbl]: value ok 5513 - $vgbl{foo}{$lex}[$gbl]: no exception ok 5514 - $vgbl{foo}{$lex}[$gbl]: value ok 5515 - $vgbl{foo}{$lex}[$gbl] = 123: no exception ok 5516 - $vgbl{foo}{$lex}[$gbl] = 123: value ok 5517 - exists $vgbl{foo}{$lex}[$gbl]: no exception ok 5518 - exists $vgbl{foo}{$lex}[$gbl]: value ok 5519 - delete $vgbl{foo}{$lex}[$gbl]: no exception ok 5520 - delete $vgbl{foo}{$lex}[$gbl]: value ok 5521 - $vrlex->{foo}{$lex}[$gbl]: no exception ok 5522 - $vrlex->{foo}{$lex}[$gbl]: value ok 5523 - $vrlex->{foo}{$lex}[$gbl] = 123: no exception ok 5524 - $vrlex->{foo}{$lex}[$gbl] = 123: value ok 5525 - exists $vrlex->{foo}{$lex}[$gbl]: no exception ok 5526 - exists $vrlex->{foo}{$lex}[$gbl]: value ok 5527 - delete $vrlex->{foo}{$lex}[$gbl]: no exception ok 5528 - delete $vrlex->{foo}{$lex}[$gbl]: value ok 5529 - $vrgbl->{foo}{$lex}[$gbl]: no exception ok 5530 - $vrgbl->{foo}{$lex}[$gbl]: value ok 5531 - $vrgbl->{foo}{$lex}[$gbl] = 123: no exception ok 5532 - $vrgbl->{foo}{$lex}[$gbl] = 123: value ok 5533 - exists $vrgbl->{foo}{$lex}[$gbl]: no exception ok 5534 - exists $vrgbl->{foo}{$lex}[$gbl]: value ok 5535 - delete $vrgbl->{foo}{$lex}[$gbl]: no exception ok 5536 - delete $vrgbl->{foo}{$lex}[$gbl]: value ok 5537 - $vlex{$lex}{$lex}[$gbl]: no exception ok 5538 - $vlex{$lex}{$lex}[$gbl]: value ok 5539 - $vlex{$lex}{$lex}[$gbl] = 123: no exception ok 5540 - $vlex{$lex}{$lex}[$gbl] = 123: value ok 5541 - exists $vlex{$lex}{$lex}[$gbl]: no exception ok 5542 - exists $vlex{$lex}{$lex}[$gbl]: value ok 5543 - delete $vlex{$lex}{$lex}[$gbl]: no exception ok 5544 - delete $vlex{$lex}{$lex}[$gbl]: value ok 5545 - $vgbl{$lex}{$lex}[$gbl]: no exception ok 5546 - $vgbl{$lex}{$lex}[$gbl]: value ok 5547 - $vgbl{$lex}{$lex}[$gbl] = 123: no exception ok 5548 - $vgbl{$lex}{$lex}[$gbl] = 123: value ok 5549 - exists $vgbl{$lex}{$lex}[$gbl]: no exception ok 5550 - exists $vgbl{$lex}{$lex}[$gbl]: value ok 5551 - delete $vgbl{$lex}{$lex}[$gbl]: no exception ok 5552 - delete $vgbl{$lex}{$lex}[$gbl]: value ok 5553 - $vrlex->{$lex}{$lex}[$gbl]: no exception ok 5554 - $vrlex->{$lex}{$lex}[$gbl]: value ok 5555 - $vrlex->{$lex}{$lex}[$gbl] = 123: no exception ok 5556 - $vrlex->{$lex}{$lex}[$gbl] = 123: value ok 5557 - exists $vrlex->{$lex}{$lex}[$gbl]: no exception ok 5558 - exists $vrlex->{$lex}{$lex}[$gbl]: value ok 5559 - delete $vrlex->{$lex}{$lex}[$gbl]: no exception ok 5560 - delete $vrlex->{$lex}{$lex}[$gbl]: value ok 5561 - $vrgbl->{$lex}{$lex}[$gbl]: no exception ok 5562 - $vrgbl->{$lex}{$lex}[$gbl]: value ok 5563 - $vrgbl->{$lex}{$lex}[$gbl] = 123: no exception ok 5564 - $vrgbl->{$lex}{$lex}[$gbl] = 123: value ok 5565 - exists $vrgbl->{$lex}{$lex}[$gbl]: no exception ok 5566 - exists $vrgbl->{$lex}{$lex}[$gbl]: value ok 5567 - delete $vrgbl->{$lex}{$lex}[$gbl]: no exception ok 5568 - delete $vrgbl->{$lex}{$lex}[$gbl]: value ok 5569 - $vlex{$gbl}{$lex}[$gbl]: no exception ok 5570 - $vlex{$gbl}{$lex}[$gbl]: value ok 5571 - $vlex{$gbl}{$lex}[$gbl] = 123: no exception ok 5572 - $vlex{$gbl}{$lex}[$gbl] = 123: value ok 5573 - exists $vlex{$gbl}{$lex}[$gbl]: no exception ok 5574 - exists $vlex{$gbl}{$lex}[$gbl]: value ok 5575 - delete $vlex{$gbl}{$lex}[$gbl]: no exception ok 5576 - delete $vlex{$gbl}{$lex}[$gbl]: value ok 5577 - $vgbl{$gbl}{$lex}[$gbl]: no exception ok 5578 - $vgbl{$gbl}{$lex}[$gbl]: value ok 5579 - $vgbl{$gbl}{$lex}[$gbl] = 123: no exception ok 5580 - $vgbl{$gbl}{$lex}[$gbl] = 123: value ok 5581 - exists $vgbl{$gbl}{$lex}[$gbl]: no exception ok 5582 - exists $vgbl{$gbl}{$lex}[$gbl]: value ok 5583 - delete $vgbl{$gbl}{$lex}[$gbl]: no exception ok 5584 - delete $vgbl{$gbl}{$lex}[$gbl]: value ok 5585 - $vrlex->{$gbl}{$lex}[$gbl]: no exception ok 5586 - $vrlex->{$gbl}{$lex}[$gbl]: value ok 5587 - $vrlex->{$gbl}{$lex}[$gbl] = 123: no exception ok 5588 - $vrlex->{$gbl}{$lex}[$gbl] = 123: value ok 5589 - exists $vrlex->{$gbl}{$lex}[$gbl]: no exception ok 5590 - exists $vrlex->{$gbl}{$lex}[$gbl]: value ok 5591 - delete $vrlex->{$gbl}{$lex}[$gbl]: no exception ok 5592 - delete $vrlex->{$gbl}{$lex}[$gbl]: value ok 5593 - $vrgbl->{$gbl}{$lex}[$gbl]: no exception ok 5594 - $vrgbl->{$gbl}{$lex}[$gbl]: value ok 5595 - $vrgbl->{$gbl}{$lex}[$gbl] = 123: no exception ok 5596 - $vrgbl->{$gbl}{$lex}[$gbl] = 123: value ok 5597 - exists $vrgbl->{$gbl}{$lex}[$gbl]: no exception ok 5598 - exists $vrgbl->{$gbl}{$lex}[$gbl]: value ok 5599 - delete $vrgbl->{$gbl}{$lex}[$gbl]: no exception ok 5600 - delete $vrgbl->{$gbl}{$lex}[$gbl]: value ok 5601 - $vlex{"x$lex"}{$lex}[$gbl]: no exception ok 5602 - $vlex{"x$lex"}{$lex}[$gbl]: value ok 5603 - $vlex{"x$lex"}{$lex}[$gbl] = 123: no exception ok 5604 - $vlex{"x$lex"}{$lex}[$gbl] = 123: value ok 5605 - exists $vlex{"x$lex"}{$lex}[$gbl]: no exception ok 5606 - exists $vlex{"x$lex"}{$lex}[$gbl]: value ok 5607 - delete $vlex{"x$lex"}{$lex}[$gbl]: no exception ok 5608 - delete $vlex{"x$lex"}{$lex}[$gbl]: value ok 5609 - $vgbl{"x$lex"}{$lex}[$gbl]: no exception ok 5610 - $vgbl{"x$lex"}{$lex}[$gbl]: value ok 5611 - $vgbl{"x$lex"}{$lex}[$gbl] = 123: no exception ok 5612 - $vgbl{"x$lex"}{$lex}[$gbl] = 123: value ok 5613 - exists $vgbl{"x$lex"}{$lex}[$gbl]: no exception ok 5614 - exists $vgbl{"x$lex"}{$lex}[$gbl]: value ok 5615 - delete $vgbl{"x$lex"}{$lex}[$gbl]: no exception ok 5616 - delete $vgbl{"x$lex"}{$lex}[$gbl]: value ok 5617 - $vrlex->{"x$lex"}{$lex}[$gbl]: no exception ok 5618 - $vrlex->{"x$lex"}{$lex}[$gbl]: value ok 5619 - $vrlex->{"x$lex"}{$lex}[$gbl] = 123: no exception ok 5620 - $vrlex->{"x$lex"}{$lex}[$gbl] = 123: value ok 5621 - exists $vrlex->{"x$lex"}{$lex}[$gbl]: no exception ok 5622 - exists $vrlex->{"x$lex"}{$lex}[$gbl]: value ok 5623 - delete $vrlex->{"x$lex"}{$lex}[$gbl]: no exception ok 5624 - delete $vrlex->{"x$lex"}{$lex}[$gbl]: value ok 5625 - $vrgbl->{"x$lex"}{$lex}[$gbl]: no exception ok 5626 - $vrgbl->{"x$lex"}{$lex}[$gbl]: value ok 5627 - $vrgbl->{"x$lex"}{$lex}[$gbl] = 123: no exception ok 5628 - $vrgbl->{"x$lex"}{$lex}[$gbl] = 123: value ok 5629 - exists $vrgbl->{"x$lex"}{$lex}[$gbl]: no exception ok 5630 - exists $vrgbl->{"x$lex"}{$lex}[$gbl]: value ok 5631 - delete $vrgbl->{"x$lex"}{$lex}[$gbl]: no exception ok 5632 - delete $vrgbl->{"x$lex"}{$lex}[$gbl]: value ok 5633 - $vlex[0]{$gbl}[$gbl]: no exception ok 5634 - $vlex[0]{$gbl}[$gbl]: value ok 5635 - $vlex[0]{$gbl}[$gbl] = 123: no exception ok 5636 - $vlex[0]{$gbl}[$gbl] = 123: value ok 5637 - exists $vlex[0]{$gbl}[$gbl]: no exception ok 5638 - exists $vlex[0]{$gbl}[$gbl]: value ok 5639 - delete $vlex[0]{$gbl}[$gbl]: no exception ok 5640 - delete $vlex[0]{$gbl}[$gbl]: value ok 5641 - $vgbl[0]{$gbl}[$gbl]: no exception ok 5642 - $vgbl[0]{$gbl}[$gbl]: value ok 5643 - $vgbl[0]{$gbl}[$gbl] = 123: no exception ok 5644 - $vgbl[0]{$gbl}[$gbl] = 123: value ok 5645 - exists $vgbl[0]{$gbl}[$gbl]: no exception ok 5646 - exists $vgbl[0]{$gbl}[$gbl]: value ok 5647 - delete $vgbl[0]{$gbl}[$gbl]: no exception ok 5648 - delete $vgbl[0]{$gbl}[$gbl]: value ok 5649 - $vrlex->[0]{$gbl}[$gbl]: no exception ok 5650 - $vrlex->[0]{$gbl}[$gbl]: value ok 5651 - $vrlex->[0]{$gbl}[$gbl] = 123: no exception ok 5652 - $vrlex->[0]{$gbl}[$gbl] = 123: value ok 5653 - exists $vrlex->[0]{$gbl}[$gbl]: no exception ok 5654 - exists $vrlex->[0]{$gbl}[$gbl]: value ok 5655 - delete $vrlex->[0]{$gbl}[$gbl]: no exception ok 5656 - delete $vrlex->[0]{$gbl}[$gbl]: value ok 5657 - $vrgbl->[0]{$gbl}[$gbl]: no exception ok 5658 - $vrgbl->[0]{$gbl}[$gbl]: value ok 5659 - $vrgbl->[0]{$gbl}[$gbl] = 123: no exception ok 5660 - $vrgbl->[0]{$gbl}[$gbl] = 123: value ok 5661 - exists $vrgbl->[0]{$gbl}[$gbl]: no exception ok 5662 - exists $vrgbl->[0]{$gbl}[$gbl]: value ok 5663 - delete $vrgbl->[0]{$gbl}[$gbl]: no exception ok 5664 - delete $vrgbl->[0]{$gbl}[$gbl]: value ok 5665 - $vlex[$lex]{$gbl}[$gbl]: no exception ok 5666 - $vlex[$lex]{$gbl}[$gbl]: value ok 5667 - $vlex[$lex]{$gbl}[$gbl] = 123: no exception ok 5668 - $vlex[$lex]{$gbl}[$gbl] = 123: value ok 5669 - exists $vlex[$lex]{$gbl}[$gbl]: no exception ok 5670 - exists $vlex[$lex]{$gbl}[$gbl]: value ok 5671 - delete $vlex[$lex]{$gbl}[$gbl]: no exception ok 5672 - delete $vlex[$lex]{$gbl}[$gbl]: value ok 5673 - $vgbl[$lex]{$gbl}[$gbl]: no exception ok 5674 - $vgbl[$lex]{$gbl}[$gbl]: value ok 5675 - $vgbl[$lex]{$gbl}[$gbl] = 123: no exception ok 5676 - $vgbl[$lex]{$gbl}[$gbl] = 123: value ok 5677 - exists $vgbl[$lex]{$gbl}[$gbl]: no exception ok 5678 - exists $vgbl[$lex]{$gbl}[$gbl]: value ok 5679 - delete $vgbl[$lex]{$gbl}[$gbl]: no exception ok 5680 - delete $vgbl[$lex]{$gbl}[$gbl]: value ok 5681 - $vrlex->[$lex]{$gbl}[$gbl]: no exception ok 5682 - $vrlex->[$lex]{$gbl}[$gbl]: value ok 5683 - $vrlex->[$lex]{$gbl}[$gbl] = 123: no exception ok 5684 - $vrlex->[$lex]{$gbl}[$gbl] = 123: value ok 5685 - exists $vrlex->[$lex]{$gbl}[$gbl]: no exception ok 5686 - exists $vrlex->[$lex]{$gbl}[$gbl]: value ok 5687 - delete $vrlex->[$lex]{$gbl}[$gbl]: no exception ok 5688 - delete $vrlex->[$lex]{$gbl}[$gbl]: value ok 5689 - $vrgbl->[$lex]{$gbl}[$gbl]: no exception ok 5690 - $vrgbl->[$lex]{$gbl}[$gbl]: value ok 5691 - $vrgbl->[$lex]{$gbl}[$gbl] = 123: no exception ok 5692 - $vrgbl->[$lex]{$gbl}[$gbl] = 123: value ok 5693 - exists $vrgbl->[$lex]{$gbl}[$gbl]: no exception ok 5694 - exists $vrgbl->[$lex]{$gbl}[$gbl]: value ok 5695 - delete $vrgbl->[$lex]{$gbl}[$gbl]: no exception ok 5696 - delete $vrgbl->[$lex]{$gbl}[$gbl]: value ok 5697 - $vlex[$gbl]{$gbl}[$gbl]: no exception ok 5698 - $vlex[$gbl]{$gbl}[$gbl]: value ok 5699 - $vlex[$gbl]{$gbl}[$gbl] = 123: no exception ok 5700 - $vlex[$gbl]{$gbl}[$gbl] = 123: value ok 5701 - exists $vlex[$gbl]{$gbl}[$gbl]: no exception ok 5702 - exists $vlex[$gbl]{$gbl}[$gbl]: value ok 5703 - delete $vlex[$gbl]{$gbl}[$gbl]: no exception ok 5704 - delete $vlex[$gbl]{$gbl}[$gbl]: value ok 5705 - $vgbl[$gbl]{$gbl}[$gbl]: no exception ok 5706 - $vgbl[$gbl]{$gbl}[$gbl]: value ok 5707 - $vgbl[$gbl]{$gbl}[$gbl] = 123: no exception ok 5708 - $vgbl[$gbl]{$gbl}[$gbl] = 123: value ok 5709 - exists $vgbl[$gbl]{$gbl}[$gbl]: no exception ok 5710 - exists $vgbl[$gbl]{$gbl}[$gbl]: value ok 5711 - delete $vgbl[$gbl]{$gbl}[$gbl]: no exception ok 5712 - delete $vgbl[$gbl]{$gbl}[$gbl]: value ok 5713 - $vrlex->[$gbl]{$gbl}[$gbl]: no exception ok 5714 - $vrlex->[$gbl]{$gbl}[$gbl]: value ok 5715 - $vrlex->[$gbl]{$gbl}[$gbl] = 123: no exception ok 5716 - $vrlex->[$gbl]{$gbl}[$gbl] = 123: value ok 5717 - exists $vrlex->[$gbl]{$gbl}[$gbl]: no exception ok 5718 - exists $vrlex->[$gbl]{$gbl}[$gbl]: value ok 5719 - delete $vrlex->[$gbl]{$gbl}[$gbl]: no exception ok 5720 - delete $vrlex->[$gbl]{$gbl}[$gbl]: value ok 5721 - $vrgbl->[$gbl]{$gbl}[$gbl]: no exception ok 5722 - $vrgbl->[$gbl]{$gbl}[$gbl]: value ok 5723 - $vrgbl->[$gbl]{$gbl}[$gbl] = 123: no exception ok 5724 - $vrgbl->[$gbl]{$gbl}[$gbl] = 123: value ok 5725 - exists $vrgbl->[$gbl]{$gbl}[$gbl]: no exception ok 5726 - exists $vrgbl->[$gbl]{$gbl}[$gbl]: value ok 5727 - delete $vrgbl->[$gbl]{$gbl}[$gbl]: no exception ok 5728 - delete $vrgbl->[$gbl]{$gbl}[$gbl]: value ok 5729 - $vlex[$lex+1]{$gbl}[$gbl]: no exception ok 5730 - $vlex[$lex+1]{$gbl}[$gbl]: value ok 5731 - $vlex[$lex+1]{$gbl}[$gbl] = 123: no exception ok 5732 - $vlex[$lex+1]{$gbl}[$gbl] = 123: value ok 5733 - exists $vlex[$lex+1]{$gbl}[$gbl]: no exception ok 5734 - exists $vlex[$lex+1]{$gbl}[$gbl]: value ok 5735 - delete $vlex[$lex+1]{$gbl}[$gbl]: no exception ok 5736 - delete $vlex[$lex+1]{$gbl}[$gbl]: value ok 5737 - $vgbl[$lex+1]{$gbl}[$gbl]: no exception ok 5738 - $vgbl[$lex+1]{$gbl}[$gbl]: value ok 5739 - $vgbl[$lex+1]{$gbl}[$gbl] = 123: no exception ok 5740 - $vgbl[$lex+1]{$gbl}[$gbl] = 123: value ok 5741 - exists $vgbl[$lex+1]{$gbl}[$gbl]: no exception ok 5742 - exists $vgbl[$lex+1]{$gbl}[$gbl]: value ok 5743 - delete $vgbl[$lex+1]{$gbl}[$gbl]: no exception ok 5744 - delete $vgbl[$lex+1]{$gbl}[$gbl]: value ok 5745 - $vrlex->[$lex+1]{$gbl}[$gbl]: no exception ok 5746 - $vrlex->[$lex+1]{$gbl}[$gbl]: value ok 5747 - $vrlex->[$lex+1]{$gbl}[$gbl] = 123: no exception ok 5748 - $vrlex->[$lex+1]{$gbl}[$gbl] = 123: value ok 5749 - exists $vrlex->[$lex+1]{$gbl}[$gbl]: no exception ok 5750 - exists $vrlex->[$lex+1]{$gbl}[$gbl]: value ok 5751 - delete $vrlex->[$lex+1]{$gbl}[$gbl]: no exception ok 5752 - delete $vrlex->[$lex+1]{$gbl}[$gbl]: value ok 5753 - $vrgbl->[$lex+1]{$gbl}[$gbl]: no exception ok 5754 - $vrgbl->[$lex+1]{$gbl}[$gbl]: value ok 5755 - $vrgbl->[$lex+1]{$gbl}[$gbl] = 123: no exception ok 5756 - $vrgbl->[$lex+1]{$gbl}[$gbl] = 123: value ok 5757 - exists $vrgbl->[$lex+1]{$gbl}[$gbl]: no exception ok 5758 - exists $vrgbl->[$lex+1]{$gbl}[$gbl]: value ok 5759 - delete $vrgbl->[$lex+1]{$gbl}[$gbl]: no exception ok 5760 - delete $vrgbl->[$lex+1]{$gbl}[$gbl]: value ok 5761 - $vlex{foo}{$gbl}[$gbl]: no exception ok 5762 - $vlex{foo}{$gbl}[$gbl]: value ok 5763 - $vlex{foo}{$gbl}[$gbl] = 123: no exception ok 5764 - $vlex{foo}{$gbl}[$gbl] = 123: value ok 5765 - exists $vlex{foo}{$gbl}[$gbl]: no exception ok 5766 - exists $vlex{foo}{$gbl}[$gbl]: value ok 5767 - delete $vlex{foo}{$gbl}[$gbl]: no exception ok 5768 - delete $vlex{foo}{$gbl}[$gbl]: value ok 5769 - $vgbl{foo}{$gbl}[$gbl]: no exception ok 5770 - $vgbl{foo}{$gbl}[$gbl]: value ok 5771 - $vgbl{foo}{$gbl}[$gbl] = 123: no exception ok 5772 - $vgbl{foo}{$gbl}[$gbl] = 123: value ok 5773 - exists $vgbl{foo}{$gbl}[$gbl]: no exception ok 5774 - exists $vgbl{foo}{$gbl}[$gbl]: value ok 5775 - delete $vgbl{foo}{$gbl}[$gbl]: no exception ok 5776 - delete $vgbl{foo}{$gbl}[$gbl]: value ok 5777 - $vrlex->{foo}{$gbl}[$gbl]: no exception ok 5778 - $vrlex->{foo}{$gbl}[$gbl]: value ok 5779 - $vrlex->{foo}{$gbl}[$gbl] = 123: no exception ok 5780 - $vrlex->{foo}{$gbl}[$gbl] = 123: value ok 5781 - exists $vrlex->{foo}{$gbl}[$gbl]: no exception ok 5782 - exists $vrlex->{foo}{$gbl}[$gbl]: value ok 5783 - delete $vrlex->{foo}{$gbl}[$gbl]: no exception ok 5784 - delete $vrlex->{foo}{$gbl}[$gbl]: value ok 5785 - $vrgbl->{foo}{$gbl}[$gbl]: no exception ok 5786 - $vrgbl->{foo}{$gbl}[$gbl]: value ok 5787 - $vrgbl->{foo}{$gbl}[$gbl] = 123: no exception ok 5788 - $vrgbl->{foo}{$gbl}[$gbl] = 123: value ok 5789 - exists $vrgbl->{foo}{$gbl}[$gbl]: no exception ok 5790 - exists $vrgbl->{foo}{$gbl}[$gbl]: value ok 5791 - delete $vrgbl->{foo}{$gbl}[$gbl]: no exception ok 5792 - delete $vrgbl->{foo}{$gbl}[$gbl]: value ok 5793 - $vlex{$lex}{$gbl}[$gbl]: no exception ok 5794 - $vlex{$lex}{$gbl}[$gbl]: value ok 5795 - $vlex{$lex}{$gbl}[$gbl] = 123: no exception ok 5796 - $vlex{$lex}{$gbl}[$gbl] = 123: value ok 5797 - exists $vlex{$lex}{$gbl}[$gbl]: no exception ok 5798 - exists $vlex{$lex}{$gbl}[$gbl]: value ok 5799 - delete $vlex{$lex}{$gbl}[$gbl]: no exception ok 5800 - delete $vlex{$lex}{$gbl}[$gbl]: value ok 5801 - $vgbl{$lex}{$gbl}[$gbl]: no exception ok 5802 - $vgbl{$lex}{$gbl}[$gbl]: value ok 5803 - $vgbl{$lex}{$gbl}[$gbl] = 123: no exception ok 5804 - $vgbl{$lex}{$gbl}[$gbl] = 123: value ok 5805 - exists $vgbl{$lex}{$gbl}[$gbl]: no exception ok 5806 - exists $vgbl{$lex}{$gbl}[$gbl]: value ok 5807 - delete $vgbl{$lex}{$gbl}[$gbl]: no exception ok 5808 - delete $vgbl{$lex}{$gbl}[$gbl]: value ok 5809 - $vrlex->{$lex}{$gbl}[$gbl]: no exception ok 5810 - $vrlex->{$lex}{$gbl}[$gbl]: value ok 5811 - $vrlex->{$lex}{$gbl}[$gbl] = 123: no exception ok 5812 - $vrlex->{$lex}{$gbl}[$gbl] = 123: value ok 5813 - exists $vrlex->{$lex}{$gbl}[$gbl]: no exception ok 5814 - exists $vrlex->{$lex}{$gbl}[$gbl]: value ok 5815 - delete $vrlex->{$lex}{$gbl}[$gbl]: no exception ok 5816 - delete $vrlex->{$lex}{$gbl}[$gbl]: value ok 5817 - $vrgbl->{$lex}{$gbl}[$gbl]: no exception ok 5818 - $vrgbl->{$lex}{$gbl}[$gbl]: value ok 5819 - $vrgbl->{$lex}{$gbl}[$gbl] = 123: no exception ok 5820 - $vrgbl->{$lex}{$gbl}[$gbl] = 123: value ok 5821 - exists $vrgbl->{$lex}{$gbl}[$gbl]: no exception ok 5822 - exists $vrgbl->{$lex}{$gbl}[$gbl]: value ok 5823 - delete $vrgbl->{$lex}{$gbl}[$gbl]: no exception ok 5824 - delete $vrgbl->{$lex}{$gbl}[$gbl]: value ok 5825 - $vlex{$gbl}{$gbl}[$gbl]: no exception ok 5826 - $vlex{$gbl}{$gbl}[$gbl]: value ok 5827 - $vlex{$gbl}{$gbl}[$gbl] = 123: no exception ok 5828 - $vlex{$gbl}{$gbl}[$gbl] = 123: value ok 5829 - exists $vlex{$gbl}{$gbl}[$gbl]: no exception ok 5830 - exists $vlex{$gbl}{$gbl}[$gbl]: value ok 5831 - delete $vlex{$gbl}{$gbl}[$gbl]: no exception ok 5832 - delete $vlex{$gbl}{$gbl}[$gbl]: value ok 5833 - $vgbl{$gbl}{$gbl}[$gbl]: no exception ok 5834 - $vgbl{$gbl}{$gbl}[$gbl]: value ok 5835 - $vgbl{$gbl}{$gbl}[$gbl] = 123: no exception ok 5836 - $vgbl{$gbl}{$gbl}[$gbl] = 123: value ok 5837 - exists $vgbl{$gbl}{$gbl}[$gbl]: no exception ok 5838 - exists $vgbl{$gbl}{$gbl}[$gbl]: value ok 5839 - delete $vgbl{$gbl}{$gbl}[$gbl]: no exception ok 5840 - delete $vgbl{$gbl}{$gbl}[$gbl]: value ok 5841 - $vrlex->{$gbl}{$gbl}[$gbl]: no exception ok 5842 - $vrlex->{$gbl}{$gbl}[$gbl]: value ok 5843 - $vrlex->{$gbl}{$gbl}[$gbl] = 123: no exception ok 5844 - $vrlex->{$gbl}{$gbl}[$gbl] = 123: value ok 5845 - exists $vrlex->{$gbl}{$gbl}[$gbl]: no exception ok 5846 - exists $vrlex->{$gbl}{$gbl}[$gbl]: value ok 5847 - delete $vrlex->{$gbl}{$gbl}[$gbl]: no exception ok 5848 - delete $vrlex->{$gbl}{$gbl}[$gbl]: value ok 5849 - $vrgbl->{$gbl}{$gbl}[$gbl]: no exception ok 5850 - $vrgbl->{$gbl}{$gbl}[$gbl]: value ok 5851 - $vrgbl->{$gbl}{$gbl}[$gbl] = 123: no exception ok 5852 - $vrgbl->{$gbl}{$gbl}[$gbl] = 123: value ok 5853 - exists $vrgbl->{$gbl}{$gbl}[$gbl]: no exception ok 5854 - exists $vrgbl->{$gbl}{$gbl}[$gbl]: value ok 5855 - delete $vrgbl->{$gbl}{$gbl}[$gbl]: no exception ok 5856 - delete $vrgbl->{$gbl}{$gbl}[$gbl]: value ok 5857 - $vlex{"x$lex"}{$gbl}[$gbl]: no exception ok 5858 - $vlex{"x$lex"}{$gbl}[$gbl]: value ok 5859 - $vlex{"x$lex"}{$gbl}[$gbl] = 123: no exception ok 5860 - $vlex{"x$lex"}{$gbl}[$gbl] = 123: value ok 5861 - exists $vlex{"x$lex"}{$gbl}[$gbl]: no exception ok 5862 - exists $vlex{"x$lex"}{$gbl}[$gbl]: value ok 5863 - delete $vlex{"x$lex"}{$gbl}[$gbl]: no exception ok 5864 - delete $vlex{"x$lex"}{$gbl}[$gbl]: value ok 5865 - $vgbl{"x$lex"}{$gbl}[$gbl]: no exception ok 5866 - $vgbl{"x$lex"}{$gbl}[$gbl]: value ok 5867 - $vgbl{"x$lex"}{$gbl}[$gbl] = 123: no exception ok 5868 - $vgbl{"x$lex"}{$gbl}[$gbl] = 123: value ok 5869 - exists $vgbl{"x$lex"}{$gbl}[$gbl]: no exception ok 5870 - exists $vgbl{"x$lex"}{$gbl}[$gbl]: value ok 5871 - delete $vgbl{"x$lex"}{$gbl}[$gbl]: no exception ok 5872 - delete $vgbl{"x$lex"}{$gbl}[$gbl]: value ok 5873 - $vrlex->{"x$lex"}{$gbl}[$gbl]: no exception ok 5874 - $vrlex->{"x$lex"}{$gbl}[$gbl]: value ok 5875 - $vrlex->{"x$lex"}{$gbl}[$gbl] = 123: no exception ok 5876 - $vrlex->{"x$lex"}{$gbl}[$gbl] = 123: value ok 5877 - exists $vrlex->{"x$lex"}{$gbl}[$gbl]: no exception ok 5878 - exists $vrlex->{"x$lex"}{$gbl}[$gbl]: value ok 5879 - delete $vrlex->{"x$lex"}{$gbl}[$gbl]: no exception ok 5880 - delete $vrlex->{"x$lex"}{$gbl}[$gbl]: value ok 5881 - $vrgbl->{"x$lex"}{$gbl}[$gbl]: no exception ok 5882 - $vrgbl->{"x$lex"}{$gbl}[$gbl]: value ok 5883 - $vrgbl->{"x$lex"}{$gbl}[$gbl] = 123: no exception ok 5884 - $vrgbl->{"x$lex"}{$gbl}[$gbl] = 123: value ok 5885 - exists $vrgbl->{"x$lex"}{$gbl}[$gbl]: no exception ok 5886 - exists $vrgbl->{"x$lex"}{$gbl}[$gbl]: value ok 5887 - delete $vrgbl->{"x$lex"}{$gbl}[$gbl]: no exception ok 5888 - delete $vrgbl->{"x$lex"}{$gbl}[$gbl]: value ok 5889 - $vlex[0]{"x$lex"}[$gbl]: no exception ok 5890 - $vlex[0]{"x$lex"}[$gbl]: value ok 5891 - $vlex[0]{"x$lex"}[$gbl] = 123: no exception ok 5892 - $vlex[0]{"x$lex"}[$gbl] = 123: value ok 5893 - exists $vlex[0]{"x$lex"}[$gbl]: no exception ok 5894 - exists $vlex[0]{"x$lex"}[$gbl]: value ok 5895 - delete $vlex[0]{"x$lex"}[$gbl]: no exception ok 5896 - delete $vlex[0]{"x$lex"}[$gbl]: value ok 5897 - $vgbl[0]{"x$lex"}[$gbl]: no exception ok 5898 - $vgbl[0]{"x$lex"}[$gbl]: value ok 5899 - $vgbl[0]{"x$lex"}[$gbl] = 123: no exception ok 5900 - $vgbl[0]{"x$lex"}[$gbl] = 123: value ok 5901 - exists $vgbl[0]{"x$lex"}[$gbl]: no exception ok 5902 - exists $vgbl[0]{"x$lex"}[$gbl]: value ok 5903 - delete $vgbl[0]{"x$lex"}[$gbl]: no exception ok 5904 - delete $vgbl[0]{"x$lex"}[$gbl]: value ok 5905 - $vrlex->[0]{"x$lex"}[$gbl]: no exception ok 5906 - $vrlex->[0]{"x$lex"}[$gbl]: value ok 5907 - $vrlex->[0]{"x$lex"}[$gbl] = 123: no exception ok 5908 - $vrlex->[0]{"x$lex"}[$gbl] = 123: value ok 5909 - exists $vrlex->[0]{"x$lex"}[$gbl]: no exception ok 5910 - exists $vrlex->[0]{"x$lex"}[$gbl]: value ok 5911 - delete $vrlex->[0]{"x$lex"}[$gbl]: no exception ok 5912 - delete $vrlex->[0]{"x$lex"}[$gbl]: value ok 5913 - $vrgbl->[0]{"x$lex"}[$gbl]: no exception ok 5914 - $vrgbl->[0]{"x$lex"}[$gbl]: value ok 5915 - $vrgbl->[0]{"x$lex"}[$gbl] = 123: no exception ok 5916 - $vrgbl->[0]{"x$lex"}[$gbl] = 123: value ok 5917 - exists $vrgbl->[0]{"x$lex"}[$gbl]: no exception ok 5918 - exists $vrgbl->[0]{"x$lex"}[$gbl]: value ok 5919 - delete $vrgbl->[0]{"x$lex"}[$gbl]: no exception ok 5920 - delete $vrgbl->[0]{"x$lex"}[$gbl]: value ok 5921 - $vlex[$lex]{"x$lex"}[$gbl]: no exception ok 5922 - $vlex[$lex]{"x$lex"}[$gbl]: value ok 5923 - $vlex[$lex]{"x$lex"}[$gbl] = 123: no exception ok 5924 - $vlex[$lex]{"x$lex"}[$gbl] = 123: value ok 5925 - exists $vlex[$lex]{"x$lex"}[$gbl]: no exception ok 5926 - exists $vlex[$lex]{"x$lex"}[$gbl]: value ok 5927 - delete $vlex[$lex]{"x$lex"}[$gbl]: no exception ok 5928 - delete $vlex[$lex]{"x$lex"}[$gbl]: value ok 5929 - $vgbl[$lex]{"x$lex"}[$gbl]: no exception ok 5930 - $vgbl[$lex]{"x$lex"}[$gbl]: value ok 5931 - $vgbl[$lex]{"x$lex"}[$gbl] = 123: no exception ok 5932 - $vgbl[$lex]{"x$lex"}[$gbl] = 123: value ok 5933 - exists $vgbl[$lex]{"x$lex"}[$gbl]: no exception ok 5934 - exists $vgbl[$lex]{"x$lex"}[$gbl]: value ok 5935 - delete $vgbl[$lex]{"x$lex"}[$gbl]: no exception ok 5936 - delete $vgbl[$lex]{"x$lex"}[$gbl]: value ok 5937 - $vrlex->[$lex]{"x$lex"}[$gbl]: no exception ok 5938 - $vrlex->[$lex]{"x$lex"}[$gbl]: value ok 5939 - $vrlex->[$lex]{"x$lex"}[$gbl] = 123: no exception ok 5940 - $vrlex->[$lex]{"x$lex"}[$gbl] = 123: value ok 5941 - exists $vrlex->[$lex]{"x$lex"}[$gbl]: no exception ok 5942 - exists $vrlex->[$lex]{"x$lex"}[$gbl]: value ok 5943 - delete $vrlex->[$lex]{"x$lex"}[$gbl]: no exception ok 5944 - delete $vrlex->[$lex]{"x$lex"}[$gbl]: value ok 5945 - $vrgbl->[$lex]{"x$lex"}[$gbl]: no exception ok 5946 - $vrgbl->[$lex]{"x$lex"}[$gbl]: value ok 5947 - $vrgbl->[$lex]{"x$lex"}[$gbl] = 123: no exception ok 5948 - $vrgbl->[$lex]{"x$lex"}[$gbl] = 123: value ok 5949 - exists $vrgbl->[$lex]{"x$lex"}[$gbl]: no exception ok 5950 - exists $vrgbl->[$lex]{"x$lex"}[$gbl]: value ok 5951 - delete $vrgbl->[$lex]{"x$lex"}[$gbl]: no exception ok 5952 - delete $vrgbl->[$lex]{"x$lex"}[$gbl]: value ok 5953 - $vlex[$gbl]{"x$lex"}[$gbl]: no exception ok 5954 - $vlex[$gbl]{"x$lex"}[$gbl]: value ok 5955 - $vlex[$gbl]{"x$lex"}[$gbl] = 123: no exception ok 5956 - $vlex[$gbl]{"x$lex"}[$gbl] = 123: value ok 5957 - exists $vlex[$gbl]{"x$lex"}[$gbl]: no exception ok 5958 - exists $vlex[$gbl]{"x$lex"}[$gbl]: value ok 5959 - delete $vlex[$gbl]{"x$lex"}[$gbl]: no exception ok 5960 - delete $vlex[$gbl]{"x$lex"}[$gbl]: value ok 5961 - $vgbl[$gbl]{"x$lex"}[$gbl]: no exception ok 5962 - $vgbl[$gbl]{"x$lex"}[$gbl]: value ok 5963 - $vgbl[$gbl]{"x$lex"}[$gbl] = 123: no exception ok 5964 - $vgbl[$gbl]{"x$lex"}[$gbl] = 123: value ok 5965 - exists $vgbl[$gbl]{"x$lex"}[$gbl]: no exception ok 5966 - exists $vgbl[$gbl]{"x$lex"}[$gbl]: value ok 5967 - delete $vgbl[$gbl]{"x$lex"}[$gbl]: no exception ok 5968 - delete $vgbl[$gbl]{"x$lex"}[$gbl]: value ok 5969 - $vrlex->[$gbl]{"x$lex"}[$gbl]: no exception ok 5970 - $vrlex->[$gbl]{"x$lex"}[$gbl]: value ok 5971 - $vrlex->[$gbl]{"x$lex"}[$gbl] = 123: no exception ok 5972 - $vrlex->[$gbl]{"x$lex"}[$gbl] = 123: value ok 5973 - exists $vrlex->[$gbl]{"x$lex"}[$gbl]: no exception ok 5974 - exists $vrlex->[$gbl]{"x$lex"}[$gbl]: value ok 5975 - delete $vrlex->[$gbl]{"x$lex"}[$gbl]: no exception ok 5976 - delete $vrlex->[$gbl]{"x$lex"}[$gbl]: value ok 5977 - $vrgbl->[$gbl]{"x$lex"}[$gbl]: no exception ok 5978 - $vrgbl->[$gbl]{"x$lex"}[$gbl]: value ok 5979 - $vrgbl->[$gbl]{"x$lex"}[$gbl] = 123: no exception ok 5980 - $vrgbl->[$gbl]{"x$lex"}[$gbl] = 123: value ok 5981 - exists $vrgbl->[$gbl]{"x$lex"}[$gbl]: no exception ok 5982 - exists $vrgbl->[$gbl]{"x$lex"}[$gbl]: value ok 5983 - delete $vrgbl->[$gbl]{"x$lex"}[$gbl]: no exception ok 5984 - delete $vrgbl->[$gbl]{"x$lex"}[$gbl]: value ok 5985 - $vlex[$lex+1]{"x$lex"}[$gbl]: no exception ok 5986 - $vlex[$lex+1]{"x$lex"}[$gbl]: value ok 5987 - $vlex[$lex+1]{"x$lex"}[$gbl] = 123: no exception ok 5988 - $vlex[$lex+1]{"x$lex"}[$gbl] = 123: value ok 5989 - exists $vlex[$lex+1]{"x$lex"}[$gbl]: no exception ok 5990 - exists $vlex[$lex+1]{"x$lex"}[$gbl]: value ok 5991 - delete $vlex[$lex+1]{"x$lex"}[$gbl]: no exception ok 5992 - delete $vlex[$lex+1]{"x$lex"}[$gbl]: value ok 5993 - $vgbl[$lex+1]{"x$lex"}[$gbl]: no exception ok 5994 - $vgbl[$lex+1]{"x$lex"}[$gbl]: value ok 5995 - $vgbl[$lex+1]{"x$lex"}[$gbl] = 123: no exception ok 5996 - $vgbl[$lex+1]{"x$lex"}[$gbl] = 123: value ok 5997 - exists $vgbl[$lex+1]{"x$lex"}[$gbl]: no exception ok 5998 - exists $vgbl[$lex+1]{"x$lex"}[$gbl]: value ok 5999 - delete $vgbl[$lex+1]{"x$lex"}[$gbl]: no exception ok 6000 - delete $vgbl[$lex+1]{"x$lex"}[$gbl]: value ok 6001 - $vrlex->[$lex+1]{"x$lex"}[$gbl]: no exception ok 6002 - $vrlex->[$lex+1]{"x$lex"}[$gbl]: value ok 6003 - $vrlex->[$lex+1]{"x$lex"}[$gbl] = 123: no exception ok 6004 - $vrlex->[$lex+1]{"x$lex"}[$gbl] = 123: value ok 6005 - exists $vrlex->[$lex+1]{"x$lex"}[$gbl]: no exception ok 6006 - exists $vrlex->[$lex+1]{"x$lex"}[$gbl]: value ok 6007 - delete $vrlex->[$lex+1]{"x$lex"}[$gbl]: no exception ok 6008 - delete $vrlex->[$lex+1]{"x$lex"}[$gbl]: value ok 6009 - $vrgbl->[$lex+1]{"x$lex"}[$gbl]: no exception ok 6010 - $vrgbl->[$lex+1]{"x$lex"}[$gbl]: value ok 6011 - $vrgbl->[$lex+1]{"x$lex"}[$gbl] = 123: no exception ok 6012 - $vrgbl->[$lex+1]{"x$lex"}[$gbl] = 123: value ok 6013 - exists $vrgbl->[$lex+1]{"x$lex"}[$gbl]: no exception ok 6014 - exists $vrgbl->[$lex+1]{"x$lex"}[$gbl]: value ok 6015 - delete $vrgbl->[$lex+1]{"x$lex"}[$gbl]: no exception ok 6016 - delete $vrgbl->[$lex+1]{"x$lex"}[$gbl]: value ok 6017 - $vlex{foo}{"x$lex"}[$gbl]: no exception ok 6018 - $vlex{foo}{"x$lex"}[$gbl]: value ok 6019 - $vlex{foo}{"x$lex"}[$gbl] = 123: no exception ok 6020 - $vlex{foo}{"x$lex"}[$gbl] = 123: value ok 6021 - exists $vlex{foo}{"x$lex"}[$gbl]: no exception ok 6022 - exists $vlex{foo}{"x$lex"}[$gbl]: value ok 6023 - delete $vlex{foo}{"x$lex"}[$gbl]: no exception ok 6024 - delete $vlex{foo}{"x$lex"}[$gbl]: value ok 6025 - $vgbl{foo}{"x$lex"}[$gbl]: no exception ok 6026 - $vgbl{foo}{"x$lex"}[$gbl]: value ok 6027 - $vgbl{foo}{"x$lex"}[$gbl] = 123: no exception ok 6028 - $vgbl{foo}{"x$lex"}[$gbl] = 123: value ok 6029 - exists $vgbl{foo}{"x$lex"}[$gbl]: no exception ok 6030 - exists $vgbl{foo}{"x$lex"}[$gbl]: value ok 6031 - delete $vgbl{foo}{"x$lex"}[$gbl]: no exception ok 6032 - delete $vgbl{foo}{"x$lex"}[$gbl]: value ok 6033 - $vrlex->{foo}{"x$lex"}[$gbl]: no exception ok 6034 - $vrlex->{foo}{"x$lex"}[$gbl]: value ok 6035 - $vrlex->{foo}{"x$lex"}[$gbl] = 123: no exception ok 6036 - $vrlex->{foo}{"x$lex"}[$gbl] = 123: value ok 6037 - exists $vrlex->{foo}{"x$lex"}[$gbl]: no exception ok 6038 - exists $vrlex->{foo}{"x$lex"}[$gbl]: value ok 6039 - delete $vrlex->{foo}{"x$lex"}[$gbl]: no exception ok 6040 - delete $vrlex->{foo}{"x$lex"}[$gbl]: value ok 6041 - $vrgbl->{foo}{"x$lex"}[$gbl]: no exception ok 6042 - $vrgbl->{foo}{"x$lex"}[$gbl]: value ok 6043 - $vrgbl->{foo}{"x$lex"}[$gbl] = 123: no exception ok 6044 - $vrgbl->{foo}{"x$lex"}[$gbl] = 123: value ok 6045 - exists $vrgbl->{foo}{"x$lex"}[$gbl]: no exception ok 6046 - exists $vrgbl->{foo}{"x$lex"}[$gbl]: value ok 6047 - delete $vrgbl->{foo}{"x$lex"}[$gbl]: no exception ok 6048 - delete $vrgbl->{foo}{"x$lex"}[$gbl]: value ok 6049 - $vlex{$lex}{"x$lex"}[$gbl]: no exception ok 6050 - $vlex{$lex}{"x$lex"}[$gbl]: value ok 6051 - $vlex{$lex}{"x$lex"}[$gbl] = 123: no exception ok 6052 - $vlex{$lex}{"x$lex"}[$gbl] = 123: value ok 6053 - exists $vlex{$lex}{"x$lex"}[$gbl]: no exception ok 6054 - exists $vlex{$lex}{"x$lex"}[$gbl]: value ok 6055 - delete $vlex{$lex}{"x$lex"}[$gbl]: no exception ok 6056 - delete $vlex{$lex}{"x$lex"}[$gbl]: value ok 6057 - $vgbl{$lex}{"x$lex"}[$gbl]: no exception ok 6058 - $vgbl{$lex}{"x$lex"}[$gbl]: value ok 6059 - $vgbl{$lex}{"x$lex"}[$gbl] = 123: no exception ok 6060 - $vgbl{$lex}{"x$lex"}[$gbl] = 123: value ok 6061 - exists $vgbl{$lex}{"x$lex"}[$gbl]: no exception ok 6062 - exists $vgbl{$lex}{"x$lex"}[$gbl]: value ok 6063 - delete $vgbl{$lex}{"x$lex"}[$gbl]: no exception ok 6064 - delete $vgbl{$lex}{"x$lex"}[$gbl]: value ok 6065 - $vrlex->{$lex}{"x$lex"}[$gbl]: no exception ok 6066 - $vrlex->{$lex}{"x$lex"}[$gbl]: value ok 6067 - $vrlex->{$lex}{"x$lex"}[$gbl] = 123: no exception ok 6068 - $vrlex->{$lex}{"x$lex"}[$gbl] = 123: value ok 6069 - exists $vrlex->{$lex}{"x$lex"}[$gbl]: no exception ok 6070 - exists $vrlex->{$lex}{"x$lex"}[$gbl]: value ok 6071 - delete $vrlex->{$lex}{"x$lex"}[$gbl]: no exception ok 6072 - delete $vrlex->{$lex}{"x$lex"}[$gbl]: value ok 6073 - $vrgbl->{$lex}{"x$lex"}[$gbl]: no exception ok 6074 - $vrgbl->{$lex}{"x$lex"}[$gbl]: value ok 6075 - $vrgbl->{$lex}{"x$lex"}[$gbl] = 123: no exception ok 6076 - $vrgbl->{$lex}{"x$lex"}[$gbl] = 123: value ok 6077 - exists $vrgbl->{$lex}{"x$lex"}[$gbl]: no exception ok 6078 - exists $vrgbl->{$lex}{"x$lex"}[$gbl]: value ok 6079 - delete $vrgbl->{$lex}{"x$lex"}[$gbl]: no exception ok 6080 - delete $vrgbl->{$lex}{"x$lex"}[$gbl]: value ok 6081 - $vlex{$gbl}{"x$lex"}[$gbl]: no exception ok 6082 - $vlex{$gbl}{"x$lex"}[$gbl]: value ok 6083 - $vlex{$gbl}{"x$lex"}[$gbl] = 123: no exception ok 6084 - $vlex{$gbl}{"x$lex"}[$gbl] = 123: value ok 6085 - exists $vlex{$gbl}{"x$lex"}[$gbl]: no exception ok 6086 - exists $vlex{$gbl}{"x$lex"}[$gbl]: value ok 6087 - delete $vlex{$gbl}{"x$lex"}[$gbl]: no exception ok 6088 - delete $vlex{$gbl}{"x$lex"}[$gbl]: value ok 6089 - $vgbl{$gbl}{"x$lex"}[$gbl]: no exception ok 6090 - $vgbl{$gbl}{"x$lex"}[$gbl]: value ok 6091 - $vgbl{$gbl}{"x$lex"}[$gbl] = 123: no exception ok 6092 - $vgbl{$gbl}{"x$lex"}[$gbl] = 123: value ok 6093 - exists $vgbl{$gbl}{"x$lex"}[$gbl]: no exception ok 6094 - exists $vgbl{$gbl}{"x$lex"}[$gbl]: value ok 6095 - delete $vgbl{$gbl}{"x$lex"}[$gbl]: no exception ok 6096 - delete $vgbl{$gbl}{"x$lex"}[$gbl]: value ok 6097 - $vrlex->{$gbl}{"x$lex"}[$gbl]: no exception ok 6098 - $vrlex->{$gbl}{"x$lex"}[$gbl]: value ok 6099 - $vrlex->{$gbl}{"x$lex"}[$gbl] = 123: no exception ok 6100 - $vrlex->{$gbl}{"x$lex"}[$gbl] = 123: value ok 6101 - exists $vrlex->{$gbl}{"x$lex"}[$gbl]: no exception ok 6102 - exists $vrlex->{$gbl}{"x$lex"}[$gbl]: value ok 6103 - delete $vrlex->{$gbl}{"x$lex"}[$gbl]: no exception ok 6104 - delete $vrlex->{$gbl}{"x$lex"}[$gbl]: value ok 6105 - $vrgbl->{$gbl}{"x$lex"}[$gbl]: no exception ok 6106 - $vrgbl->{$gbl}{"x$lex"}[$gbl]: value ok 6107 - $vrgbl->{$gbl}{"x$lex"}[$gbl] = 123: no exception ok 6108 - $vrgbl->{$gbl}{"x$lex"}[$gbl] = 123: value ok 6109 - exists $vrgbl->{$gbl}{"x$lex"}[$gbl]: no exception ok 6110 - exists $vrgbl->{$gbl}{"x$lex"}[$gbl]: value ok 6111 - delete $vrgbl->{$gbl}{"x$lex"}[$gbl]: no exception ok 6112 - delete $vrgbl->{$gbl}{"x$lex"}[$gbl]: value ok 6113 - $vlex{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6114 - $vlex{"x$lex"}{"x$lex"}[$gbl]: value ok 6115 - $vlex{"x$lex"}{"x$lex"}[$gbl] = 123: no exception ok 6116 - $vlex{"x$lex"}{"x$lex"}[$gbl] = 123: value ok 6117 - exists $vlex{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6118 - exists $vlex{"x$lex"}{"x$lex"}[$gbl]: value ok 6119 - delete $vlex{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6120 - delete $vlex{"x$lex"}{"x$lex"}[$gbl]: value ok 6121 - $vgbl{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6122 - $vgbl{"x$lex"}{"x$lex"}[$gbl]: value ok 6123 - $vgbl{"x$lex"}{"x$lex"}[$gbl] = 123: no exception ok 6124 - $vgbl{"x$lex"}{"x$lex"}[$gbl] = 123: value ok 6125 - exists $vgbl{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6126 - exists $vgbl{"x$lex"}{"x$lex"}[$gbl]: value ok 6127 - delete $vgbl{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6128 - delete $vgbl{"x$lex"}{"x$lex"}[$gbl]: value ok 6129 - $vrlex->{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6130 - $vrlex->{"x$lex"}{"x$lex"}[$gbl]: value ok 6131 - $vrlex->{"x$lex"}{"x$lex"}[$gbl] = 123: no exception ok 6132 - $vrlex->{"x$lex"}{"x$lex"}[$gbl] = 123: value ok 6133 - exists $vrlex->{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6134 - exists $vrlex->{"x$lex"}{"x$lex"}[$gbl]: value ok 6135 - delete $vrlex->{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6136 - delete $vrlex->{"x$lex"}{"x$lex"}[$gbl]: value ok 6137 - $vrgbl->{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6138 - $vrgbl->{"x$lex"}{"x$lex"}[$gbl]: value ok 6139 - $vrgbl->{"x$lex"}{"x$lex"}[$gbl] = 123: no exception ok 6140 - $vrgbl->{"x$lex"}{"x$lex"}[$gbl] = 123: value ok 6141 - exists $vrgbl->{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6142 - exists $vrgbl->{"x$lex"}{"x$lex"}[$gbl]: value ok 6143 - delete $vrgbl->{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6144 - delete $vrgbl->{"x$lex"}{"x$lex"}[$gbl]: value ok 6145 - $vlex[0][0][$lex+1]: no exception ok 6146 - $vlex[0][0][$lex+1]: value ok 6147 - $vlex[0][0][$lex+1] = 123: no exception ok 6148 - $vlex[0][0][$lex+1] = 123: value ok 6149 - exists $vlex[0][0][$lex+1]: no exception ok 6150 - exists $vlex[0][0][$lex+1]: value ok 6151 - delete $vlex[0][0][$lex+1]: no exception ok 6152 - delete $vlex[0][0][$lex+1]: value ok 6153 - $vgbl[0][0][$lex+1]: no exception ok 6154 - $vgbl[0][0][$lex+1]: value ok 6155 - $vgbl[0][0][$lex+1] = 123: no exception ok 6156 - $vgbl[0][0][$lex+1] = 123: value ok 6157 - exists $vgbl[0][0][$lex+1]: no exception ok 6158 - exists $vgbl[0][0][$lex+1]: value ok 6159 - delete $vgbl[0][0][$lex+1]: no exception ok 6160 - delete $vgbl[0][0][$lex+1]: value ok 6161 - $vrlex->[0][0][$lex+1]: no exception ok 6162 - $vrlex->[0][0][$lex+1]: value ok 6163 - $vrlex->[0][0][$lex+1] = 123: no exception ok 6164 - $vrlex->[0][0][$lex+1] = 123: value ok 6165 - exists $vrlex->[0][0][$lex+1]: no exception ok 6166 - exists $vrlex->[0][0][$lex+1]: value ok 6167 - delete $vrlex->[0][0][$lex+1]: no exception ok 6168 - delete $vrlex->[0][0][$lex+1]: value ok 6169 - $vrgbl->[0][0][$lex+1]: no exception ok 6170 - $vrgbl->[0][0][$lex+1]: value ok 6171 - $vrgbl->[0][0][$lex+1] = 123: no exception ok 6172 - $vrgbl->[0][0][$lex+1] = 123: value ok 6173 - exists $vrgbl->[0][0][$lex+1]: no exception ok 6174 - exists $vrgbl->[0][0][$lex+1]: value ok 6175 - delete $vrgbl->[0][0][$lex+1]: no exception ok 6176 - delete $vrgbl->[0][0][$lex+1]: value ok 6177 - $vlex[$lex][0][$lex+1]: no exception ok 6178 - $vlex[$lex][0][$lex+1]: value ok 6179 - $vlex[$lex][0][$lex+1] = 123: no exception ok 6180 - $vlex[$lex][0][$lex+1] = 123: value ok 6181 - exists $vlex[$lex][0][$lex+1]: no exception ok 6182 - exists $vlex[$lex][0][$lex+1]: value ok 6183 - delete $vlex[$lex][0][$lex+1]: no exception ok 6184 - delete $vlex[$lex][0][$lex+1]: value ok 6185 - $vgbl[$lex][0][$lex+1]: no exception ok 6186 - $vgbl[$lex][0][$lex+1]: value ok 6187 - $vgbl[$lex][0][$lex+1] = 123: no exception ok 6188 - $vgbl[$lex][0][$lex+1] = 123: value ok 6189 - exists $vgbl[$lex][0][$lex+1]: no exception ok 6190 - exists $vgbl[$lex][0][$lex+1]: value ok 6191 - delete $vgbl[$lex][0][$lex+1]: no exception ok 6192 - delete $vgbl[$lex][0][$lex+1]: value ok 6193 - $vrlex->[$lex][0][$lex+1]: no exception ok 6194 - $vrlex->[$lex][0][$lex+1]: value ok 6195 - $vrlex->[$lex][0][$lex+1] = 123: no exception ok 6196 - $vrlex->[$lex][0][$lex+1] = 123: value ok 6197 - exists $vrlex->[$lex][0][$lex+1]: no exception ok 6198 - exists $vrlex->[$lex][0][$lex+1]: value ok 6199 - delete $vrlex->[$lex][0][$lex+1]: no exception ok 6200 - delete $vrlex->[$lex][0][$lex+1]: value ok 6201 - $vrgbl->[$lex][0][$lex+1]: no exception ok 6202 - $vrgbl->[$lex][0][$lex+1]: value ok 6203 - $vrgbl->[$lex][0][$lex+1] = 123: no exception ok 6204 - $vrgbl->[$lex][0][$lex+1] = 123: value ok 6205 - exists $vrgbl->[$lex][0][$lex+1]: no exception ok 6206 - exists $vrgbl->[$lex][0][$lex+1]: value ok 6207 - delete $vrgbl->[$lex][0][$lex+1]: no exception ok 6208 - delete $vrgbl->[$lex][0][$lex+1]: value ok 6209 - $vlex[$gbl][0][$lex+1]: no exception ok 6210 - $vlex[$gbl][0][$lex+1]: value ok 6211 - $vlex[$gbl][0][$lex+1] = 123: no exception ok 6212 - $vlex[$gbl][0][$lex+1] = 123: value ok 6213 - exists $vlex[$gbl][0][$lex+1]: no exception ok 6214 - exists $vlex[$gbl][0][$lex+1]: value ok 6215 - delete $vlex[$gbl][0][$lex+1]: no exception ok 6216 - delete $vlex[$gbl][0][$lex+1]: value ok 6217 - $vgbl[$gbl][0][$lex+1]: no exception ok 6218 - $vgbl[$gbl][0][$lex+1]: value ok 6219 - $vgbl[$gbl][0][$lex+1] = 123: no exception ok 6220 - $vgbl[$gbl][0][$lex+1] = 123: value ok 6221 - exists $vgbl[$gbl][0][$lex+1]: no exception ok 6222 - exists $vgbl[$gbl][0][$lex+1]: value ok 6223 - delete $vgbl[$gbl][0][$lex+1]: no exception ok 6224 - delete $vgbl[$gbl][0][$lex+1]: value ok 6225 - $vrlex->[$gbl][0][$lex+1]: no exception ok 6226 - $vrlex->[$gbl][0][$lex+1]: value ok 6227 - $vrlex->[$gbl][0][$lex+1] = 123: no exception ok 6228 - $vrlex->[$gbl][0][$lex+1] = 123: value ok 6229 - exists $vrlex->[$gbl][0][$lex+1]: no exception ok 6230 - exists $vrlex->[$gbl][0][$lex+1]: value ok 6231 - delete $vrlex->[$gbl][0][$lex+1]: no exception ok 6232 - delete $vrlex->[$gbl][0][$lex+1]: value ok 6233 - $vrgbl->[$gbl][0][$lex+1]: no exception ok 6234 - $vrgbl->[$gbl][0][$lex+1]: value ok 6235 - $vrgbl->[$gbl][0][$lex+1] = 123: no exception ok 6236 - $vrgbl->[$gbl][0][$lex+1] = 123: value ok 6237 - exists $vrgbl->[$gbl][0][$lex+1]: no exception ok 6238 - exists $vrgbl->[$gbl][0][$lex+1]: value ok 6239 - delete $vrgbl->[$gbl][0][$lex+1]: no exception ok 6240 - delete $vrgbl->[$gbl][0][$lex+1]: value ok 6241 - $vlex[$lex+1][0][$lex+1]: no exception ok 6242 - $vlex[$lex+1][0][$lex+1]: value ok 6243 - $vlex[$lex+1][0][$lex+1] = 123: no exception ok 6244 - $vlex[$lex+1][0][$lex+1] = 123: value ok 6245 - exists $vlex[$lex+1][0][$lex+1]: no exception ok 6246 - exists $vlex[$lex+1][0][$lex+1]: value ok 6247 - delete $vlex[$lex+1][0][$lex+1]: no exception ok 6248 - delete $vlex[$lex+1][0][$lex+1]: value ok 6249 - $vgbl[$lex+1][0][$lex+1]: no exception ok 6250 - $vgbl[$lex+1][0][$lex+1]: value ok 6251 - $vgbl[$lex+1][0][$lex+1] = 123: no exception ok 6252 - $vgbl[$lex+1][0][$lex+1] = 123: value ok 6253 - exists $vgbl[$lex+1][0][$lex+1]: no exception ok 6254 - exists $vgbl[$lex+1][0][$lex+1]: value ok 6255 - delete $vgbl[$lex+1][0][$lex+1]: no exception ok 6256 - delete $vgbl[$lex+1][0][$lex+1]: value ok 6257 - $vrlex->[$lex+1][0][$lex+1]: no exception ok 6258 - $vrlex->[$lex+1][0][$lex+1]: value ok 6259 - $vrlex->[$lex+1][0][$lex+1] = 123: no exception ok 6260 - $vrlex->[$lex+1][0][$lex+1] = 123: value ok 6261 - exists $vrlex->[$lex+1][0][$lex+1]: no exception ok 6262 - exists $vrlex->[$lex+1][0][$lex+1]: value ok 6263 - delete $vrlex->[$lex+1][0][$lex+1]: no exception ok 6264 - delete $vrlex->[$lex+1][0][$lex+1]: value ok 6265 - $vrgbl->[$lex+1][0][$lex+1]: no exception ok 6266 - $vrgbl->[$lex+1][0][$lex+1]: value ok 6267 - $vrgbl->[$lex+1][0][$lex+1] = 123: no exception ok 6268 - $vrgbl->[$lex+1][0][$lex+1] = 123: value ok 6269 - exists $vrgbl->[$lex+1][0][$lex+1]: no exception ok 6270 - exists $vrgbl->[$lex+1][0][$lex+1]: value ok 6271 - delete $vrgbl->[$lex+1][0][$lex+1]: no exception ok 6272 - delete $vrgbl->[$lex+1][0][$lex+1]: value ok 6273 - $vlex{foo}[0][$lex+1]: no exception ok 6274 - $vlex{foo}[0][$lex+1]: value ok 6275 - $vlex{foo}[0][$lex+1] = 123: no exception ok 6276 - $vlex{foo}[0][$lex+1] = 123: value ok 6277 - exists $vlex{foo}[0][$lex+1]: no exception ok 6278 - exists $vlex{foo}[0][$lex+1]: value ok 6279 - delete $vlex{foo}[0][$lex+1]: no exception ok 6280 - delete $vlex{foo}[0][$lex+1]: value ok 6281 - $vgbl{foo}[0][$lex+1]: no exception ok 6282 - $vgbl{foo}[0][$lex+1]: value ok 6283 - $vgbl{foo}[0][$lex+1] = 123: no exception ok 6284 - $vgbl{foo}[0][$lex+1] = 123: value ok 6285 - exists $vgbl{foo}[0][$lex+1]: no exception ok 6286 - exists $vgbl{foo}[0][$lex+1]: value ok 6287 - delete $vgbl{foo}[0][$lex+1]: no exception ok 6288 - delete $vgbl{foo}[0][$lex+1]: value ok 6289 - $vrlex->{foo}[0][$lex+1]: no exception ok 6290 - $vrlex->{foo}[0][$lex+1]: value ok 6291 - $vrlex->{foo}[0][$lex+1] = 123: no exception ok 6292 - $vrlex->{foo}[0][$lex+1] = 123: value ok 6293 - exists $vrlex->{foo}[0][$lex+1]: no exception ok 6294 - exists $vrlex->{foo}[0][$lex+1]: value ok 6295 - delete $vrlex->{foo}[0][$lex+1]: no exception ok 6296 - delete $vrlex->{foo}[0][$lex+1]: value ok 6297 - $vrgbl->{foo}[0][$lex+1]: no exception ok 6298 - $vrgbl->{foo}[0][$lex+1]: value ok 6299 - $vrgbl->{foo}[0][$lex+1] = 123: no exception ok 6300 - $vrgbl->{foo}[0][$lex+1] = 123: value ok 6301 - exists $vrgbl->{foo}[0][$lex+1]: no exception ok 6302 - exists $vrgbl->{foo}[0][$lex+1]: value ok 6303 - delete $vrgbl->{foo}[0][$lex+1]: no exception ok 6304 - delete $vrgbl->{foo}[0][$lex+1]: value ok 6305 - $vlex{$lex}[0][$lex+1]: no exception ok 6306 - $vlex{$lex}[0][$lex+1]: value ok 6307 - $vlex{$lex}[0][$lex+1] = 123: no exception ok 6308 - $vlex{$lex}[0][$lex+1] = 123: value ok 6309 - exists $vlex{$lex}[0][$lex+1]: no exception ok 6310 - exists $vlex{$lex}[0][$lex+1]: value ok 6311 - delete $vlex{$lex}[0][$lex+1]: no exception ok 6312 - delete $vlex{$lex}[0][$lex+1]: value ok 6313 - $vgbl{$lex}[0][$lex+1]: no exception ok 6314 - $vgbl{$lex}[0][$lex+1]: value ok 6315 - $vgbl{$lex}[0][$lex+1] = 123: no exception ok 6316 - $vgbl{$lex}[0][$lex+1] = 123: value ok 6317 - exists $vgbl{$lex}[0][$lex+1]: no exception ok 6318 - exists $vgbl{$lex}[0][$lex+1]: value ok 6319 - delete $vgbl{$lex}[0][$lex+1]: no exception ok 6320 - delete $vgbl{$lex}[0][$lex+1]: value ok 6321 - $vrlex->{$lex}[0][$lex+1]: no exception ok 6322 - $vrlex->{$lex}[0][$lex+1]: value ok 6323 - $vrlex->{$lex}[0][$lex+1] = 123: no exception ok 6324 - $vrlex->{$lex}[0][$lex+1] = 123: value ok 6325 - exists $vrlex->{$lex}[0][$lex+1]: no exception ok 6326 - exists $vrlex->{$lex}[0][$lex+1]: value ok 6327 - delete $vrlex->{$lex}[0][$lex+1]: no exception ok 6328 - delete $vrlex->{$lex}[0][$lex+1]: value ok 6329 - $vrgbl->{$lex}[0][$lex+1]: no exception ok 6330 - $vrgbl->{$lex}[0][$lex+1]: value ok 6331 - $vrgbl->{$lex}[0][$lex+1] = 123: no exception ok 6332 - $vrgbl->{$lex}[0][$lex+1] = 123: value ok 6333 - exists $vrgbl->{$lex}[0][$lex+1]: no exception ok 6334 - exists $vrgbl->{$lex}[0][$lex+1]: value ok 6335 - delete $vrgbl->{$lex}[0][$lex+1]: no exception ok 6336 - delete $vrgbl->{$lex}[0][$lex+1]: value ok 6337 - $vlex{$gbl}[0][$lex+1]: no exception ok 6338 - $vlex{$gbl}[0][$lex+1]: value ok 6339 - $vlex{$gbl}[0][$lex+1] = 123: no exception ok 6340 - $vlex{$gbl}[0][$lex+1] = 123: value ok 6341 - exists $vlex{$gbl}[0][$lex+1]: no exception ok 6342 - exists $vlex{$gbl}[0][$lex+1]: value ok 6343 - delete $vlex{$gbl}[0][$lex+1]: no exception ok 6344 - delete $vlex{$gbl}[0][$lex+1]: value ok 6345 - $vgbl{$gbl}[0][$lex+1]: no exception ok 6346 - $vgbl{$gbl}[0][$lex+1]: value ok 6347 - $vgbl{$gbl}[0][$lex+1] = 123: no exception ok 6348 - $vgbl{$gbl}[0][$lex+1] = 123: value ok 6349 - exists $vgbl{$gbl}[0][$lex+1]: no exception ok 6350 - exists $vgbl{$gbl}[0][$lex+1]: value ok 6351 - delete $vgbl{$gbl}[0][$lex+1]: no exception ok 6352 - delete $vgbl{$gbl}[0][$lex+1]: value ok 6353 - $vrlex->{$gbl}[0][$lex+1]: no exception ok 6354 - $vrlex->{$gbl}[0][$lex+1]: value ok 6355 - $vrlex->{$gbl}[0][$lex+1] = 123: no exception ok 6356 - $vrlex->{$gbl}[0][$lex+1] = 123: value ok 6357 - exists $vrlex->{$gbl}[0][$lex+1]: no exception ok 6358 - exists $vrlex->{$gbl}[0][$lex+1]: value ok 6359 - delete $vrlex->{$gbl}[0][$lex+1]: no exception ok 6360 - delete $vrlex->{$gbl}[0][$lex+1]: value ok 6361 - $vrgbl->{$gbl}[0][$lex+1]: no exception ok 6362 - $vrgbl->{$gbl}[0][$lex+1]: value ok 6363 - $vrgbl->{$gbl}[0][$lex+1] = 123: no exception ok 6364 - $vrgbl->{$gbl}[0][$lex+1] = 123: value ok 6365 - exists $vrgbl->{$gbl}[0][$lex+1]: no exception ok 6366 - exists $vrgbl->{$gbl}[0][$lex+1]: value ok 6367 - delete $vrgbl->{$gbl}[0][$lex+1]: no exception ok 6368 - delete $vrgbl->{$gbl}[0][$lex+1]: value ok 6369 - $vlex{"x$lex"}[0][$lex+1]: no exception ok 6370 - $vlex{"x$lex"}[0][$lex+1]: value ok 6371 - $vlex{"x$lex"}[0][$lex+1] = 123: no exception ok 6372 - $vlex{"x$lex"}[0][$lex+1] = 123: value ok 6373 - exists $vlex{"x$lex"}[0][$lex+1]: no exception ok 6374 - exists $vlex{"x$lex"}[0][$lex+1]: value ok 6375 - delete $vlex{"x$lex"}[0][$lex+1]: no exception ok 6376 - delete $vlex{"x$lex"}[0][$lex+1]: value ok 6377 - $vgbl{"x$lex"}[0][$lex+1]: no exception ok 6378 - $vgbl{"x$lex"}[0][$lex+1]: value ok 6379 - $vgbl{"x$lex"}[0][$lex+1] = 123: no exception ok 6380 - $vgbl{"x$lex"}[0][$lex+1] = 123: value ok 6381 - exists $vgbl{"x$lex"}[0][$lex+1]: no exception ok 6382 - exists $vgbl{"x$lex"}[0][$lex+1]: value ok 6383 - delete $vgbl{"x$lex"}[0][$lex+1]: no exception ok 6384 - delete $vgbl{"x$lex"}[0][$lex+1]: value ok 6385 - $vrlex->{"x$lex"}[0][$lex+1]: no exception ok 6386 - $vrlex->{"x$lex"}[0][$lex+1]: value ok 6387 - $vrlex->{"x$lex"}[0][$lex+1] = 123: no exception ok 6388 - $vrlex->{"x$lex"}[0][$lex+1] = 123: value ok 6389 - exists $vrlex->{"x$lex"}[0][$lex+1]: no exception ok 6390 - exists $vrlex->{"x$lex"}[0][$lex+1]: value ok 6391 - delete $vrlex->{"x$lex"}[0][$lex+1]: no exception ok 6392 - delete $vrlex->{"x$lex"}[0][$lex+1]: value ok 6393 - $vrgbl->{"x$lex"}[0][$lex+1]: no exception ok 6394 - $vrgbl->{"x$lex"}[0][$lex+1]: value ok 6395 - $vrgbl->{"x$lex"}[0][$lex+1] = 123: no exception ok 6396 - $vrgbl->{"x$lex"}[0][$lex+1] = 123: value ok 6397 - exists $vrgbl->{"x$lex"}[0][$lex+1]: no exception ok 6398 - exists $vrgbl->{"x$lex"}[0][$lex+1]: value ok 6399 - delete $vrgbl->{"x$lex"}[0][$lex+1]: no exception ok 6400 - delete $vrgbl->{"x$lex"}[0][$lex+1]: value ok 6401 - $vlex[0][$lex][$lex+1]: no exception ok 6402 - $vlex[0][$lex][$lex+1]: value ok 6403 - $vlex[0][$lex][$lex+1] = 123: no exception ok 6404 - $vlex[0][$lex][$lex+1] = 123: value ok 6405 - exists $vlex[0][$lex][$lex+1]: no exception ok 6406 - exists $vlex[0][$lex][$lex+1]: value ok 6407 - delete $vlex[0][$lex][$lex+1]: no exception ok 6408 - delete $vlex[0][$lex][$lex+1]: value ok 6409 - $vgbl[0][$lex][$lex+1]: no exception ok 6410 - $vgbl[0][$lex][$lex+1]: value ok 6411 - $vgbl[0][$lex][$lex+1] = 123: no exception ok 6412 - $vgbl[0][$lex][$lex+1] = 123: value ok 6413 - exists $vgbl[0][$lex][$lex+1]: no exception ok 6414 - exists $vgbl[0][$lex][$lex+1]: value ok 6415 - delete $vgbl[0][$lex][$lex+1]: no exception ok 6416 - delete $vgbl[0][$lex][$lex+1]: value ok 6417 - $vrlex->[0][$lex][$lex+1]: no exception ok 6418 - $vrlex->[0][$lex][$lex+1]: value ok 6419 - $vrlex->[0][$lex][$lex+1] = 123: no exception ok 6420 - $vrlex->[0][$lex][$lex+1] = 123: value ok 6421 - exists $vrlex->[0][$lex][$lex+1]: no exception ok 6422 - exists $vrlex->[0][$lex][$lex+1]: value ok 6423 - delete $vrlex->[0][$lex][$lex+1]: no exception ok 6424 - delete $vrlex->[0][$lex][$lex+1]: value ok 6425 - $vrgbl->[0][$lex][$lex+1]: no exception ok 6426 - $vrgbl->[0][$lex][$lex+1]: value ok 6427 - $vrgbl->[0][$lex][$lex+1] = 123: no exception ok 6428 - $vrgbl->[0][$lex][$lex+1] = 123: value ok 6429 - exists $vrgbl->[0][$lex][$lex+1]: no exception ok 6430 - exists $vrgbl->[0][$lex][$lex+1]: value ok 6431 - delete $vrgbl->[0][$lex][$lex+1]: no exception ok 6432 - delete $vrgbl->[0][$lex][$lex+1]: value ok 6433 - $vlex[$lex][$lex][$lex+1]: no exception ok 6434 - $vlex[$lex][$lex][$lex+1]: value ok 6435 - $vlex[$lex][$lex][$lex+1] = 123: no exception ok 6436 - $vlex[$lex][$lex][$lex+1] = 123: value ok 6437 - exists $vlex[$lex][$lex][$lex+1]: no exception ok 6438 - exists $vlex[$lex][$lex][$lex+1]: value ok 6439 - delete $vlex[$lex][$lex][$lex+1]: no exception ok 6440 - delete $vlex[$lex][$lex][$lex+1]: value ok 6441 - $vgbl[$lex][$lex][$lex+1]: no exception ok 6442 - $vgbl[$lex][$lex][$lex+1]: value ok 6443 - $vgbl[$lex][$lex][$lex+1] = 123: no exception ok 6444 - $vgbl[$lex][$lex][$lex+1] = 123: value ok 6445 - exists $vgbl[$lex][$lex][$lex+1]: no exception ok 6446 - exists $vgbl[$lex][$lex][$lex+1]: value ok 6447 - delete $vgbl[$lex][$lex][$lex+1]: no exception ok 6448 - delete $vgbl[$lex][$lex][$lex+1]: value ok 6449 - $vrlex->[$lex][$lex][$lex+1]: no exception ok 6450 - $vrlex->[$lex][$lex][$lex+1]: value ok 6451 - $vrlex->[$lex][$lex][$lex+1] = 123: no exception ok 6452 - $vrlex->[$lex][$lex][$lex+1] = 123: value ok 6453 - exists $vrlex->[$lex][$lex][$lex+1]: no exception ok 6454 - exists $vrlex->[$lex][$lex][$lex+1]: value ok 6455 - delete $vrlex->[$lex][$lex][$lex+1]: no exception ok 6456 - delete $vrlex->[$lex][$lex][$lex+1]: value ok 6457 - $vrgbl->[$lex][$lex][$lex+1]: no exception ok 6458 - $vrgbl->[$lex][$lex][$lex+1]: value ok 6459 - $vrgbl->[$lex][$lex][$lex+1] = 123: no exception ok 6460 - $vrgbl->[$lex][$lex][$lex+1] = 123: value ok 6461 - exists $vrgbl->[$lex][$lex][$lex+1]: no exception ok 6462 - exists $vrgbl->[$lex][$lex][$lex+1]: value ok 6463 - delete $vrgbl->[$lex][$lex][$lex+1]: no exception ok 6464 - delete $vrgbl->[$lex][$lex][$lex+1]: value ok 6465 - $vlex[$gbl][$lex][$lex+1]: no exception ok 6466 - $vlex[$gbl][$lex][$lex+1]: value ok 6467 - $vlex[$gbl][$lex][$lex+1] = 123: no exception ok 6468 - $vlex[$gbl][$lex][$lex+1] = 123: value ok 6469 - exists $vlex[$gbl][$lex][$lex+1]: no exception ok 6470 - exists $vlex[$gbl][$lex][$lex+1]: value ok 6471 - delete $vlex[$gbl][$lex][$lex+1]: no exception ok 6472 - delete $vlex[$gbl][$lex][$lex+1]: value ok 6473 - $vgbl[$gbl][$lex][$lex+1]: no exception ok 6474 - $vgbl[$gbl][$lex][$lex+1]: value ok 6475 - $vgbl[$gbl][$lex][$lex+1] = 123: no exception ok 6476 - $vgbl[$gbl][$lex][$lex+1] = 123: value ok 6477 - exists $vgbl[$gbl][$lex][$lex+1]: no exception ok 6478 - exists $vgbl[$gbl][$lex][$lex+1]: value ok 6479 - delete $vgbl[$gbl][$lex][$lex+1]: no exception ok 6480 - delete $vgbl[$gbl][$lex][$lex+1]: value ok 6481 - $vrlex->[$gbl][$lex][$lex+1]: no exception ok 6482 - $vrlex->[$gbl][$lex][$lex+1]: value ok 6483 - $vrlex->[$gbl][$lex][$lex+1] = 123: no exception ok 6484 - $vrlex->[$gbl][$lex][$lex+1] = 123: value ok 6485 - exists $vrlex->[$gbl][$lex][$lex+1]: no exception ok 6486 - exists $vrlex->[$gbl][$lex][$lex+1]: value ok 6487 - delete $vrlex->[$gbl][$lex][$lex+1]: no exception ok 6488 - delete $vrlex->[$gbl][$lex][$lex+1]: value ok 6489 - $vrgbl->[$gbl][$lex][$lex+1]: no exception ok 6490 - $vrgbl->[$gbl][$lex][$lex+1]: value ok 6491 - $vrgbl->[$gbl][$lex][$lex+1] = 123: no exception ok 6492 - $vrgbl->[$gbl][$lex][$lex+1] = 123: value ok 6493 - exists $vrgbl->[$gbl][$lex][$lex+1]: no exception ok 6494 - exists $vrgbl->[$gbl][$lex][$lex+1]: value ok 6495 - delete $vrgbl->[$gbl][$lex][$lex+1]: no exception ok 6496 - delete $vrgbl->[$gbl][$lex][$lex+1]: value ok 6497 - $vlex[$lex+1][$lex][$lex+1]: no exception ok 6498 - $vlex[$lex+1][$lex][$lex+1]: value ok 6499 - $vlex[$lex+1][$lex][$lex+1] = 123: no exception ok 6500 - $vlex[$lex+1][$lex][$lex+1] = 123: value ok 6501 - exists $vlex[$lex+1][$lex][$lex+1]: no exception ok 6502 - exists $vlex[$lex+1][$lex][$lex+1]: value ok 6503 - delete $vlex[$lex+1][$lex][$lex+1]: no exception ok 6504 - delete $vlex[$lex+1][$lex][$lex+1]: value ok 6505 - $vgbl[$lex+1][$lex][$lex+1]: no exception ok 6506 - $vgbl[$lex+1][$lex][$lex+1]: value ok 6507 - $vgbl[$lex+1][$lex][$lex+1] = 123: no exception ok 6508 - $vgbl[$lex+1][$lex][$lex+1] = 123: value ok 6509 - exists $vgbl[$lex+1][$lex][$lex+1]: no exception ok 6510 - exists $vgbl[$lex+1][$lex][$lex+1]: value ok 6511 - delete $vgbl[$lex+1][$lex][$lex+1]: no exception ok 6512 - delete $vgbl[$lex+1][$lex][$lex+1]: value ok 6513 - $vrlex->[$lex+1][$lex][$lex+1]: no exception ok 6514 - $vrlex->[$lex+1][$lex][$lex+1]: value ok 6515 - $vrlex->[$lex+1][$lex][$lex+1] = 123: no exception ok 6516 - $vrlex->[$lex+1][$lex][$lex+1] = 123: value ok 6517 - exists $vrlex->[$lex+1][$lex][$lex+1]: no exception ok 6518 - exists $vrlex->[$lex+1][$lex][$lex+1]: value ok 6519 - delete $vrlex->[$lex+1][$lex][$lex+1]: no exception ok 6520 - delete $vrlex->[$lex+1][$lex][$lex+1]: value ok 6521 - $vrgbl->[$lex+1][$lex][$lex+1]: no exception ok 6522 - $vrgbl->[$lex+1][$lex][$lex+1]: value ok 6523 - $vrgbl->[$lex+1][$lex][$lex+1] = 123: no exception ok 6524 - $vrgbl->[$lex+1][$lex][$lex+1] = 123: value ok 6525 - exists $vrgbl->[$lex+1][$lex][$lex+1]: no exception ok 6526 - exists $vrgbl->[$lex+1][$lex][$lex+1]: value ok 6527 - delete $vrgbl->[$lex+1][$lex][$lex+1]: no exception ok 6528 - delete $vrgbl->[$lex+1][$lex][$lex+1]: value ok 6529 - $vlex{foo}[$lex][$lex+1]: no exception ok 6530 - $vlex{foo}[$lex][$lex+1]: value ok 6531 - $vlex{foo}[$lex][$lex+1] = 123: no exception ok 6532 - $vlex{foo}[$lex][$lex+1] = 123: value ok 6533 - exists $vlex{foo}[$lex][$lex+1]: no exception ok 6534 - exists $vlex{foo}[$lex][$lex+1]: value ok 6535 - delete $vlex{foo}[$lex][$lex+1]: no exception ok 6536 - delete $vlex{foo}[$lex][$lex+1]: value ok 6537 - $vgbl{foo}[$lex][$lex+1]: no exception ok 6538 - $vgbl{foo}[$lex][$lex+1]: value ok 6539 - $vgbl{foo}[$lex][$lex+1] = 123: no exception ok 6540 - $vgbl{foo}[$lex][$lex+1] = 123: value ok 6541 - exists $vgbl{foo}[$lex][$lex+1]: no exception ok 6542 - exists $vgbl{foo}[$lex][$lex+1]: value ok 6543 - delete $vgbl{foo}[$lex][$lex+1]: no exception ok 6544 - delete $vgbl{foo}[$lex][$lex+1]: value ok 6545 - $vrlex->{foo}[$lex][$lex+1]: no exception ok 6546 - $vrlex->{foo}[$lex][$lex+1]: value ok 6547 - $vrlex->{foo}[$lex][$lex+1] = 123: no exception ok 6548 - $vrlex->{foo}[$lex][$lex+1] = 123: value ok 6549 - exists $vrlex->{foo}[$lex][$lex+1]: no exception ok 6550 - exists $vrlex->{foo}[$lex][$lex+1]: value ok 6551 - delete $vrlex->{foo}[$lex][$lex+1]: no exception ok 6552 - delete $vrlex->{foo}[$lex][$lex+1]: value ok 6553 - $vrgbl->{foo}[$lex][$lex+1]: no exception ok 6554 - $vrgbl->{foo}[$lex][$lex+1]: value ok 6555 - $vrgbl->{foo}[$lex][$lex+1] = 123: no exception ok 6556 - $vrgbl->{foo}[$lex][$lex+1] = 123: value ok 6557 - exists $vrgbl->{foo}[$lex][$lex+1]: no exception ok 6558 - exists $vrgbl->{foo}[$lex][$lex+1]: value ok 6559 - delete $vrgbl->{foo}[$lex][$lex+1]: no exception ok 6560 - delete $vrgbl->{foo}[$lex][$lex+1]: value ok 6561 - $vlex{$lex}[$lex][$lex+1]: no exception ok 6562 - $vlex{$lex}[$lex][$lex+1]: value ok 6563 - $vlex{$lex}[$lex][$lex+1] = 123: no exception ok 6564 - $vlex{$lex}[$lex][$lex+1] = 123: value ok 6565 - exists $vlex{$lex}[$lex][$lex+1]: no exception ok 6566 - exists $vlex{$lex}[$lex][$lex+1]: value ok 6567 - delete $vlex{$lex}[$lex][$lex+1]: no exception ok 6568 - delete $vlex{$lex}[$lex][$lex+1]: value ok 6569 - $vgbl{$lex}[$lex][$lex+1]: no exception ok 6570 - $vgbl{$lex}[$lex][$lex+1]: value ok 6571 - $vgbl{$lex}[$lex][$lex+1] = 123: no exception ok 6572 - $vgbl{$lex}[$lex][$lex+1] = 123: value ok 6573 - exists $vgbl{$lex}[$lex][$lex+1]: no exception ok 6574 - exists $vgbl{$lex}[$lex][$lex+1]: value ok 6575 - delete $vgbl{$lex}[$lex][$lex+1]: no exception ok 6576 - delete $vgbl{$lex}[$lex][$lex+1]: value ok 6577 - $vrlex->{$lex}[$lex][$lex+1]: no exception ok 6578 - $vrlex->{$lex}[$lex][$lex+1]: value ok 6579 - $vrlex->{$lex}[$lex][$lex+1] = 123: no exception ok 6580 - $vrlex->{$lex}[$lex][$lex+1] = 123: value ok 6581 - exists $vrlex->{$lex}[$lex][$lex+1]: no exception ok 6582 - exists $vrlex->{$lex}[$lex][$lex+1]: value ok 6583 - delete $vrlex->{$lex}[$lex][$lex+1]: no exception ok 6584 - delete $vrlex->{$lex}[$lex][$lex+1]: value ok 6585 - $vrgbl->{$lex}[$lex][$lex+1]: no exception ok 6586 - $vrgbl->{$lex}[$lex][$lex+1]: value ok 6587 - $vrgbl->{$lex}[$lex][$lex+1] = 123: no exception ok 6588 - $vrgbl->{$lex}[$lex][$lex+1] = 123: value ok 6589 - exists $vrgbl->{$lex}[$lex][$lex+1]: no exception ok 6590 - exists $vrgbl->{$lex}[$lex][$lex+1]: value ok 6591 - delete $vrgbl->{$lex}[$lex][$lex+1]: no exception ok 6592 - delete $vrgbl->{$lex}[$lex][$lex+1]: value ok 6593 - $vlex{$gbl}[$lex][$lex+1]: no exception ok 6594 - $vlex{$gbl}[$lex][$lex+1]: value ok 6595 - $vlex{$gbl}[$lex][$lex+1] = 123: no exception ok 6596 - $vlex{$gbl}[$lex][$lex+1] = 123: value ok 6597 - exists $vlex{$gbl}[$lex][$lex+1]: no exception ok 6598 - exists $vlex{$gbl}[$lex][$lex+1]: value ok 6599 - delete $vlex{$gbl}[$lex][$lex+1]: no exception ok 6600 - delete $vlex{$gbl}[$lex][$lex+1]: value ok 6601 - $vgbl{$gbl}[$lex][$lex+1]: no exception ok 6602 - $vgbl{$gbl}[$lex][$lex+1]: value ok 6603 - $vgbl{$gbl}[$lex][$lex+1] = 123: no exception ok 6604 - $vgbl{$gbl}[$lex][$lex+1] = 123: value ok 6605 - exists $vgbl{$gbl}[$lex][$lex+1]: no exception ok 6606 - exists $vgbl{$gbl}[$lex][$lex+1]: value ok 6607 - delete $vgbl{$gbl}[$lex][$lex+1]: no exception ok 6608 - delete $vgbl{$gbl}[$lex][$lex+1]: value ok 6609 - $vrlex->{$gbl}[$lex][$lex+1]: no exception ok 6610 - $vrlex->{$gbl}[$lex][$lex+1]: value ok 6611 - $vrlex->{$gbl}[$lex][$lex+1] = 123: no exception ok 6612 - $vrlex->{$gbl}[$lex][$lex+1] = 123: value ok 6613 - exists $vrlex->{$gbl}[$lex][$lex+1]: no exception ok 6614 - exists $vrlex->{$gbl}[$lex][$lex+1]: value ok 6615 - delete $vrlex->{$gbl}[$lex][$lex+1]: no exception ok 6616 - delete $vrlex->{$gbl}[$lex][$lex+1]: value ok 6617 - $vrgbl->{$gbl}[$lex][$lex+1]: no exception ok 6618 - $vrgbl->{$gbl}[$lex][$lex+1]: value ok 6619 - $vrgbl->{$gbl}[$lex][$lex+1] = 123: no exception ok 6620 - $vrgbl->{$gbl}[$lex][$lex+1] = 123: value ok 6621 - exists $vrgbl->{$gbl}[$lex][$lex+1]: no exception ok 6622 - exists $vrgbl->{$gbl}[$lex][$lex+1]: value ok 6623 - delete $vrgbl->{$gbl}[$lex][$lex+1]: no exception ok 6624 - delete $vrgbl->{$gbl}[$lex][$lex+1]: value ok 6625 - $vlex{"x$lex"}[$lex][$lex+1]: no exception ok 6626 - $vlex{"x$lex"}[$lex][$lex+1]: value ok 6627 - $vlex{"x$lex"}[$lex][$lex+1] = 123: no exception ok 6628 - $vlex{"x$lex"}[$lex][$lex+1] = 123: value ok 6629 - exists $vlex{"x$lex"}[$lex][$lex+1]: no exception ok 6630 - exists $vlex{"x$lex"}[$lex][$lex+1]: value ok 6631 - delete $vlex{"x$lex"}[$lex][$lex+1]: no exception ok 6632 - delete $vlex{"x$lex"}[$lex][$lex+1]: value ok 6633 - $vgbl{"x$lex"}[$lex][$lex+1]: no exception ok 6634 - $vgbl{"x$lex"}[$lex][$lex+1]: value ok 6635 - $vgbl{"x$lex"}[$lex][$lex+1] = 123: no exception ok 6636 - $vgbl{"x$lex"}[$lex][$lex+1] = 123: value ok 6637 - exists $vgbl{"x$lex"}[$lex][$lex+1]: no exception ok 6638 - exists $vgbl{"x$lex"}[$lex][$lex+1]: value ok 6639 - delete $vgbl{"x$lex"}[$lex][$lex+1]: no exception ok 6640 - delete $vgbl{"x$lex"}[$lex][$lex+1]: value ok 6641 - $vrlex->{"x$lex"}[$lex][$lex+1]: no exception ok 6642 - $vrlex->{"x$lex"}[$lex][$lex+1]: value ok 6643 - $vrlex->{"x$lex"}[$lex][$lex+1] = 123: no exception ok 6644 - $vrlex->{"x$lex"}[$lex][$lex+1] = 123: value ok 6645 - exists $vrlex->{"x$lex"}[$lex][$lex+1]: no exception ok 6646 - exists $vrlex->{"x$lex"}[$lex][$lex+1]: value ok 6647 - delete $vrlex->{"x$lex"}[$lex][$lex+1]: no exception ok 6648 - delete $vrlex->{"x$lex"}[$lex][$lex+1]: value ok 6649 - $vrgbl->{"x$lex"}[$lex][$lex+1]: no exception ok 6650 - $vrgbl->{"x$lex"}[$lex][$lex+1]: value ok 6651 - $vrgbl->{"x$lex"}[$lex][$lex+1] = 123: no exception ok 6652 - $vrgbl->{"x$lex"}[$lex][$lex+1] = 123: value ok 6653 - exists $vrgbl->{"x$lex"}[$lex][$lex+1]: no exception ok 6654 - exists $vrgbl->{"x$lex"}[$lex][$lex+1]: value ok 6655 - delete $vrgbl->{"x$lex"}[$lex][$lex+1]: no exception ok 6656 - delete $vrgbl->{"x$lex"}[$lex][$lex+1]: value ok 6657 - $vlex[0][$gbl][$lex+1]: no exception ok 6658 - $vlex[0][$gbl][$lex+1]: value ok 6659 - $vlex[0][$gbl][$lex+1] = 123: no exception ok 6660 - $vlex[0][$gbl][$lex+1] = 123: value ok 6661 - exists $vlex[0][$gbl][$lex+1]: no exception ok 6662 - exists $vlex[0][$gbl][$lex+1]: value ok 6663 - delete $vlex[0][$gbl][$lex+1]: no exception ok 6664 - delete $vlex[0][$gbl][$lex+1]: value ok 6665 - $vgbl[0][$gbl][$lex+1]: no exception ok 6666 - $vgbl[0][$gbl][$lex+1]: value ok 6667 - $vgbl[0][$gbl][$lex+1] = 123: no exception ok 6668 - $vgbl[0][$gbl][$lex+1] = 123: value ok 6669 - exists $vgbl[0][$gbl][$lex+1]: no exception ok 6670 - exists $vgbl[0][$gbl][$lex+1]: value ok 6671 - delete $vgbl[0][$gbl][$lex+1]: no exception ok 6672 - delete $vgbl[0][$gbl][$lex+1]: value ok 6673 - $vrlex->[0][$gbl][$lex+1]: no exception ok 6674 - $vrlex->[0][$gbl][$lex+1]: value ok 6675 - $vrlex->[0][$gbl][$lex+1] = 123: no exception ok 6676 - $vrlex->[0][$gbl][$lex+1] = 123: value ok 6677 - exists $vrlex->[0][$gbl][$lex+1]: no exception ok 6678 - exists $vrlex->[0][$gbl][$lex+1]: value ok 6679 - delete $vrlex->[0][$gbl][$lex+1]: no exception ok 6680 - delete $vrlex->[0][$gbl][$lex+1]: value ok 6681 - $vrgbl->[0][$gbl][$lex+1]: no exception ok 6682 - $vrgbl->[0][$gbl][$lex+1]: value ok 6683 - $vrgbl->[0][$gbl][$lex+1] = 123: no exception ok 6684 - $vrgbl->[0][$gbl][$lex+1] = 123: value ok 6685 - exists $vrgbl->[0][$gbl][$lex+1]: no exception ok 6686 - exists $vrgbl->[0][$gbl][$lex+1]: value ok 6687 - delete $vrgbl->[0][$gbl][$lex+1]: no exception ok 6688 - delete $vrgbl->[0][$gbl][$lex+1]: value ok 6689 - $vlex[$lex][$gbl][$lex+1]: no exception ok 6690 - $vlex[$lex][$gbl][$lex+1]: value ok 6691 - $vlex[$lex][$gbl][$lex+1] = 123: no exception ok 6692 - $vlex[$lex][$gbl][$lex+1] = 123: value ok 6693 - exists $vlex[$lex][$gbl][$lex+1]: no exception ok 6694 - exists $vlex[$lex][$gbl][$lex+1]: value ok 6695 - delete $vlex[$lex][$gbl][$lex+1]: no exception ok 6696 - delete $vlex[$lex][$gbl][$lex+1]: value ok 6697 - $vgbl[$lex][$gbl][$lex+1]: no exception ok 6698 - $vgbl[$lex][$gbl][$lex+1]: value ok 6699 - $vgbl[$lex][$gbl][$lex+1] = 123: no exception ok 6700 - $vgbl[$lex][$gbl][$lex+1] = 123: value ok 6701 - exists $vgbl[$lex][$gbl][$lex+1]: no exception ok 6702 - exists $vgbl[$lex][$gbl][$lex+1]: value ok 6703 - delete $vgbl[$lex][$gbl][$lex+1]: no exception ok 6704 - delete $vgbl[$lex][$gbl][$lex+1]: value ok 6705 - $vrlex->[$lex][$gbl][$lex+1]: no exception ok 6706 - $vrlex->[$lex][$gbl][$lex+1]: value ok 6707 - $vrlex->[$lex][$gbl][$lex+1] = 123: no exception ok 6708 - $vrlex->[$lex][$gbl][$lex+1] = 123: value ok 6709 - exists $vrlex->[$lex][$gbl][$lex+1]: no exception ok 6710 - exists $vrlex->[$lex][$gbl][$lex+1]: value ok 6711 - delete $vrlex->[$lex][$gbl][$lex+1]: no exception ok 6712 - delete $vrlex->[$lex][$gbl][$lex+1]: value ok 6713 - $vrgbl->[$lex][$gbl][$lex+1]: no exception ok 6714 - $vrgbl->[$lex][$gbl][$lex+1]: value ok 6715 - $vrgbl->[$lex][$gbl][$lex+1] = 123: no exception ok 6716 - $vrgbl->[$lex][$gbl][$lex+1] = 123: value ok 6717 - exists $vrgbl->[$lex][$gbl][$lex+1]: no exception ok 6718 - exists $vrgbl->[$lex][$gbl][$lex+1]: value ok 6719 - delete $vrgbl->[$lex][$gbl][$lex+1]: no exception ok 6720 - delete $vrgbl->[$lex][$gbl][$lex+1]: value ok 6721 - $vlex[$gbl][$gbl][$lex+1]: no exception ok 6722 - $vlex[$gbl][$gbl][$lex+1]: value ok 6723 - $vlex[$gbl][$gbl][$lex+1] = 123: no exception ok 6724 - $vlex[$gbl][$gbl][$lex+1] = 123: value ok 6725 - exists $vlex[$gbl][$gbl][$lex+1]: no exception ok 6726 - exists $vlex[$gbl][$gbl][$lex+1]: value ok 6727 - delete $vlex[$gbl][$gbl][$lex+1]: no exception ok 6728 - delete $vlex[$gbl][$gbl][$lex+1]: value ok 6729 - $vgbl[$gbl][$gbl][$lex+1]: no exception ok 6730 - $vgbl[$gbl][$gbl][$lex+1]: value ok 6731 - $vgbl[$gbl][$gbl][$lex+1] = 123: no exception ok 6732 - $vgbl[$gbl][$gbl][$lex+1] = 123: value ok 6733 - exists $vgbl[$gbl][$gbl][$lex+1]: no exception ok 6734 - exists $vgbl[$gbl][$gbl][$lex+1]: value ok 6735 - delete $vgbl[$gbl][$gbl][$lex+1]: no exception ok 6736 - delete $vgbl[$gbl][$gbl][$lex+1]: value ok 6737 - $vrlex->[$gbl][$gbl][$lex+1]: no exception ok 6738 - $vrlex->[$gbl][$gbl][$lex+1]: value ok 6739 - $vrlex->[$gbl][$gbl][$lex+1] = 123: no exception ok 6740 - $vrlex->[$gbl][$gbl][$lex+1] = 123: value ok 6741 - exists $vrlex->[$gbl][$gbl][$lex+1]: no exception ok 6742 - exists $vrlex->[$gbl][$gbl][$lex+1]: value ok 6743 - delete $vrlex->[$gbl][$gbl][$lex+1]: no exception ok 6744 - delete $vrlex->[$gbl][$gbl][$lex+1]: value ok 6745 - $vrgbl->[$gbl][$gbl][$lex+1]: no exception ok 6746 - $vrgbl->[$gbl][$gbl][$lex+1]: value ok 6747 - $vrgbl->[$gbl][$gbl][$lex+1] = 123: no exception ok 6748 - $vrgbl->[$gbl][$gbl][$lex+1] = 123: value ok 6749 - exists $vrgbl->[$gbl][$gbl][$lex+1]: no exception ok 6750 - exists $vrgbl->[$gbl][$gbl][$lex+1]: value ok 6751 - delete $vrgbl->[$gbl][$gbl][$lex+1]: no exception ok 6752 - delete $vrgbl->[$gbl][$gbl][$lex+1]: value ok 6753 - $vlex[$lex+1][$gbl][$lex+1]: no exception ok 6754 - $vlex[$lex+1][$gbl][$lex+1]: value ok 6755 - $vlex[$lex+1][$gbl][$lex+1] = 123: no exception ok 6756 - $vlex[$lex+1][$gbl][$lex+1] = 123: value ok 6757 - exists $vlex[$lex+1][$gbl][$lex+1]: no exception ok 6758 - exists $vlex[$lex+1][$gbl][$lex+1]: value ok 6759 - delete $vlex[$lex+1][$gbl][$lex+1]: no exception ok 6760 - delete $vlex[$lex+1][$gbl][$lex+1]: value ok 6761 - $vgbl[$lex+1][$gbl][$lex+1]: no exception ok 6762 - $vgbl[$lex+1][$gbl][$lex+1]: value ok 6763 - $vgbl[$lex+1][$gbl][$lex+1] = 123: no exception ok 6764 - $vgbl[$lex+1][$gbl][$lex+1] = 123: value ok 6765 - exists $vgbl[$lex+1][$gbl][$lex+1]: no exception ok 6766 - exists $vgbl[$lex+1][$gbl][$lex+1]: value ok 6767 - delete $vgbl[$lex+1][$gbl][$lex+1]: no exception ok 6768 - delete $vgbl[$lex+1][$gbl][$lex+1]: value ok 6769 - $vrlex->[$lex+1][$gbl][$lex+1]: no exception ok 6770 - $vrlex->[$lex+1][$gbl][$lex+1]: value ok 6771 - $vrlex->[$lex+1][$gbl][$lex+1] = 123: no exception ok 6772 - $vrlex->[$lex+1][$gbl][$lex+1] = 123: value ok 6773 - exists $vrlex->[$lex+1][$gbl][$lex+1]: no exception ok 6774 - exists $vrlex->[$lex+1][$gbl][$lex+1]: value ok 6775 - delete $vrlex->[$lex+1][$gbl][$lex+1]: no exception ok 6776 - delete $vrlex->[$lex+1][$gbl][$lex+1]: value ok 6777 - $vrgbl->[$lex+1][$gbl][$lex+1]: no exception ok 6778 - $vrgbl->[$lex+1][$gbl][$lex+1]: value ok 6779 - $vrgbl->[$lex+1][$gbl][$lex+1] = 123: no exception ok 6780 - $vrgbl->[$lex+1][$gbl][$lex+1] = 123: value ok 6781 - exists $vrgbl->[$lex+1][$gbl][$lex+1]: no exception ok 6782 - exists $vrgbl->[$lex+1][$gbl][$lex+1]: value ok 6783 - delete $vrgbl->[$lex+1][$gbl][$lex+1]: no exception ok 6784 - delete $vrgbl->[$lex+1][$gbl][$lex+1]: value ok 6785 - $vlex{foo}[$gbl][$lex+1]: no exception ok 6786 - $vlex{foo}[$gbl][$lex+1]: value ok 6787 - $vlex{foo}[$gbl][$lex+1] = 123: no exception ok 6788 - $vlex{foo}[$gbl][$lex+1] = 123: value ok 6789 - exists $vlex{foo}[$gbl][$lex+1]: no exception ok 6790 - exists $vlex{foo}[$gbl][$lex+1]: value ok 6791 - delete $vlex{foo}[$gbl][$lex+1]: no exception ok 6792 - delete $vlex{foo}[$gbl][$lex+1]: value ok 6793 - $vgbl{foo}[$gbl][$lex+1]: no exception ok 6794 - $vgbl{foo}[$gbl][$lex+1]: value ok 6795 - $vgbl{foo}[$gbl][$lex+1] = 123: no exception ok 6796 - $vgbl{foo}[$gbl][$lex+1] = 123: value ok 6797 - exists $vgbl{foo}[$gbl][$lex+1]: no exception ok 6798 - exists $vgbl{foo}[$gbl][$lex+1]: value ok 6799 - delete $vgbl{foo}[$gbl][$lex+1]: no exception ok 6800 - delete $vgbl{foo}[$gbl][$lex+1]: value ok 6801 - $vrlex->{foo}[$gbl][$lex+1]: no exception ok 6802 - $vrlex->{foo}[$gbl][$lex+1]: value ok 6803 - $vrlex->{foo}[$gbl][$lex+1] = 123: no exception ok 6804 - $vrlex->{foo}[$gbl][$lex+1] = 123: value ok 6805 - exists $vrlex->{foo}[$gbl][$lex+1]: no exception ok 6806 - exists $vrlex->{foo}[$gbl][$lex+1]: value ok 6807 - delete $vrlex->{foo}[$gbl][$lex+1]: no exception ok 6808 - delete $vrlex->{foo}[$gbl][$lex+1]: value ok 6809 - $vrgbl->{foo}[$gbl][$lex+1]: no exception ok 6810 - $vrgbl->{foo}[$gbl][$lex+1]: value ok 6811 - $vrgbl->{foo}[$gbl][$lex+1] = 123: no exception ok 6812 - $vrgbl->{foo}[$gbl][$lex+1] = 123: value ok 6813 - exists $vrgbl->{foo}[$gbl][$lex+1]: no exception ok 6814 - exists $vrgbl->{foo}[$gbl][$lex+1]: value ok 6815 - delete $vrgbl->{foo}[$gbl][$lex+1]: no exception ok 6816 - delete $vrgbl->{foo}[$gbl][$lex+1]: value ok 6817 - $vlex{$lex}[$gbl][$lex+1]: no exception ok 6818 - $vlex{$lex}[$gbl][$lex+1]: value ok 6819 - $vlex{$lex}[$gbl][$lex+1] = 123: no exception ok 6820 - $vlex{$lex}[$gbl][$lex+1] = 123: value ok 6821 - exists $vlex{$lex}[$gbl][$lex+1]: no exception ok 6822 - exists $vlex{$lex}[$gbl][$lex+1]: value ok 6823 - delete $vlex{$lex}[$gbl][$lex+1]: no exception ok 6824 - delete $vlex{$lex}[$gbl][$lex+1]: value ok 6825 - $vgbl{$lex}[$gbl][$lex+1]: no exception ok 6826 - $vgbl{$lex}[$gbl][$lex+1]: value ok 6827 - $vgbl{$lex}[$gbl][$lex+1] = 123: no exception ok 6828 - $vgbl{$lex}[$gbl][$lex+1] = 123: value ok 6829 - exists $vgbl{$lex}[$gbl][$lex+1]: no exception ok 6830 - exists $vgbl{$lex}[$gbl][$lex+1]: value ok 6831 - delete $vgbl{$lex}[$gbl][$lex+1]: no exception ok 6832 - delete $vgbl{$lex}[$gbl][$lex+1]: value ok 6833 - $vrlex->{$lex}[$gbl][$lex+1]: no exception ok 6834 - $vrlex->{$lex}[$gbl][$lex+1]: value ok 6835 - $vrlex->{$lex}[$gbl][$lex+1] = 123: no exception ok 6836 - $vrlex->{$lex}[$gbl][$lex+1] = 123: value ok 6837 - exists $vrlex->{$lex}[$gbl][$lex+1]: no exception ok 6838 - exists $vrlex->{$lex}[$gbl][$lex+1]: value ok 6839 - delete $vrlex->{$lex}[$gbl][$lex+1]: no exception ok 6840 - delete $vrlex->{$lex}[$gbl][$lex+1]: value ok 6841 - $vrgbl->{$lex}[$gbl][$lex+1]: no exception ok 6842 - $vrgbl->{$lex}[$gbl][$lex+1]: value ok 6843 - $vrgbl->{$lex}[$gbl][$lex+1] = 123: no exception ok 6844 - $vrgbl->{$lex}[$gbl][$lex+1] = 123: value ok 6845 - exists $vrgbl->{$lex}[$gbl][$lex+1]: no exception ok 6846 - exists $vrgbl->{$lex}[$gbl][$lex+1]: value ok 6847 - delete $vrgbl->{$lex}[$gbl][$lex+1]: no exception ok 6848 - delete $vrgbl->{$lex}[$gbl][$lex+1]: value ok 6849 - $vlex{$gbl}[$gbl][$lex+1]: no exception ok 6850 - $vlex{$gbl}[$gbl][$lex+1]: value ok 6851 - $vlex{$gbl}[$gbl][$lex+1] = 123: no exception ok 6852 - $vlex{$gbl}[$gbl][$lex+1] = 123: value ok 6853 - exists $vlex{$gbl}[$gbl][$lex+1]: no exception ok 6854 - exists $vlex{$gbl}[$gbl][$lex+1]: value ok 6855 - delete $vlex{$gbl}[$gbl][$lex+1]: no exception ok 6856 - delete $vlex{$gbl}[$gbl][$lex+1]: value ok 6857 - $vgbl{$gbl}[$gbl][$lex+1]: no exception ok 6858 - $vgbl{$gbl}[$gbl][$lex+1]: value ok 6859 - $vgbl{$gbl}[$gbl][$lex+1] = 123: no exception ok 6860 - $vgbl{$gbl}[$gbl][$lex+1] = 123: value ok 6861 - exists $vgbl{$gbl}[$gbl][$lex+1]: no exception ok 6862 - exists $vgbl{$gbl}[$gbl][$lex+1]: value ok 6863 - delete $vgbl{$gbl}[$gbl][$lex+1]: no exception ok 6864 - delete $vgbl{$gbl}[$gbl][$lex+1]: value ok 6865 - $vrlex->{$gbl}[$gbl][$lex+1]: no exception ok 6866 - $vrlex->{$gbl}[$gbl][$lex+1]: value ok 6867 - $vrlex->{$gbl}[$gbl][$lex+1] = 123: no exception ok 6868 - $vrlex->{$gbl}[$gbl][$lex+1] = 123: value ok 6869 - exists $vrlex->{$gbl}[$gbl][$lex+1]: no exception ok 6870 - exists $vrlex->{$gbl}[$gbl][$lex+1]: value ok 6871 - delete $vrlex->{$gbl}[$gbl][$lex+1]: no exception ok 6872 - delete $vrlex->{$gbl}[$gbl][$lex+1]: value ok 6873 - $vrgbl->{$gbl}[$gbl][$lex+1]: no exception ok 6874 - $vrgbl->{$gbl}[$gbl][$lex+1]: value ok 6875 - $vrgbl->{$gbl}[$gbl][$lex+1] = 123: no exception ok 6876 - $vrgbl->{$gbl}[$gbl][$lex+1] = 123: value ok 6877 - exists $vrgbl->{$gbl}[$gbl][$lex+1]: no exception ok 6878 - exists $vrgbl->{$gbl}[$gbl][$lex+1]: value ok 6879 - delete $vrgbl->{$gbl}[$gbl][$lex+1]: no exception ok 6880 - delete $vrgbl->{$gbl}[$gbl][$lex+1]: value ok 6881 - $vlex{"x$lex"}[$gbl][$lex+1]: no exception ok 6882 - $vlex{"x$lex"}[$gbl][$lex+1]: value ok 6883 - $vlex{"x$lex"}[$gbl][$lex+1] = 123: no exception ok 6884 - $vlex{"x$lex"}[$gbl][$lex+1] = 123: value ok 6885 - exists $vlex{"x$lex"}[$gbl][$lex+1]: no exception ok 6886 - exists $vlex{"x$lex"}[$gbl][$lex+1]: value ok 6887 - delete $vlex{"x$lex"}[$gbl][$lex+1]: no exception ok 6888 - delete $vlex{"x$lex"}[$gbl][$lex+1]: value ok 6889 - $vgbl{"x$lex"}[$gbl][$lex+1]: no exception ok 6890 - $vgbl{"x$lex"}[$gbl][$lex+1]: value ok 6891 - $vgbl{"x$lex"}[$gbl][$lex+1] = 123: no exception ok 6892 - $vgbl{"x$lex"}[$gbl][$lex+1] = 123: value ok 6893 - exists $vgbl{"x$lex"}[$gbl][$lex+1]: no exception ok 6894 - exists $vgbl{"x$lex"}[$gbl][$lex+1]: value ok 6895 - delete $vgbl{"x$lex"}[$gbl][$lex+1]: no exception ok 6896 - delete $vgbl{"x$lex"}[$gbl][$lex+1]: value ok 6897 - $vrlex->{"x$lex"}[$gbl][$lex+1]: no exception ok 6898 - $vrlex->{"x$lex"}[$gbl][$lex+1]: value ok 6899 - $vrlex->{"x$lex"}[$gbl][$lex+1] = 123: no exception ok 6900 - $vrlex->{"x$lex"}[$gbl][$lex+1] = 123: value ok 6901 - exists $vrlex->{"x$lex"}[$gbl][$lex+1]: no exception ok 6902 - exists $vrlex->{"x$lex"}[$gbl][$lex+1]: value ok 6903 - delete $vrlex->{"x$lex"}[$gbl][$lex+1]: no exception ok 6904 - delete $vrlex->{"x$lex"}[$gbl][$lex+1]: value ok 6905 - $vrgbl->{"x$lex"}[$gbl][$lex+1]: no exception ok 6906 - $vrgbl->{"x$lex"}[$gbl][$lex+1]: value ok 6907 - $vrgbl->{"x$lex"}[$gbl][$lex+1] = 123: no exception ok 6908 - $vrgbl->{"x$lex"}[$gbl][$lex+1] = 123: value ok 6909 - exists $vrgbl->{"x$lex"}[$gbl][$lex+1]: no exception ok 6910 - exists $vrgbl->{"x$lex"}[$gbl][$lex+1]: value ok 6911 - delete $vrgbl->{"x$lex"}[$gbl][$lex+1]: no exception ok 6912 - delete $vrgbl->{"x$lex"}[$gbl][$lex+1]: value ok 6913 - $vlex[0][$lex+1][$lex+1]: no exception ok 6914 - $vlex[0][$lex+1][$lex+1]: value ok 6915 - $vlex[0][$lex+1][$lex+1] = 123: no exception ok 6916 - $vlex[0][$lex+1][$lex+1] = 123: value ok 6917 - exists $vlex[0][$lex+1][$lex+1]: no exception ok 6918 - exists $vlex[0][$lex+1][$lex+1]: value ok 6919 - delete $vlex[0][$lex+1][$lex+1]: no exception ok 6920 - delete $vlex[0][$lex+1][$lex+1]: value ok 6921 - $vgbl[0][$lex+1][$lex+1]: no exception ok 6922 - $vgbl[0][$lex+1][$lex+1]: value ok 6923 - $vgbl[0][$lex+1][$lex+1] = 123: no exception ok 6924 - $vgbl[0][$lex+1][$lex+1] = 123: value ok 6925 - exists $vgbl[0][$lex+1][$lex+1]: no exception ok 6926 - exists $vgbl[0][$lex+1][$lex+1]: value ok 6927 - delete $vgbl[0][$lex+1][$lex+1]: no exception ok 6928 - delete $vgbl[0][$lex+1][$lex+1]: value ok 6929 - $vrlex->[0][$lex+1][$lex+1]: no exception ok 6930 - $vrlex->[0][$lex+1][$lex+1]: value ok 6931 - $vrlex->[0][$lex+1][$lex+1] = 123: no exception ok 6932 - $vrlex->[0][$lex+1][$lex+1] = 123: value ok 6933 - exists $vrlex->[0][$lex+1][$lex+1]: no exception ok 6934 - exists $vrlex->[0][$lex+1][$lex+1]: value ok 6935 - delete $vrlex->[0][$lex+1][$lex+1]: no exception ok 6936 - delete $vrlex->[0][$lex+1][$lex+1]: value ok 6937 - $vrgbl->[0][$lex+1][$lex+1]: no exception ok 6938 - $vrgbl->[0][$lex+1][$lex+1]: value ok 6939 - $vrgbl->[0][$lex+1][$lex+1] = 123: no exception ok 6940 - $vrgbl->[0][$lex+1][$lex+1] = 123: value ok 6941 - exists $vrgbl->[0][$lex+1][$lex+1]: no exception ok 6942 - exists $vrgbl->[0][$lex+1][$lex+1]: value ok 6943 - delete $vrgbl->[0][$lex+1][$lex+1]: no exception ok 6944 - delete $vrgbl->[0][$lex+1][$lex+1]: value ok 6945 - $vlex[$lex][$lex+1][$lex+1]: no exception ok 6946 - $vlex[$lex][$lex+1][$lex+1]: value ok 6947 - $vlex[$lex][$lex+1][$lex+1] = 123: no exception ok 6948 - $vlex[$lex][$lex+1][$lex+1] = 123: value ok 6949 - exists $vlex[$lex][$lex+1][$lex+1]: no exception ok 6950 - exists $vlex[$lex][$lex+1][$lex+1]: value ok 6951 - delete $vlex[$lex][$lex+1][$lex+1]: no exception ok 6952 - delete $vlex[$lex][$lex+1][$lex+1]: value ok 6953 - $vgbl[$lex][$lex+1][$lex+1]: no exception ok 6954 - $vgbl[$lex][$lex+1][$lex+1]: value ok 6955 - $vgbl[$lex][$lex+1][$lex+1] = 123: no exception ok 6956 - $vgbl[$lex][$lex+1][$lex+1] = 123: value ok 6957 - exists $vgbl[$lex][$lex+1][$lex+1]: no exception ok 6958 - exists $vgbl[$lex][$lex+1][$lex+1]: value ok 6959 - delete $vgbl[$lex][$lex+1][$lex+1]: no exception ok 6960 - delete $vgbl[$lex][$lex+1][$lex+1]: value ok 6961 - $vrlex->[$lex][$lex+1][$lex+1]: no exception ok 6962 - $vrlex->[$lex][$lex+1][$lex+1]: value ok 6963 - $vrlex->[$lex][$lex+1][$lex+1] = 123: no exception ok 6964 - $vrlex->[$lex][$lex+1][$lex+1] = 123: value ok 6965 - exists $vrlex->[$lex][$lex+1][$lex+1]: no exception ok 6966 - exists $vrlex->[$lex][$lex+1][$lex+1]: value ok 6967 - delete $vrlex->[$lex][$lex+1][$lex+1]: no exception ok 6968 - delete $vrlex->[$lex][$lex+1][$lex+1]: value ok 6969 - $vrgbl->[$lex][$lex+1][$lex+1]: no exception ok 6970 - $vrgbl->[$lex][$lex+1][$lex+1]: value ok 6971 - $vrgbl->[$lex][$lex+1][$lex+1] = 123: no exception ok 6972 - $vrgbl->[$lex][$lex+1][$lex+1] = 123: value ok 6973 - exists $vrgbl->[$lex][$lex+1][$lex+1]: no exception ok 6974 - exists $vrgbl->[$lex][$lex+1][$lex+1]: value ok 6975 - delete $vrgbl->[$lex][$lex+1][$lex+1]: no exception ok 6976 - delete $vrgbl->[$lex][$lex+1][$lex+1]: value ok 6977 - $vlex[$gbl][$lex+1][$lex+1]: no exception ok 6978 - $vlex[$gbl][$lex+1][$lex+1]: value ok 6979 - $vlex[$gbl][$lex+1][$lex+1] = 123: no exception ok 6980 - $vlex[$gbl][$lex+1][$lex+1] = 123: value ok 6981 - exists $vlex[$gbl][$lex+1][$lex+1]: no exception ok 6982 - exists $vlex[$gbl][$lex+1][$lex+1]: value ok 6983 - delete $vlex[$gbl][$lex+1][$lex+1]: no exception ok 6984 - delete $vlex[$gbl][$lex+1][$lex+1]: value ok 6985 - $vgbl[$gbl][$lex+1][$lex+1]: no exception ok 6986 - $vgbl[$gbl][$lex+1][$lex+1]: value ok 6987 - $vgbl[$gbl][$lex+1][$lex+1] = 123: no exception ok 6988 - $vgbl[$gbl][$lex+1][$lex+1] = 123: value ok 6989 - exists $vgbl[$gbl][$lex+1][$lex+1]: no exception ok 6990 - exists $vgbl[$gbl][$lex+1][$lex+1]: value ok 6991 - delete $vgbl[$gbl][$lex+1][$lex+1]: no exception ok 6992 - delete $vgbl[$gbl][$lex+1][$lex+1]: value ok 6993 - $vrlex->[$gbl][$lex+1][$lex+1]: no exception ok 6994 - $vrlex->[$gbl][$lex+1][$lex+1]: value ok 6995 - $vrlex->[$gbl][$lex+1][$lex+1] = 123: no exception ok 6996 - $vrlex->[$gbl][$lex+1][$lex+1] = 123: value ok 6997 - exists $vrlex->[$gbl][$lex+1][$lex+1]: no exception ok 6998 - exists $vrlex->[$gbl][$lex+1][$lex+1]: value ok 6999 - delete $vrlex->[$gbl][$lex+1][$lex+1]: no exception ok 7000 - delete $vrlex->[$gbl][$lex+1][$lex+1]: value ok 7001 - $vrgbl->[$gbl][$lex+1][$lex+1]: no exception ok 7002 - $vrgbl->[$gbl][$lex+1][$lex+1]: value ok 7003 - $vrgbl->[$gbl][$lex+1][$lex+1] = 123: no exception ok 7004 - $vrgbl->[$gbl][$lex+1][$lex+1] = 123: value ok 7005 - exists $vrgbl->[$gbl][$lex+1][$lex+1]: no exception ok 7006 - exists $vrgbl->[$gbl][$lex+1][$lex+1]: value ok 7007 - delete $vrgbl->[$gbl][$lex+1][$lex+1]: no exception ok 7008 - delete $vrgbl->[$gbl][$lex+1][$lex+1]: value ok 7009 - $vlex[$lex+1][$lex+1][$lex+1]: no exception ok 7010 - $vlex[$lex+1][$lex+1][$lex+1]: value ok 7011 - $vlex[$lex+1][$lex+1][$lex+1] = 123: no exception ok 7012 - $vlex[$lex+1][$lex+1][$lex+1] = 123: value ok 7013 - exists $vlex[$lex+1][$lex+1][$lex+1]: no exception ok 7014 - exists $vlex[$lex+1][$lex+1][$lex+1]: value ok 7015 - delete $vlex[$lex+1][$lex+1][$lex+1]: no exception ok 7016 - delete $vlex[$lex+1][$lex+1][$lex+1]: value ok 7017 - $vgbl[$lex+1][$lex+1][$lex+1]: no exception ok 7018 - $vgbl[$lex+1][$lex+1][$lex+1]: value ok 7019 - $vgbl[$lex+1][$lex+1][$lex+1] = 123: no exception ok 7020 - $vgbl[$lex+1][$lex+1][$lex+1] = 123: value ok 7021 - exists $vgbl[$lex+1][$lex+1][$lex+1]: no exception ok 7022 - exists $vgbl[$lex+1][$lex+1][$lex+1]: value ok 7023 - delete $vgbl[$lex+1][$lex+1][$lex+1]: no exception ok 7024 - delete $vgbl[$lex+1][$lex+1][$lex+1]: value ok 7025 - $vrlex->[$lex+1][$lex+1][$lex+1]: no exception ok 7026 - $vrlex->[$lex+1][$lex+1][$lex+1]: value ok 7027 - $vrlex->[$lex+1][$lex+1][$lex+1] = 123: no exception ok 7028 - $vrlex->[$lex+1][$lex+1][$lex+1] = 123: value ok 7029 - exists $vrlex->[$lex+1][$lex+1][$lex+1]: no exception ok 7030 - exists $vrlex->[$lex+1][$lex+1][$lex+1]: value ok 7031 - delete $vrlex->[$lex+1][$lex+1][$lex+1]: no exception ok 7032 - delete $vrlex->[$lex+1][$lex+1][$lex+1]: value ok 7033 - $vrgbl->[$lex+1][$lex+1][$lex+1]: no exception ok 7034 - $vrgbl->[$lex+1][$lex+1][$lex+1]: value ok 7035 - $vrgbl->[$lex+1][$lex+1][$lex+1] = 123: no exception ok 7036 - $vrgbl->[$lex+1][$lex+1][$lex+1] = 123: value ok 7037 - exists $vrgbl->[$lex+1][$lex+1][$lex+1]: no exception ok 7038 - exists $vrgbl->[$lex+1][$lex+1][$lex+1]: value ok 7039 - delete $vrgbl->[$lex+1][$lex+1][$lex+1]: no exception ok 7040 - delete $vrgbl->[$lex+1][$lex+1][$lex+1]: value ok 7041 - $vlex{foo}[$lex+1][$lex+1]: no exception ok 7042 - $vlex{foo}[$lex+1][$lex+1]: value ok 7043 - $vlex{foo}[$lex+1][$lex+1] = 123: no exception ok 7044 - $vlex{foo}[$lex+1][$lex+1] = 123: value ok 7045 - exists $vlex{foo}[$lex+1][$lex+1]: no exception ok 7046 - exists $vlex{foo}[$lex+1][$lex+1]: value ok 7047 - delete $vlex{foo}[$lex+1][$lex+1]: no exception ok 7048 - delete $vlex{foo}[$lex+1][$lex+1]: value ok 7049 - $vgbl{foo}[$lex+1][$lex+1]: no exception ok 7050 - $vgbl{foo}[$lex+1][$lex+1]: value ok 7051 - $vgbl{foo}[$lex+1][$lex+1] = 123: no exception ok 7052 - $vgbl{foo}[$lex+1][$lex+1] = 123: value ok 7053 - exists $vgbl{foo}[$lex+1][$lex+1]: no exception ok 7054 - exists $vgbl{foo}[$lex+1][$lex+1]: value ok 7055 - delete $vgbl{foo}[$lex+1][$lex+1]: no exception ok 7056 - delete $vgbl{foo}[$lex+1][$lex+1]: value ok 7057 - $vrlex->{foo}[$lex+1][$lex+1]: no exception ok 7058 - $vrlex->{foo}[$lex+1][$lex+1]: value ok 7059 - $vrlex->{foo}[$lex+1][$lex+1] = 123: no exception ok 7060 - $vrlex->{foo}[$lex+1][$lex+1] = 123: value ok 7061 - exists $vrlex->{foo}[$lex+1][$lex+1]: no exception ok 7062 - exists $vrlex->{foo}[$lex+1][$lex+1]: value ok 7063 - delete $vrlex->{foo}[$lex+1][$lex+1]: no exception ok 7064 - delete $vrlex->{foo}[$lex+1][$lex+1]: value ok 7065 - $vrgbl->{foo}[$lex+1][$lex+1]: no exception ok 7066 - $vrgbl->{foo}[$lex+1][$lex+1]: value ok 7067 - $vrgbl->{foo}[$lex+1][$lex+1] = 123: no exception ok 7068 - $vrgbl->{foo}[$lex+1][$lex+1] = 123: value ok 7069 - exists $vrgbl->{foo}[$lex+1][$lex+1]: no exception ok 7070 - exists $vrgbl->{foo}[$lex+1][$lex+1]: value ok 7071 - delete $vrgbl->{foo}[$lex+1][$lex+1]: no exception ok 7072 - delete $vrgbl->{foo}[$lex+1][$lex+1]: value ok 7073 - $vlex{$lex}[$lex+1][$lex+1]: no exception ok 7074 - $vlex{$lex}[$lex+1][$lex+1]: value ok 7075 - $vlex{$lex}[$lex+1][$lex+1] = 123: no exception ok 7076 - $vlex{$lex}[$lex+1][$lex+1] = 123: value ok 7077 - exists $vlex{$lex}[$lex+1][$lex+1]: no exception ok 7078 - exists $vlex{$lex}[$lex+1][$lex+1]: value ok 7079 - delete $vlex{$lex}[$lex+1][$lex+1]: no exception ok 7080 - delete $vlex{$lex}[$lex+1][$lex+1]: value ok 7081 - $vgbl{$lex}[$lex+1][$lex+1]: no exception ok 7082 - $vgbl{$lex}[$lex+1][$lex+1]: value ok 7083 - $vgbl{$lex}[$lex+1][$lex+1] = 123: no exception ok 7084 - $vgbl{$lex}[$lex+1][$lex+1] = 123: value ok 7085 - exists $vgbl{$lex}[$lex+1][$lex+1]: no exception ok 7086 - exists $vgbl{$lex}[$lex+1][$lex+1]: value ok 7087 - delete $vgbl{$lex}[$lex+1][$lex+1]: no exception ok 7088 - delete $vgbl{$lex}[$lex+1][$lex+1]: value ok 7089 - $vrlex->{$lex}[$lex+1][$lex+1]: no exception ok 7090 - $vrlex->{$lex}[$lex+1][$lex+1]: value ok 7091 - $vrlex->{$lex}[$lex+1][$lex+1] = 123: no exception ok 7092 - $vrlex->{$lex}[$lex+1][$lex+1] = 123: value ok 7093 - exists $vrlex->{$lex}[$lex+1][$lex+1]: no exception ok 7094 - exists $vrlex->{$lex}[$lex+1][$lex+1]: value ok 7095 - delete $vrlex->{$lex}[$lex+1][$lex+1]: no exception ok 7096 - delete $vrlex->{$lex}[$lex+1][$lex+1]: value ok 7097 - $vrgbl->{$lex}[$lex+1][$lex+1]: no exception ok 7098 - $vrgbl->{$lex}[$lex+1][$lex+1]: value ok 7099 - $vrgbl->{$lex}[$lex+1][$lex+1] = 123: no exception ok 7100 - $vrgbl->{$lex}[$lex+1][$lex+1] = 123: value ok 7101 - exists $vrgbl->{$lex}[$lex+1][$lex+1]: no exception ok 7102 - exists $vrgbl->{$lex}[$lex+1][$lex+1]: value ok 7103 - delete $vrgbl->{$lex}[$lex+1][$lex+1]: no exception ok 7104 - delete $vrgbl->{$lex}[$lex+1][$lex+1]: value ok 7105 - $vlex{$gbl}[$lex+1][$lex+1]: no exception ok 7106 - $vlex{$gbl}[$lex+1][$lex+1]: value ok 7107 - $vlex{$gbl}[$lex+1][$lex+1] = 123: no exception ok 7108 - $vlex{$gbl}[$lex+1][$lex+1] = 123: value ok 7109 - exists $vlex{$gbl}[$lex+1][$lex+1]: no exception ok 7110 - exists $vlex{$gbl}[$lex+1][$lex+1]: value ok 7111 - delete $vlex{$gbl}[$lex+1][$lex+1]: no exception ok 7112 - delete $vlex{$gbl}[$lex+1][$lex+1]: value ok 7113 - $vgbl{$gbl}[$lex+1][$lex+1]: no exception ok 7114 - $vgbl{$gbl}[$lex+1][$lex+1]: value ok 7115 - $vgbl{$gbl}[$lex+1][$lex+1] = 123: no exception ok 7116 - $vgbl{$gbl}[$lex+1][$lex+1] = 123: value ok 7117 - exists $vgbl{$gbl}[$lex+1][$lex+1]: no exception ok 7118 - exists $vgbl{$gbl}[$lex+1][$lex+1]: value ok 7119 - delete $vgbl{$gbl}[$lex+1][$lex+1]: no exception ok 7120 - delete $vgbl{$gbl}[$lex+1][$lex+1]: value ok 7121 - $vrlex->{$gbl}[$lex+1][$lex+1]: no exception ok 7122 - $vrlex->{$gbl}[$lex+1][$lex+1]: value ok 7123 - $vrlex->{$gbl}[$lex+1][$lex+1] = 123: no exception ok 7124 - $vrlex->{$gbl}[$lex+1][$lex+1] = 123: value ok 7125 - exists $vrlex->{$gbl}[$lex+1][$lex+1]: no exception ok 7126 - exists $vrlex->{$gbl}[$lex+1][$lex+1]: value ok 7127 - delete $vrlex->{$gbl}[$lex+1][$lex+1]: no exception ok 7128 - delete $vrlex->{$gbl}[$lex+1][$lex+1]: value ok 7129 - $vrgbl->{$gbl}[$lex+1][$lex+1]: no exception ok 7130 - $vrgbl->{$gbl}[$lex+1][$lex+1]: value ok 7131 - $vrgbl->{$gbl}[$lex+1][$lex+1] = 123: no exception ok 7132 - $vrgbl->{$gbl}[$lex+1][$lex+1] = 123: value ok 7133 - exists $vrgbl->{$gbl}[$lex+1][$lex+1]: no exception ok 7134 - exists $vrgbl->{$gbl}[$lex+1][$lex+1]: value ok 7135 - delete $vrgbl->{$gbl}[$lex+1][$lex+1]: no exception ok 7136 - delete $vrgbl->{$gbl}[$lex+1][$lex+1]: value ok 7137 - $vlex{"x$lex"}[$lex+1][$lex+1]: no exception ok 7138 - $vlex{"x$lex"}[$lex+1][$lex+1]: value ok 7139 - $vlex{"x$lex"}[$lex+1][$lex+1] = 123: no exception ok 7140 - $vlex{"x$lex"}[$lex+1][$lex+1] = 123: value ok 7141 - exists $vlex{"x$lex"}[$lex+1][$lex+1]: no exception ok 7142 - exists $vlex{"x$lex"}[$lex+1][$lex+1]: value ok 7143 - delete $vlex{"x$lex"}[$lex+1][$lex+1]: no exception ok 7144 - delete $vlex{"x$lex"}[$lex+1][$lex+1]: value ok 7145 - $vgbl{"x$lex"}[$lex+1][$lex+1]: no exception ok 7146 - $vgbl{"x$lex"}[$lex+1][$lex+1]: value ok 7147 - $vgbl{"x$lex"}[$lex+1][$lex+1] = 123: no exception ok 7148 - $vgbl{"x$lex"}[$lex+1][$lex+1] = 123: value ok 7149 - exists $vgbl{"x$lex"}[$lex+1][$lex+1]: no exception ok 7150 - exists $vgbl{"x$lex"}[$lex+1][$lex+1]: value ok 7151 - delete $vgbl{"x$lex"}[$lex+1][$lex+1]: no exception ok 7152 - delete $vgbl{"x$lex"}[$lex+1][$lex+1]: value ok 7153 - $vrlex->{"x$lex"}[$lex+1][$lex+1]: no exception ok 7154 - $vrlex->{"x$lex"}[$lex+1][$lex+1]: value ok 7155 - $vrlex->{"x$lex"}[$lex+1][$lex+1] = 123: no exception ok 7156 - $vrlex->{"x$lex"}[$lex+1][$lex+1] = 123: value ok 7157 - exists $vrlex->{"x$lex"}[$lex+1][$lex+1]: no exception ok 7158 - exists $vrlex->{"x$lex"}[$lex+1][$lex+1]: value ok 7159 - delete $vrlex->{"x$lex"}[$lex+1][$lex+1]: no exception ok 7160 - delete $vrlex->{"x$lex"}[$lex+1][$lex+1]: value ok 7161 - $vrgbl->{"x$lex"}[$lex+1][$lex+1]: no exception ok 7162 - $vrgbl->{"x$lex"}[$lex+1][$lex+1]: value ok 7163 - $vrgbl->{"x$lex"}[$lex+1][$lex+1] = 123: no exception ok 7164 - $vrgbl->{"x$lex"}[$lex+1][$lex+1] = 123: value ok 7165 - exists $vrgbl->{"x$lex"}[$lex+1][$lex+1]: no exception ok 7166 - exists $vrgbl->{"x$lex"}[$lex+1][$lex+1]: value ok 7167 - delete $vrgbl->{"x$lex"}[$lex+1][$lex+1]: no exception ok 7168 - delete $vrgbl->{"x$lex"}[$lex+1][$lex+1]: value ok 7169 - $vlex[0]{foo}[$lex+1]: no exception ok 7170 - $vlex[0]{foo}[$lex+1]: value ok 7171 - $vlex[0]{foo}[$lex+1] = 123: no exception ok 7172 - $vlex[0]{foo}[$lex+1] = 123: value ok 7173 - exists $vlex[0]{foo}[$lex+1]: no exception ok 7174 - exists $vlex[0]{foo}[$lex+1]: value ok 7175 - delete $vlex[0]{foo}[$lex+1]: no exception ok 7176 - delete $vlex[0]{foo}[$lex+1]: value ok 7177 - $vgbl[0]{foo}[$lex+1]: no exception ok 7178 - $vgbl[0]{foo}[$lex+1]: value ok 7179 - $vgbl[0]{foo}[$lex+1] = 123: no exception ok 7180 - $vgbl[0]{foo}[$lex+1] = 123: value ok 7181 - exists $vgbl[0]{foo}[$lex+1]: no exception ok 7182 - exists $vgbl[0]{foo}[$lex+1]: value ok 7183 - delete $vgbl[0]{foo}[$lex+1]: no exception ok 7184 - delete $vgbl[0]{foo}[$lex+1]: value ok 7185 - $vrlex->[0]{foo}[$lex+1]: no exception ok 7186 - $vrlex->[0]{foo}[$lex+1]: value ok 7187 - $vrlex->[0]{foo}[$lex+1] = 123: no exception ok 7188 - $vrlex->[0]{foo}[$lex+1] = 123: value ok 7189 - exists $vrlex->[0]{foo}[$lex+1]: no exception ok 7190 - exists $vrlex->[0]{foo}[$lex+1]: value ok 7191 - delete $vrlex->[0]{foo}[$lex+1]: no exception ok 7192 - delete $vrlex->[0]{foo}[$lex+1]: value ok 7193 - $vrgbl->[0]{foo}[$lex+1]: no exception ok 7194 - $vrgbl->[0]{foo}[$lex+1]: value ok 7195 - $vrgbl->[0]{foo}[$lex+1] = 123: no exception ok 7196 - $vrgbl->[0]{foo}[$lex+1] = 123: value ok 7197 - exists $vrgbl->[0]{foo}[$lex+1]: no exception ok 7198 - exists $vrgbl->[0]{foo}[$lex+1]: value ok 7199 - delete $vrgbl->[0]{foo}[$lex+1]: no exception ok 7200 - delete $vrgbl->[0]{foo}[$lex+1]: value ok 7201 - $vlex[$lex]{foo}[$lex+1]: no exception ok 7202 - $vlex[$lex]{foo}[$lex+1]: value ok 7203 - $vlex[$lex]{foo}[$lex+1] = 123: no exception ok 7204 - $vlex[$lex]{foo}[$lex+1] = 123: value ok 7205 - exists $vlex[$lex]{foo}[$lex+1]: no exception ok 7206 - exists $vlex[$lex]{foo}[$lex+1]: value ok 7207 - delete $vlex[$lex]{foo}[$lex+1]: no exception ok 7208 - delete $vlex[$lex]{foo}[$lex+1]: value ok 7209 - $vgbl[$lex]{foo}[$lex+1]: no exception ok 7210 - $vgbl[$lex]{foo}[$lex+1]: value ok 7211 - $vgbl[$lex]{foo}[$lex+1] = 123: no exception ok 7212 - $vgbl[$lex]{foo}[$lex+1] = 123: value ok 7213 - exists $vgbl[$lex]{foo}[$lex+1]: no exception ok 7214 - exists $vgbl[$lex]{foo}[$lex+1]: value ok 7215 - delete $vgbl[$lex]{foo}[$lex+1]: no exception ok 7216 - delete $vgbl[$lex]{foo}[$lex+1]: value ok 7217 - $vrlex->[$lex]{foo}[$lex+1]: no exception ok 7218 - $vrlex->[$lex]{foo}[$lex+1]: value ok 7219 - $vrlex->[$lex]{foo}[$lex+1] = 123: no exception ok 7220 - $vrlex->[$lex]{foo}[$lex+1] = 123: value ok 7221 - exists $vrlex->[$lex]{foo}[$lex+1]: no exception ok 7222 - exists $vrlex->[$lex]{foo}[$lex+1]: value ok 7223 - delete $vrlex->[$lex]{foo}[$lex+1]: no exception ok 7224 - delete $vrlex->[$lex]{foo}[$lex+1]: value ok 7225 - $vrgbl->[$lex]{foo}[$lex+1]: no exception ok 7226 - $vrgbl->[$lex]{foo}[$lex+1]: value ok 7227 - $vrgbl->[$lex]{foo}[$lex+1] = 123: no exception ok 7228 - $vrgbl->[$lex]{foo}[$lex+1] = 123: value ok 7229 - exists $vrgbl->[$lex]{foo}[$lex+1]: no exception ok 7230 - exists $vrgbl->[$lex]{foo}[$lex+1]: value ok 7231 - delete $vrgbl->[$lex]{foo}[$lex+1]: no exception ok 7232 - delete $vrgbl->[$lex]{foo}[$lex+1]: value ok 7233 - $vlex[$gbl]{foo}[$lex+1]: no exception ok 7234 - $vlex[$gbl]{foo}[$lex+1]: value ok 7235 - $vlex[$gbl]{foo}[$lex+1] = 123: no exception ok 7236 - $vlex[$gbl]{foo}[$lex+1] = 123: value ok 7237 - exists $vlex[$gbl]{foo}[$lex+1]: no exception ok 7238 - exists $vlex[$gbl]{foo}[$lex+1]: value ok 7239 - delete $vlex[$gbl]{foo}[$lex+1]: no exception ok 7240 - delete $vlex[$gbl]{foo}[$lex+1]: value ok 7241 - $vgbl[$gbl]{foo}[$lex+1]: no exception ok 7242 - $vgbl[$gbl]{foo}[$lex+1]: value ok 7243 - $vgbl[$gbl]{foo}[$lex+1] = 123: no exception ok 7244 - $vgbl[$gbl]{foo}[$lex+1] = 123: value ok 7245 - exists $vgbl[$gbl]{foo}[$lex+1]: no exception ok 7246 - exists $vgbl[$gbl]{foo}[$lex+1]: value ok 7247 - delete $vgbl[$gbl]{foo}[$lex+1]: no exception ok 7248 - delete $vgbl[$gbl]{foo}[$lex+1]: value ok 7249 - $vrlex->[$gbl]{foo}[$lex+1]: no exception ok 7250 - $vrlex->[$gbl]{foo}[$lex+1]: value ok 7251 - $vrlex->[$gbl]{foo}[$lex+1] = 123: no exception ok 7252 - $vrlex->[$gbl]{foo}[$lex+1] = 123: value ok 7253 - exists $vrlex->[$gbl]{foo}[$lex+1]: no exception ok 7254 - exists $vrlex->[$gbl]{foo}[$lex+1]: value ok 7255 - delete $vrlex->[$gbl]{foo}[$lex+1]: no exception ok 7256 - delete $vrlex->[$gbl]{foo}[$lex+1]: value ok 7257 - $vrgbl->[$gbl]{foo}[$lex+1]: no exception ok 7258 - $vrgbl->[$gbl]{foo}[$lex+1]: value ok 7259 - $vrgbl->[$gbl]{foo}[$lex+1] = 123: no exception ok 7260 - $vrgbl->[$gbl]{foo}[$lex+1] = 123: value ok 7261 - exists $vrgbl->[$gbl]{foo}[$lex+1]: no exception ok 7262 - exists $vrgbl->[$gbl]{foo}[$lex+1]: value ok 7263 - delete $vrgbl->[$gbl]{foo}[$lex+1]: no exception ok 7264 - delete $vrgbl->[$gbl]{foo}[$lex+1]: value ok 7265 - $vlex[$lex+1]{foo}[$lex+1]: no exception ok 7266 - $vlex[$lex+1]{foo}[$lex+1]: value ok 7267 - $vlex[$lex+1]{foo}[$lex+1] = 123: no exception ok 7268 - $vlex[$lex+1]{foo}[$lex+1] = 123: value ok 7269 - exists $vlex[$lex+1]{foo}[$lex+1]: no exception ok 7270 - exists $vlex[$lex+1]{foo}[$lex+1]: value ok 7271 - delete $vlex[$lex+1]{foo}[$lex+1]: no exception ok 7272 - delete $vlex[$lex+1]{foo}[$lex+1]: value ok 7273 - $vgbl[$lex+1]{foo}[$lex+1]: no exception ok 7274 - $vgbl[$lex+1]{foo}[$lex+1]: value ok 7275 - $vgbl[$lex+1]{foo}[$lex+1] = 123: no exception ok 7276 - $vgbl[$lex+1]{foo}[$lex+1] = 123: value ok 7277 - exists $vgbl[$lex+1]{foo}[$lex+1]: no exception ok 7278 - exists $vgbl[$lex+1]{foo}[$lex+1]: value ok 7279 - delete $vgbl[$lex+1]{foo}[$lex+1]: no exception ok 7280 - delete $vgbl[$lex+1]{foo}[$lex+1]: value ok 7281 - $vrlex->[$lex+1]{foo}[$lex+1]: no exception ok 7282 - $vrlex->[$lex+1]{foo}[$lex+1]: value ok 7283 - $vrlex->[$lex+1]{foo}[$lex+1] = 123: no exception ok 7284 - $vrlex->[$lex+1]{foo}[$lex+1] = 123: value ok 7285 - exists $vrlex->[$lex+1]{foo}[$lex+1]: no exception ok 7286 - exists $vrlex->[$lex+1]{foo}[$lex+1]: value ok 7287 - delete $vrlex->[$lex+1]{foo}[$lex+1]: no exception ok 7288 - delete $vrlex->[$lex+1]{foo}[$lex+1]: value ok 7289 - $vrgbl->[$lex+1]{foo}[$lex+1]: no exception ok 7290 - $vrgbl->[$lex+1]{foo}[$lex+1]: value ok 7291 - $vrgbl->[$lex+1]{foo}[$lex+1] = 123: no exception ok 7292 - $vrgbl->[$lex+1]{foo}[$lex+1] = 123: value ok 7293 - exists $vrgbl->[$lex+1]{foo}[$lex+1]: no exception ok 7294 - exists $vrgbl->[$lex+1]{foo}[$lex+1]: value ok 7295 - delete $vrgbl->[$lex+1]{foo}[$lex+1]: no exception ok 7296 - delete $vrgbl->[$lex+1]{foo}[$lex+1]: value ok 7297 - $vlex{foo}{foo}[$lex+1]: no exception ok 7298 - $vlex{foo}{foo}[$lex+1]: value ok 7299 - $vlex{foo}{foo}[$lex+1] = 123: no exception ok 7300 - $vlex{foo}{foo}[$lex+1] = 123: value ok 7301 - exists $vlex{foo}{foo}[$lex+1]: no exception ok 7302 - exists $vlex{foo}{foo}[$lex+1]: value ok 7303 - delete $vlex{foo}{foo}[$lex+1]: no exception ok 7304 - delete $vlex{foo}{foo}[$lex+1]: value ok 7305 - $vgbl{foo}{foo}[$lex+1]: no exception ok 7306 - $vgbl{foo}{foo}[$lex+1]: value ok 7307 - $vgbl{foo}{foo}[$lex+1] = 123: no exception ok 7308 - $vgbl{foo}{foo}[$lex+1] = 123: value ok 7309 - exists $vgbl{foo}{foo}[$lex+1]: no exception ok 7310 - exists $vgbl{foo}{foo}[$lex+1]: value ok 7311 - delete $vgbl{foo}{foo}[$lex+1]: no exception ok 7312 - delete $vgbl{foo}{foo}[$lex+1]: value ok 7313 - $vrlex->{foo}{foo}[$lex+1]: no exception ok 7314 - $vrlex->{foo}{foo}[$lex+1]: value ok 7315 - $vrlex->{foo}{foo}[$lex+1] = 123: no exception ok 7316 - $vrlex->{foo}{foo}[$lex+1] = 123: value ok 7317 - exists $vrlex->{foo}{foo}[$lex+1]: no exception ok 7318 - exists $vrlex->{foo}{foo}[$lex+1]: value ok 7319 - delete $vrlex->{foo}{foo}[$lex+1]: no exception ok 7320 - delete $vrlex->{foo}{foo}[$lex+1]: value ok 7321 - $vrgbl->{foo}{foo}[$lex+1]: no exception ok 7322 - $vrgbl->{foo}{foo}[$lex+1]: value ok 7323 - $vrgbl->{foo}{foo}[$lex+1] = 123: no exception ok 7324 - $vrgbl->{foo}{foo}[$lex+1] = 123: value ok 7325 - exists $vrgbl->{foo}{foo}[$lex+1]: no exception ok 7326 - exists $vrgbl->{foo}{foo}[$lex+1]: value ok 7327 - delete $vrgbl->{foo}{foo}[$lex+1]: no exception ok 7328 - delete $vrgbl->{foo}{foo}[$lex+1]: value ok 7329 - $vlex{$lex}{foo}[$lex+1]: no exception ok 7330 - $vlex{$lex}{foo}[$lex+1]: value ok 7331 - $vlex{$lex}{foo}[$lex+1] = 123: no exception ok 7332 - $vlex{$lex}{foo}[$lex+1] = 123: value ok 7333 - exists $vlex{$lex}{foo}[$lex+1]: no exception ok 7334 - exists $vlex{$lex}{foo}[$lex+1]: value ok 7335 - delete $vlex{$lex}{foo}[$lex+1]: no exception ok 7336 - delete $vlex{$lex}{foo}[$lex+1]: value ok 7337 - $vgbl{$lex}{foo}[$lex+1]: no exception ok 7338 - $vgbl{$lex}{foo}[$lex+1]: value ok 7339 - $vgbl{$lex}{foo}[$lex+1] = 123: no exception ok 7340 - $vgbl{$lex}{foo}[$lex+1] = 123: value ok 7341 - exists $vgbl{$lex}{foo}[$lex+1]: no exception ok 7342 - exists $vgbl{$lex}{foo}[$lex+1]: value ok 7343 - delete $vgbl{$lex}{foo}[$lex+1]: no exception ok 7344 - delete $vgbl{$lex}{foo}[$lex+1]: value ok 7345 - $vrlex->{$lex}{foo}[$lex+1]: no exception ok 7346 - $vrlex->{$lex}{foo}[$lex+1]: value ok 7347 - $vrlex->{$lex}{foo}[$lex+1] = 123: no exception ok 7348 - $vrlex->{$lex}{foo}[$lex+1] = 123: value ok 7349 - exists $vrlex->{$lex}{foo}[$lex+1]: no exception ok 7350 - exists $vrlex->{$lex}{foo}[$lex+1]: value ok 7351 - delete $vrlex->{$lex}{foo}[$lex+1]: no exception ok 7352 - delete $vrlex->{$lex}{foo}[$lex+1]: value ok 7353 - $vrgbl->{$lex}{foo}[$lex+1]: no exception ok 7354 - $vrgbl->{$lex}{foo}[$lex+1]: value ok 7355 - $vrgbl->{$lex}{foo}[$lex+1] = 123: no exception ok 7356 - $vrgbl->{$lex}{foo}[$lex+1] = 123: value ok 7357 - exists $vrgbl->{$lex}{foo}[$lex+1]: no exception ok 7358 - exists $vrgbl->{$lex}{foo}[$lex+1]: value ok 7359 - delete $vrgbl->{$lex}{foo}[$lex+1]: no exception ok 7360 - delete $vrgbl->{$lex}{foo}[$lex+1]: value ok 7361 - $vlex{$gbl}{foo}[$lex+1]: no exception ok 7362 - $vlex{$gbl}{foo}[$lex+1]: value ok 7363 - $vlex{$gbl}{foo}[$lex+1] = 123: no exception ok 7364 - $vlex{$gbl}{foo}[$lex+1] = 123: value ok 7365 - exists $vlex{$gbl}{foo}[$lex+1]: no exception ok 7366 - exists $vlex{$gbl}{foo}[$lex+1]: value ok 7367 - delete $vlex{$gbl}{foo}[$lex+1]: no exception ok 7368 - delete $vlex{$gbl}{foo}[$lex+1]: value ok 7369 - $vgbl{$gbl}{foo}[$lex+1]: no exception ok 7370 - $vgbl{$gbl}{foo}[$lex+1]: value ok 7371 - $vgbl{$gbl}{foo}[$lex+1] = 123: no exception ok 7372 - $vgbl{$gbl}{foo}[$lex+1] = 123: value ok 7373 - exists $vgbl{$gbl}{foo}[$lex+1]: no exception ok 7374 - exists $vgbl{$gbl}{foo}[$lex+1]: value ok 7375 - delete $vgbl{$gbl}{foo}[$lex+1]: no exception ok 7376 - delete $vgbl{$gbl}{foo}[$lex+1]: value ok 7377 - $vrlex->{$gbl}{foo}[$lex+1]: no exception ok 7378 - $vrlex->{$gbl}{foo}[$lex+1]: value ok 7379 - $vrlex->{$gbl}{foo}[$lex+1] = 123: no exception ok 7380 - $vrlex->{$gbl}{foo}[$lex+1] = 123: value ok 7381 - exists $vrlex->{$gbl}{foo}[$lex+1]: no exception ok 7382 - exists $vrlex->{$gbl}{foo}[$lex+1]: value ok 7383 - delete $vrlex->{$gbl}{foo}[$lex+1]: no exception ok 7384 - delete $vrlex->{$gbl}{foo}[$lex+1]: value ok 7385 - $vrgbl->{$gbl}{foo}[$lex+1]: no exception ok 7386 - $vrgbl->{$gbl}{foo}[$lex+1]: value ok 7387 - $vrgbl->{$gbl}{foo}[$lex+1] = 123: no exception ok 7388 - $vrgbl->{$gbl}{foo}[$lex+1] = 123: value ok 7389 - exists $vrgbl->{$gbl}{foo}[$lex+1]: no exception ok 7390 - exists $vrgbl->{$gbl}{foo}[$lex+1]: value ok 7391 - delete $vrgbl->{$gbl}{foo}[$lex+1]: no exception ok 7392 - delete $vrgbl->{$gbl}{foo}[$lex+1]: value ok 7393 - $vlex{"x$lex"}{foo}[$lex+1]: no exception ok 7394 - $vlex{"x$lex"}{foo}[$lex+1]: value ok 7395 - $vlex{"x$lex"}{foo}[$lex+1] = 123: no exception ok 7396 - $vlex{"x$lex"}{foo}[$lex+1] = 123: value ok 7397 - exists $vlex{"x$lex"}{foo}[$lex+1]: no exception ok 7398 - exists $vlex{"x$lex"}{foo}[$lex+1]: value ok 7399 - delete $vlex{"x$lex"}{foo}[$lex+1]: no exception ok 7400 - delete $vlex{"x$lex"}{foo}[$lex+1]: value ok 7401 - $vgbl{"x$lex"}{foo}[$lex+1]: no exception ok 7402 - $vgbl{"x$lex"}{foo}[$lex+1]: value ok 7403 - $vgbl{"x$lex"}{foo}[$lex+1] = 123: no exception ok 7404 - $vgbl{"x$lex"}{foo}[$lex+1] = 123: value ok 7405 - exists $vgbl{"x$lex"}{foo}[$lex+1]: no exception ok 7406 - exists $vgbl{"x$lex"}{foo}[$lex+1]: value ok 7407 - delete $vgbl{"x$lex"}{foo}[$lex+1]: no exception ok 7408 - delete $vgbl{"x$lex"}{foo}[$lex+1]: value ok 7409 - $vrlex->{"x$lex"}{foo}[$lex+1]: no exception ok 7410 - $vrlex->{"x$lex"}{foo}[$lex+1]: value ok 7411 - $vrlex->{"x$lex"}{foo}[$lex+1] = 123: no exception ok 7412 - $vrlex->{"x$lex"}{foo}[$lex+1] = 123: value ok 7413 - exists $vrlex->{"x$lex"}{foo}[$lex+1]: no exception ok 7414 - exists $vrlex->{"x$lex"}{foo}[$lex+1]: value ok 7415 - delete $vrlex->{"x$lex"}{foo}[$lex+1]: no exception ok 7416 - delete $vrlex->{"x$lex"}{foo}[$lex+1]: value ok 7417 - $vrgbl->{"x$lex"}{foo}[$lex+1]: no exception ok 7418 - $vrgbl->{"x$lex"}{foo}[$lex+1]: value ok 7419 - $vrgbl->{"x$lex"}{foo}[$lex+1] = 123: no exception ok 7420 - $vrgbl->{"x$lex"}{foo}[$lex+1] = 123: value ok 7421 - exists $vrgbl->{"x$lex"}{foo}[$lex+1]: no exception ok 7422 - exists $vrgbl->{"x$lex"}{foo}[$lex+1]: value ok 7423 - delete $vrgbl->{"x$lex"}{foo}[$lex+1]: no exception ok 7424 - delete $vrgbl->{"x$lex"}{foo}[$lex+1]: value ok 7425 - $vlex[0]{$lex}[$lex+1]: no exception ok 7426 - $vlex[0]{$lex}[$lex+1]: value ok 7427 - $vlex[0]{$lex}[$lex+1] = 123: no exception ok 7428 - $vlex[0]{$lex}[$lex+1] = 123: value ok 7429 - exists $vlex[0]{$lex}[$lex+1]: no exception ok 7430 - exists $vlex[0]{$lex}[$lex+1]: value ok 7431 - delete $vlex[0]{$lex}[$lex+1]: no exception ok 7432 - delete $vlex[0]{$lex}[$lex+1]: value ok 7433 - $vgbl[0]{$lex}[$lex+1]: no exception ok 7434 - $vgbl[0]{$lex}[$lex+1]: value ok 7435 - $vgbl[0]{$lex}[$lex+1] = 123: no exception ok 7436 - $vgbl[0]{$lex}[$lex+1] = 123: value ok 7437 - exists $vgbl[0]{$lex}[$lex+1]: no exception ok 7438 - exists $vgbl[0]{$lex}[$lex+1]: value ok 7439 - delete $vgbl[0]{$lex}[$lex+1]: no exception ok 7440 - delete $vgbl[0]{$lex}[$lex+1]: value ok 7441 - $vrlex->[0]{$lex}[$lex+1]: no exception ok 7442 - $vrlex->[0]{$lex}[$lex+1]: value ok 7443 - $vrlex->[0]{$lex}[$lex+1] = 123: no exception ok 7444 - $vrlex->[0]{$lex}[$lex+1] = 123: value ok 7445 - exists $vrlex->[0]{$lex}[$lex+1]: no exception ok 7446 - exists $vrlex->[0]{$lex}[$lex+1]: value ok 7447 - delete $vrlex->[0]{$lex}[$lex+1]: no exception ok 7448 - delete $vrlex->[0]{$lex}[$lex+1]: value ok 7449 - $vrgbl->[0]{$lex}[$lex+1]: no exception ok 7450 - $vrgbl->[0]{$lex}[$lex+1]: value ok 7451 - $vrgbl->[0]{$lex}[$lex+1] = 123: no exception ok 7452 - $vrgbl->[0]{$lex}[$lex+1] = 123: value ok 7453 - exists $vrgbl->[0]{$lex}[$lex+1]: no exception ok 7454 - exists $vrgbl->[0]{$lex}[$lex+1]: value ok 7455 - delete $vrgbl->[0]{$lex}[$lex+1]: no exception ok 7456 - delete $vrgbl->[0]{$lex}[$lex+1]: value ok 7457 - $vlex[$lex]{$lex}[$lex+1]: no exception ok 7458 - $vlex[$lex]{$lex}[$lex+1]: value ok 7459 - $vlex[$lex]{$lex}[$lex+1] = 123: no exception ok 7460 - $vlex[$lex]{$lex}[$lex+1] = 123: value ok 7461 - exists $vlex[$lex]{$lex}[$lex+1]: no exception ok 7462 - exists $vlex[$lex]{$lex}[$lex+1]: value ok 7463 - delete $vlex[$lex]{$lex}[$lex+1]: no exception ok 7464 - delete $vlex[$lex]{$lex}[$lex+1]: value ok 7465 - $vgbl[$lex]{$lex}[$lex+1]: no exception ok 7466 - $vgbl[$lex]{$lex}[$lex+1]: value ok 7467 - $vgbl[$lex]{$lex}[$lex+1] = 123: no exception ok 7468 - $vgbl[$lex]{$lex}[$lex+1] = 123: value ok 7469 - exists $vgbl[$lex]{$lex}[$lex+1]: no exception ok 7470 - exists $vgbl[$lex]{$lex}[$lex+1]: value ok 7471 - delete $vgbl[$lex]{$lex}[$lex+1]: no exception ok 7472 - delete $vgbl[$lex]{$lex}[$lex+1]: value ok 7473 - $vrlex->[$lex]{$lex}[$lex+1]: no exception ok 7474 - $vrlex->[$lex]{$lex}[$lex+1]: value ok 7475 - $vrlex->[$lex]{$lex}[$lex+1] = 123: no exception ok 7476 - $vrlex->[$lex]{$lex}[$lex+1] = 123: value ok 7477 - exists $vrlex->[$lex]{$lex}[$lex+1]: no exception ok 7478 - exists $vrlex->[$lex]{$lex}[$lex+1]: value ok 7479 - delete $vrlex->[$lex]{$lex}[$lex+1]: no exception ok 7480 - delete $vrlex->[$lex]{$lex}[$lex+1]: value ok 7481 - $vrgbl->[$lex]{$lex}[$lex+1]: no exception ok 7482 - $vrgbl->[$lex]{$lex}[$lex+1]: value ok 7483 - $vrgbl->[$lex]{$lex}[$lex+1] = 123: no exception ok 7484 - $vrgbl->[$lex]{$lex}[$lex+1] = 123: value ok 7485 - exists $vrgbl->[$lex]{$lex}[$lex+1]: no exception ok 7486 - exists $vrgbl->[$lex]{$lex}[$lex+1]: value ok 7487 - delete $vrgbl->[$lex]{$lex}[$lex+1]: no exception ok 7488 - delete $vrgbl->[$lex]{$lex}[$lex+1]: value ok 7489 - $vlex[$gbl]{$lex}[$lex+1]: no exception ok 7490 - $vlex[$gbl]{$lex}[$lex+1]: value ok 7491 - $vlex[$gbl]{$lex}[$lex+1] = 123: no exception ok 7492 - $vlex[$gbl]{$lex}[$lex+1] = 123: value ok 7493 - exists $vlex[$gbl]{$lex}[$lex+1]: no exception ok 7494 - exists $vlex[$gbl]{$lex}[$lex+1]: value ok 7495 - delete $vlex[$gbl]{$lex}[$lex+1]: no exception ok 7496 - delete $vlex[$gbl]{$lex}[$lex+1]: value ok 7497 - $vgbl[$gbl]{$lex}[$lex+1]: no exception ok 7498 - $vgbl[$gbl]{$lex}[$lex+1]: value ok 7499 - $vgbl[$gbl]{$lex}[$lex+1] = 123: no exception ok 7500 - $vgbl[$gbl]{$lex}[$lex+1] = 123: value ok 7501 - exists $vgbl[$gbl]{$lex}[$lex+1]: no exception ok 7502 - exists $vgbl[$gbl]{$lex}[$lex+1]: value ok 7503 - delete $vgbl[$gbl]{$lex}[$lex+1]: no exception ok 7504 - delete $vgbl[$gbl]{$lex}[$lex+1]: value ok 7505 - $vrlex->[$gbl]{$lex}[$lex+1]: no exception ok 7506 - $vrlex->[$gbl]{$lex}[$lex+1]: value ok 7507 - $vrlex->[$gbl]{$lex}[$lex+1] = 123: no exception ok 7508 - $vrlex->[$gbl]{$lex}[$lex+1] = 123: value ok 7509 - exists $vrlex->[$gbl]{$lex}[$lex+1]: no exception ok 7510 - exists $vrlex->[$gbl]{$lex}[$lex+1]: value ok 7511 - delete $vrlex->[$gbl]{$lex}[$lex+1]: no exception ok 7512 - delete $vrlex->[$gbl]{$lex}[$lex+1]: value ok 7513 - $vrgbl->[$gbl]{$lex}[$lex+1]: no exception ok 7514 - $vrgbl->[$gbl]{$lex}[$lex+1]: value ok 7515 - $vrgbl->[$gbl]{$lex}[$lex+1] = 123: no exception ok 7516 - $vrgbl->[$gbl]{$lex}[$lex+1] = 123: value ok 7517 - exists $vrgbl->[$gbl]{$lex}[$lex+1]: no exception ok 7518 - exists $vrgbl->[$gbl]{$lex}[$lex+1]: value ok 7519 - delete $vrgbl->[$gbl]{$lex}[$lex+1]: no exception ok 7520 - delete $vrgbl->[$gbl]{$lex}[$lex+1]: value ok 7521 - $vlex[$lex+1]{$lex}[$lex+1]: no exception ok 7522 - $vlex[$lex+1]{$lex}[$lex+1]: value ok 7523 - $vlex[$lex+1]{$lex}[$lex+1] = 123: no exception ok 7524 - $vlex[$lex+1]{$lex}[$lex+1] = 123: value ok 7525 - exists $vlex[$lex+1]{$lex}[$lex+1]: no exception ok 7526 - exists $vlex[$lex+1]{$lex}[$lex+1]: value ok 7527 - delete $vlex[$lex+1]{$lex}[$lex+1]: no exception ok 7528 - delete $vlex[$lex+1]{$lex}[$lex+1]: value ok 7529 - $vgbl[$lex+1]{$lex}[$lex+1]: no exception ok 7530 - $vgbl[$lex+1]{$lex}[$lex+1]: value ok 7531 - $vgbl[$lex+1]{$lex}[$lex+1] = 123: no exception ok 7532 - $vgbl[$lex+1]{$lex}[$lex+1] = 123: value ok 7533 - exists $vgbl[$lex+1]{$lex}[$lex+1]: no exception ok 7534 - exists $vgbl[$lex+1]{$lex}[$lex+1]: value ok 7535 - delete $vgbl[$lex+1]{$lex}[$lex+1]: no exception ok 7536 - delete $vgbl[$lex+1]{$lex}[$lex+1]: value ok 7537 - $vrlex->[$lex+1]{$lex}[$lex+1]: no exception ok 7538 - $vrlex->[$lex+1]{$lex}[$lex+1]: value ok 7539 - $vrlex->[$lex+1]{$lex}[$lex+1] = 123: no exception ok 7540 - $vrlex->[$lex+1]{$lex}[$lex+1] = 123: value ok 7541 - exists $vrlex->[$lex+1]{$lex}[$lex+1]: no exception ok 7542 - exists $vrlex->[$lex+1]{$lex}[$lex+1]: value ok 7543 - delete $vrlex->[$lex+1]{$lex}[$lex+1]: no exception ok 7544 - delete $vrlex->[$lex+1]{$lex}[$lex+1]: value ok 7545 - $vrgbl->[$lex+1]{$lex}[$lex+1]: no exception ok 7546 - $vrgbl->[$lex+1]{$lex}[$lex+1]: value ok 7547 - $vrgbl->[$lex+1]{$lex}[$lex+1] = 123: no exception ok 7548 - $vrgbl->[$lex+1]{$lex}[$lex+1] = 123: value ok 7549 - exists $vrgbl->[$lex+1]{$lex}[$lex+1]: no exception ok 7550 - exists $vrgbl->[$lex+1]{$lex}[$lex+1]: value ok 7551 - delete $vrgbl->[$lex+1]{$lex}[$lex+1]: no exception ok 7552 - delete $vrgbl->[$lex+1]{$lex}[$lex+1]: value ok 7553 - $vlex{foo}{$lex}[$lex+1]: no exception ok 7554 - $vlex{foo}{$lex}[$lex+1]: value ok 7555 - $vlex{foo}{$lex}[$lex+1] = 123: no exception ok 7556 - $vlex{foo}{$lex}[$lex+1] = 123: value ok 7557 - exists $vlex{foo}{$lex}[$lex+1]: no exception ok 7558 - exists $vlex{foo}{$lex}[$lex+1]: value ok 7559 - delete $vlex{foo}{$lex}[$lex+1]: no exception ok 7560 - delete $vlex{foo}{$lex}[$lex+1]: value ok 7561 - $vgbl{foo}{$lex}[$lex+1]: no exception ok 7562 - $vgbl{foo}{$lex}[$lex+1]: value ok 7563 - $vgbl{foo}{$lex}[$lex+1] = 123: no exception ok 7564 - $vgbl{foo}{$lex}[$lex+1] = 123: value ok 7565 - exists $vgbl{foo}{$lex}[$lex+1]: no exception ok 7566 - exists $vgbl{foo}{$lex}[$lex+1]: value ok 7567 - delete $vgbl{foo}{$lex}[$lex+1]: no exception ok 7568 - delete $vgbl{foo}{$lex}[$lex+1]: value ok 7569 - $vrlex->{foo}{$lex}[$lex+1]: no exception ok 7570 - $vrlex->{foo}{$lex}[$lex+1]: value ok 7571 - $vrlex->{foo}{$lex}[$lex+1] = 123: no exception ok 7572 - $vrlex->{foo}{$lex}[$lex+1] = 123: value ok 7573 - exists $vrlex->{foo}{$lex}[$lex+1]: no exception ok 7574 - exists $vrlex->{foo}{$lex}[$lex+1]: value ok 7575 - delete $vrlex->{foo}{$lex}[$lex+1]: no exception ok 7576 - delete $vrlex->{foo}{$lex}[$lex+1]: value ok 7577 - $vrgbl->{foo}{$lex}[$lex+1]: no exception ok 7578 - $vrgbl->{foo}{$lex}[$lex+1]: value ok 7579 - $vrgbl->{foo}{$lex}[$lex+1] = 123: no exception ok 7580 - $vrgbl->{foo}{$lex}[$lex+1] = 123: value ok 7581 - exists $vrgbl->{foo}{$lex}[$lex+1]: no exception ok 7582 - exists $vrgbl->{foo}{$lex}[$lex+1]: value ok 7583 - delete $vrgbl->{foo}{$lex}[$lex+1]: no exception ok 7584 - delete $vrgbl->{foo}{$lex}[$lex+1]: value ok 7585 - $vlex{$lex}{$lex}[$lex+1]: no exception ok 7586 - $vlex{$lex}{$lex}[$lex+1]: value ok 7587 - $vlex{$lex}{$lex}[$lex+1] = 123: no exception ok 7588 - $vlex{$lex}{$lex}[$lex+1] = 123: value ok 7589 - exists $vlex{$lex}{$lex}[$lex+1]: no exception ok 7590 - exists $vlex{$lex}{$lex}[$lex+1]: value ok 7591 - delete $vlex{$lex}{$lex}[$lex+1]: no exception ok 7592 - delete $vlex{$lex}{$lex}[$lex+1]: value ok 7593 - $vgbl{$lex}{$lex}[$lex+1]: no exception ok 7594 - $vgbl{$lex}{$lex}[$lex+1]: value ok 7595 - $vgbl{$lex}{$lex}[$lex+1] = 123: no exception ok 7596 - $vgbl{$lex}{$lex}[$lex+1] = 123: value ok 7597 - exists $vgbl{$lex}{$lex}[$lex+1]: no exception ok 7598 - exists $vgbl{$lex}{$lex}[$lex+1]: value ok 7599 - delete $vgbl{$lex}{$lex}[$lex+1]: no exception ok 7600 - delete $vgbl{$lex}{$lex}[$lex+1]: value ok 7601 - $vrlex->{$lex}{$lex}[$lex+1]: no exception ok 7602 - $vrlex->{$lex}{$lex}[$lex+1]: value ok 7603 - $vrlex->{$lex}{$lex}[$lex+1] = 123: no exception ok 7604 - $vrlex->{$lex}{$lex}[$lex+1] = 123: value ok 7605 - exists $vrlex->{$lex}{$lex}[$lex+1]: no exception ok 7606 - exists $vrlex->{$lex}{$lex}[$lex+1]: value ok 7607 - delete $vrlex->{$lex}{$lex}[$lex+1]: no exception ok 7608 - delete $vrlex->{$lex}{$lex}[$lex+1]: value ok 7609 - $vrgbl->{$lex}{$lex}[$lex+1]: no exception ok 7610 - $vrgbl->{$lex}{$lex}[$lex+1]: value ok 7611 - $vrgbl->{$lex}{$lex}[$lex+1] = 123: no exception ok 7612 - $vrgbl->{$lex}{$lex}[$lex+1] = 123: value ok 7613 - exists $vrgbl->{$lex}{$lex}[$lex+1]: no exception ok 7614 - exists $vrgbl->{$lex}{$lex}[$lex+1]: value ok 7615 - delete $vrgbl->{$lex}{$lex}[$lex+1]: no exception ok 7616 - delete $vrgbl->{$lex}{$lex}[$lex+1]: value ok 7617 - $vlex{$gbl}{$lex}[$lex+1]: no exception ok 7618 - $vlex{$gbl}{$lex}[$lex+1]: value ok 7619 - $vlex{$gbl}{$lex}[$lex+1] = 123: no exception ok 7620 - $vlex{$gbl}{$lex}[$lex+1] = 123: value ok 7621 - exists $vlex{$gbl}{$lex}[$lex+1]: no exception ok 7622 - exists $vlex{$gbl}{$lex}[$lex+1]: value ok 7623 - delete $vlex{$gbl}{$lex}[$lex+1]: no exception ok 7624 - delete $vlex{$gbl}{$lex}[$lex+1]: value ok 7625 - $vgbl{$gbl}{$lex}[$lex+1]: no exception ok 7626 - $vgbl{$gbl}{$lex}[$lex+1]: value ok 7627 - $vgbl{$gbl}{$lex}[$lex+1] = 123: no exception ok 7628 - $vgbl{$gbl}{$lex}[$lex+1] = 123: value ok 7629 - exists $vgbl{$gbl}{$lex}[$lex+1]: no exception ok 7630 - exists $vgbl{$gbl}{$lex}[$lex+1]: value ok 7631 - delete $vgbl{$gbl}{$lex}[$lex+1]: no exception ok 7632 - delete $vgbl{$gbl}{$lex}[$lex+1]: value ok 7633 - $vrlex->{$gbl}{$lex}[$lex+1]: no exception ok 7634 - $vrlex->{$gbl}{$lex}[$lex+1]: value ok 7635 - $vrlex->{$gbl}{$lex}[$lex+1] = 123: no exception ok 7636 - $vrlex->{$gbl}{$lex}[$lex+1] = 123: value ok 7637 - exists $vrlex->{$gbl}{$lex}[$lex+1]: no exception ok 7638 - exists $vrlex->{$gbl}{$lex}[$lex+1]: value ok 7639 - delete $vrlex->{$gbl}{$lex}[$lex+1]: no exception ok 7640 - delete $vrlex->{$gbl}{$lex}[$lex+1]: value ok 7641 - $vrgbl->{$gbl}{$lex}[$lex+1]: no exception ok 7642 - $vrgbl->{$gbl}{$lex}[$lex+1]: value ok 7643 - $vrgbl->{$gbl}{$lex}[$lex+1] = 123: no exception ok 7644 - $vrgbl->{$gbl}{$lex}[$lex+1] = 123: value ok 7645 - exists $vrgbl->{$gbl}{$lex}[$lex+1]: no exception ok 7646 - exists $vrgbl->{$gbl}{$lex}[$lex+1]: value ok 7647 - delete $vrgbl->{$gbl}{$lex}[$lex+1]: no exception ok 7648 - delete $vrgbl->{$gbl}{$lex}[$lex+1]: value ok 7649 - $vlex{"x$lex"}{$lex}[$lex+1]: no exception ok 7650 - $vlex{"x$lex"}{$lex}[$lex+1]: value ok 7651 - $vlex{"x$lex"}{$lex}[$lex+1] = 123: no exception ok 7652 - $vlex{"x$lex"}{$lex}[$lex+1] = 123: value ok 7653 - exists $vlex{"x$lex"}{$lex}[$lex+1]: no exception ok 7654 - exists $vlex{"x$lex"}{$lex}[$lex+1]: value ok 7655 - delete $vlex{"x$lex"}{$lex}[$lex+1]: no exception ok 7656 - delete $vlex{"x$lex"}{$lex}[$lex+1]: value ok 7657 - $vgbl{"x$lex"}{$lex}[$lex+1]: no exception ok 7658 - $vgbl{"x$lex"}{$lex}[$lex+1]: value ok 7659 - $vgbl{"x$lex"}{$lex}[$lex+1] = 123: no exception ok 7660 - $vgbl{"x$lex"}{$lex}[$lex+1] = 123: value ok 7661 - exists $vgbl{"x$lex"}{$lex}[$lex+1]: no exception ok 7662 - exists $vgbl{"x$lex"}{$lex}[$lex+1]: value ok 7663 - delete $vgbl{"x$lex"}{$lex}[$lex+1]: no exception ok 7664 - delete $vgbl{"x$lex"}{$lex}[$lex+1]: value ok 7665 - $vrlex->{"x$lex"}{$lex}[$lex+1]: no exception ok 7666 - $vrlex->{"x$lex"}{$lex}[$lex+1]: value ok 7667 - $vrlex->{"x$lex"}{$lex}[$lex+1] = 123: no exception ok 7668 - $vrlex->{"x$lex"}{$lex}[$lex+1] = 123: value ok 7669 - exists $vrlex->{"x$lex"}{$lex}[$lex+1]: no exception ok 7670 - exists $vrlex->{"x$lex"}{$lex}[$lex+1]: value ok 7671 - delete $vrlex->{"x$lex"}{$lex}[$lex+1]: no exception ok 7672 - delete $vrlex->{"x$lex"}{$lex}[$lex+1]: value ok 7673 - $vrgbl->{"x$lex"}{$lex}[$lex+1]: no exception ok 7674 - $vrgbl->{"x$lex"}{$lex}[$lex+1]: value ok 7675 - $vrgbl->{"x$lex"}{$lex}[$lex+1] = 123: no exception ok 7676 - $vrgbl->{"x$lex"}{$lex}[$lex+1] = 123: value ok 7677 - exists $vrgbl->{"x$lex"}{$lex}[$lex+1]: no exception ok 7678 - exists $vrgbl->{"x$lex"}{$lex}[$lex+1]: value ok 7679 - delete $vrgbl->{"x$lex"}{$lex}[$lex+1]: no exception ok 7680 - delete $vrgbl->{"x$lex"}{$lex}[$lex+1]: value ok 7681 - $vlex[0]{$gbl}[$lex+1]: no exception ok 7682 - $vlex[0]{$gbl}[$lex+1]: value ok 7683 - $vlex[0]{$gbl}[$lex+1] = 123: no exception ok 7684 - $vlex[0]{$gbl}[$lex+1] = 123: value ok 7685 - exists $vlex[0]{$gbl}[$lex+1]: no exception ok 7686 - exists $vlex[0]{$gbl}[$lex+1]: value ok 7687 - delete $vlex[0]{$gbl}[$lex+1]: no exception ok 7688 - delete $vlex[0]{$gbl}[$lex+1]: value ok 7689 - $vgbl[0]{$gbl}[$lex+1]: no exception ok 7690 - $vgbl[0]{$gbl}[$lex+1]: value ok 7691 - $vgbl[0]{$gbl}[$lex+1] = 123: no exception ok 7692 - $vgbl[0]{$gbl}[$lex+1] = 123: value ok 7693 - exists $vgbl[0]{$gbl}[$lex+1]: no exception ok 7694 - exists $vgbl[0]{$gbl}[$lex+1]: value ok 7695 - delete $vgbl[0]{$gbl}[$lex+1]: no exception ok 7696 - delete $vgbl[0]{$gbl}[$lex+1]: value ok 7697 - $vrlex->[0]{$gbl}[$lex+1]: no exception ok 7698 - $vrlex->[0]{$gbl}[$lex+1]: value ok 7699 - $vrlex->[0]{$gbl}[$lex+1] = 123: no exception ok 7700 - $vrlex->[0]{$gbl}[$lex+1] = 123: value ok 7701 - exists $vrlex->[0]{$gbl}[$lex+1]: no exception ok 7702 - exists $vrlex->[0]{$gbl}[$lex+1]: value ok 7703 - delete $vrlex->[0]{$gbl}[$lex+1]: no exception ok 7704 - delete $vrlex->[0]{$gbl}[$lex+1]: value ok 7705 - $vrgbl->[0]{$gbl}[$lex+1]: no exception ok 7706 - $vrgbl->[0]{$gbl}[$lex+1]: value ok 7707 - $vrgbl->[0]{$gbl}[$lex+1] = 123: no exception ok 7708 - $vrgbl->[0]{$gbl}[$lex+1] = 123: value ok 7709 - exists $vrgbl->[0]{$gbl}[$lex+1]: no exception ok 7710 - exists $vrgbl->[0]{$gbl}[$lex+1]: value ok 7711 - delete $vrgbl->[0]{$gbl}[$lex+1]: no exception ok 7712 - delete $vrgbl->[0]{$gbl}[$lex+1]: value ok 7713 - $vlex[$lex]{$gbl}[$lex+1]: no exception ok 7714 - $vlex[$lex]{$gbl}[$lex+1]: value ok 7715 - $vlex[$lex]{$gbl}[$lex+1] = 123: no exception ok 7716 - $vlex[$lex]{$gbl}[$lex+1] = 123: value ok 7717 - exists $vlex[$lex]{$gbl}[$lex+1]: no exception ok 7718 - exists $vlex[$lex]{$gbl}[$lex+1]: value ok 7719 - delete $vlex[$lex]{$gbl}[$lex+1]: no exception ok 7720 - delete $vlex[$lex]{$gbl}[$lex+1]: value ok 7721 - $vgbl[$lex]{$gbl}[$lex+1]: no exception ok 7722 - $vgbl[$lex]{$gbl}[$lex+1]: value ok 7723 - $vgbl[$lex]{$gbl}[$lex+1] = 123: no exception ok 7724 - $vgbl[$lex]{$gbl}[$lex+1] = 123: value ok 7725 - exists $vgbl[$lex]{$gbl}[$lex+1]: no exception ok 7726 - exists $vgbl[$lex]{$gbl}[$lex+1]: value ok 7727 - delete $vgbl[$lex]{$gbl}[$lex+1]: no exception ok 7728 - delete $vgbl[$lex]{$gbl}[$lex+1]: value ok 7729 - $vrlex->[$lex]{$gbl}[$lex+1]: no exception ok 7730 - $vrlex->[$lex]{$gbl}[$lex+1]: value ok 7731 - $vrlex->[$lex]{$gbl}[$lex+1] = 123: no exception ok 7732 - $vrlex->[$lex]{$gbl}[$lex+1] = 123: value ok 7733 - exists $vrlex->[$lex]{$gbl}[$lex+1]: no exception ok 7734 - exists $vrlex->[$lex]{$gbl}[$lex+1]: value ok 7735 - delete $vrlex->[$lex]{$gbl}[$lex+1]: no exception ok 7736 - delete $vrlex->[$lex]{$gbl}[$lex+1]: value ok 7737 - $vrgbl->[$lex]{$gbl}[$lex+1]: no exception ok 7738 - $vrgbl->[$lex]{$gbl}[$lex+1]: value ok 7739 - $vrgbl->[$lex]{$gbl}[$lex+1] = 123: no exception ok 7740 - $vrgbl->[$lex]{$gbl}[$lex+1] = 123: value ok 7741 - exists $vrgbl->[$lex]{$gbl}[$lex+1]: no exception ok 7742 - exists $vrgbl->[$lex]{$gbl}[$lex+1]: value ok 7743 - delete $vrgbl->[$lex]{$gbl}[$lex+1]: no exception ok 7744 - delete $vrgbl->[$lex]{$gbl}[$lex+1]: value ok 7745 - $vlex[$gbl]{$gbl}[$lex+1]: no exception ok 7746 - $vlex[$gbl]{$gbl}[$lex+1]: value ok 7747 - $vlex[$gbl]{$gbl}[$lex+1] = 123: no exception ok 7748 - $vlex[$gbl]{$gbl}[$lex+1] = 123: value ok 7749 - exists $vlex[$gbl]{$gbl}[$lex+1]: no exception ok 7750 - exists $vlex[$gbl]{$gbl}[$lex+1]: value ok 7751 - delete $vlex[$gbl]{$gbl}[$lex+1]: no exception ok 7752 - delete $vlex[$gbl]{$gbl}[$lex+1]: value ok 7753 - $vgbl[$gbl]{$gbl}[$lex+1]: no exception ok 7754 - $vgbl[$gbl]{$gbl}[$lex+1]: value ok 7755 - $vgbl[$gbl]{$gbl}[$lex+1] = 123: no exception ok 7756 - $vgbl[$gbl]{$gbl}[$lex+1] = 123: value ok 7757 - exists $vgbl[$gbl]{$gbl}[$lex+1]: no exception ok 7758 - exists $vgbl[$gbl]{$gbl}[$lex+1]: value ok 7759 - delete $vgbl[$gbl]{$gbl}[$lex+1]: no exception ok 7760 - delete $vgbl[$gbl]{$gbl}[$lex+1]: value ok 7761 - $vrlex->[$gbl]{$gbl}[$lex+1]: no exception ok 7762 - $vrlex->[$gbl]{$gbl}[$lex+1]: value ok 7763 - $vrlex->[$gbl]{$gbl}[$lex+1] = 123: no exception ok 7764 - $vrlex->[$gbl]{$gbl}[$lex+1] = 123: value ok 7765 - exists $vrlex->[$gbl]{$gbl}[$lex+1]: no exception ok 7766 - exists $vrlex->[$gbl]{$gbl}[$lex+1]: value ok 7767 - delete $vrlex->[$gbl]{$gbl}[$lex+1]: no exception ok 7768 - delete $vrlex->[$gbl]{$gbl}[$lex+1]: value ok 7769 - $vrgbl->[$gbl]{$gbl}[$lex+1]: no exception ok 7770 - $vrgbl->[$gbl]{$gbl}[$lex+1]: value ok 7771 - $vrgbl->[$gbl]{$gbl}[$lex+1] = 123: no exception ok 7772 - $vrgbl->[$gbl]{$gbl}[$lex+1] = 123: value ok 7773 - exists $vrgbl->[$gbl]{$gbl}[$lex+1]: no exception ok 7774 - exists $vrgbl->[$gbl]{$gbl}[$lex+1]: value ok 7775 - delete $vrgbl->[$gbl]{$gbl}[$lex+1]: no exception ok 7776 - delete $vrgbl->[$gbl]{$gbl}[$lex+1]: value ok 7777 - $vlex[$lex+1]{$gbl}[$lex+1]: no exception ok 7778 - $vlex[$lex+1]{$gbl}[$lex+1]: value ok 7779 - $vlex[$lex+1]{$gbl}[$lex+1] = 123: no exception ok 7780 - $vlex[$lex+1]{$gbl}[$lex+1] = 123: value ok 7781 - exists $vlex[$lex+1]{$gbl}[$lex+1]: no exception ok 7782 - exists $vlex[$lex+1]{$gbl}[$lex+1]: value ok 7783 - delete $vlex[$lex+1]{$gbl}[$lex+1]: no exception ok 7784 - delete $vlex[$lex+1]{$gbl}[$lex+1]: value ok 7785 - $vgbl[$lex+1]{$gbl}[$lex+1]: no exception ok 7786 - $vgbl[$lex+1]{$gbl}[$lex+1]: value ok 7787 - $vgbl[$lex+1]{$gbl}[$lex+1] = 123: no exception ok 7788 - $vgbl[$lex+1]{$gbl}[$lex+1] = 123: value ok 7789 - exists $vgbl[$lex+1]{$gbl}[$lex+1]: no exception ok 7790 - exists $vgbl[$lex+1]{$gbl}[$lex+1]: value ok 7791 - delete $vgbl[$lex+1]{$gbl}[$lex+1]: no exception ok 7792 - delete $vgbl[$lex+1]{$gbl}[$lex+1]: value ok 7793 - $vrlex->[$lex+1]{$gbl}[$lex+1]: no exception ok 7794 - $vrlex->[$lex+1]{$gbl}[$lex+1]: value ok 7795 - $vrlex->[$lex+1]{$gbl}[$lex+1] = 123: no exception ok 7796 - $vrlex->[$lex+1]{$gbl}[$lex+1] = 123: value ok 7797 - exists $vrlex->[$lex+1]{$gbl}[$lex+1]: no exception ok 7798 - exists $vrlex->[$lex+1]{$gbl}[$lex+1]: value ok 7799 - delete $vrlex->[$lex+1]{$gbl}[$lex+1]: no exception ok 7800 - delete $vrlex->[$lex+1]{$gbl}[$lex+1]: value ok 7801 - $vrgbl->[$lex+1]{$gbl}[$lex+1]: no exception ok 7802 - $vrgbl->[$lex+1]{$gbl}[$lex+1]: value ok 7803 - $vrgbl->[$lex+1]{$gbl}[$lex+1] = 123: no exception ok 7804 - $vrgbl->[$lex+1]{$gbl}[$lex+1] = 123: value ok 7805 - exists $vrgbl->[$lex+1]{$gbl}[$lex+1]: no exception ok 7806 - exists $vrgbl->[$lex+1]{$gbl}[$lex+1]: value ok 7807 - delete $vrgbl->[$lex+1]{$gbl}[$lex+1]: no exception ok 7808 - delete $vrgbl->[$lex+1]{$gbl}[$lex+1]: value ok 7809 - $vlex{foo}{$gbl}[$lex+1]: no exception ok 7810 - $vlex{foo}{$gbl}[$lex+1]: value ok 7811 - $vlex{foo}{$gbl}[$lex+1] = 123: no exception ok 7812 - $vlex{foo}{$gbl}[$lex+1] = 123: value ok 7813 - exists $vlex{foo}{$gbl}[$lex+1]: no exception ok 7814 - exists $vlex{foo}{$gbl}[$lex+1]: value ok 7815 - delete $vlex{foo}{$gbl}[$lex+1]: no exception ok 7816 - delete $vlex{foo}{$gbl}[$lex+1]: value ok 7817 - $vgbl{foo}{$gbl}[$lex+1]: no exception ok 7818 - $vgbl{foo}{$gbl}[$lex+1]: value ok 7819 - $vgbl{foo}{$gbl}[$lex+1] = 123: no exception ok 7820 - $vgbl{foo}{$gbl}[$lex+1] = 123: value ok 7821 - exists $vgbl{foo}{$gbl}[$lex+1]: no exception ok 7822 - exists $vgbl{foo}{$gbl}[$lex+1]: value ok 7823 - delete $vgbl{foo}{$gbl}[$lex+1]: no exception ok 7824 - delete $vgbl{foo}{$gbl}[$lex+1]: value ok 7825 - $vrlex->{foo}{$gbl}[$lex+1]: no exception ok 7826 - $vrlex->{foo}{$gbl}[$lex+1]: value ok 7827 - $vrlex->{foo}{$gbl}[$lex+1] = 123: no exception ok 7828 - $vrlex->{foo}{$gbl}[$lex+1] = 123: value ok 7829 - exists $vrlex->{foo}{$gbl}[$lex+1]: no exception ok 7830 - exists $vrlex->{foo}{$gbl}[$lex+1]: value ok 7831 - delete $vrlex->{foo}{$gbl}[$lex+1]: no exception ok 7832 - delete $vrlex->{foo}{$gbl}[$lex+1]: value ok 7833 - $vrgbl->{foo}{$gbl}[$lex+1]: no exception ok 7834 - $vrgbl->{foo}{$gbl}[$lex+1]: value ok 7835 - $vrgbl->{foo}{$gbl}[$lex+1] = 123: no exception ok 7836 - $vrgbl->{foo}{$gbl}[$lex+1] = 123: value ok 7837 - exists $vrgbl->{foo}{$gbl}[$lex+1]: no exception ok 7838 - exists $vrgbl->{foo}{$gbl}[$lex+1]: value ok 7839 - delete $vrgbl->{foo}{$gbl}[$lex+1]: no exception ok 7840 - delete $vrgbl->{foo}{$gbl}[$lex+1]: value ok 7841 - $vlex{$lex}{$gbl}[$lex+1]: no exception ok 7842 - $vlex{$lex}{$gbl}[$lex+1]: value ok 7843 - $vlex{$lex}{$gbl}[$lex+1] = 123: no exception ok 7844 - $vlex{$lex}{$gbl}[$lex+1] = 123: value ok 7845 - exists $vlex{$lex}{$gbl}[$lex+1]: no exception ok 7846 - exists $vlex{$lex}{$gbl}[$lex+1]: value ok 7847 - delete $vlex{$lex}{$gbl}[$lex+1]: no exception ok 7848 - delete $vlex{$lex}{$gbl}[$lex+1]: value ok 7849 - $vgbl{$lex}{$gbl}[$lex+1]: no exception ok 7850 - $vgbl{$lex}{$gbl}[$lex+1]: value ok 7851 - $vgbl{$lex}{$gbl}[$lex+1] = 123: no exception ok 7852 - $vgbl{$lex}{$gbl}[$lex+1] = 123: value ok 7853 - exists $vgbl{$lex}{$gbl}[$lex+1]: no exception ok 7854 - exists $vgbl{$lex}{$gbl}[$lex+1]: value ok 7855 - delete $vgbl{$lex}{$gbl}[$lex+1]: no exception ok 7856 - delete $vgbl{$lex}{$gbl}[$lex+1]: value ok 7857 - $vrlex->{$lex}{$gbl}[$lex+1]: no exception ok 7858 - $vrlex->{$lex}{$gbl}[$lex+1]: value ok 7859 - $vrlex->{$lex}{$gbl}[$lex+1] = 123: no exception ok 7860 - $vrlex->{$lex}{$gbl}[$lex+1] = 123: value ok 7861 - exists $vrlex->{$lex}{$gbl}[$lex+1]: no exception ok 7862 - exists $vrlex->{$lex}{$gbl}[$lex+1]: value ok 7863 - delete $vrlex->{$lex}{$gbl}[$lex+1]: no exception ok 7864 - delete $vrlex->{$lex}{$gbl}[$lex+1]: value ok 7865 - $vrgbl->{$lex}{$gbl}[$lex+1]: no exception ok 7866 - $vrgbl->{$lex}{$gbl}[$lex+1]: value ok 7867 - $vrgbl->{$lex}{$gbl}[$lex+1] = 123: no exception ok 7868 - $vrgbl->{$lex}{$gbl}[$lex+1] = 123: value ok 7869 - exists $vrgbl->{$lex}{$gbl}[$lex+1]: no exception ok 7870 - exists $vrgbl->{$lex}{$gbl}[$lex+1]: value ok 7871 - delete $vrgbl->{$lex}{$gbl}[$lex+1]: no exception ok 7872 - delete $vrgbl->{$lex}{$gbl}[$lex+1]: value ok 7873 - $vlex{$gbl}{$gbl}[$lex+1]: no exception ok 7874 - $vlex{$gbl}{$gbl}[$lex+1]: value ok 7875 - $vlex{$gbl}{$gbl}[$lex+1] = 123: no exception ok 7876 - $vlex{$gbl}{$gbl}[$lex+1] = 123: value ok 7877 - exists $vlex{$gbl}{$gbl}[$lex+1]: no exception ok 7878 - exists $vlex{$gbl}{$gbl}[$lex+1]: value ok 7879 - delete $vlex{$gbl}{$gbl}[$lex+1]: no exception ok 7880 - delete $vlex{$gbl}{$gbl}[$lex+1]: value ok 7881 - $vgbl{$gbl}{$gbl}[$lex+1]: no exception ok 7882 - $vgbl{$gbl}{$gbl}[$lex+1]: value ok 7883 - $vgbl{$gbl}{$gbl}[$lex+1] = 123: no exception ok 7884 - $vgbl{$gbl}{$gbl}[$lex+1] = 123: value ok 7885 - exists $vgbl{$gbl}{$gbl}[$lex+1]: no exception ok 7886 - exists $vgbl{$gbl}{$gbl}[$lex+1]: value ok 7887 - delete $vgbl{$gbl}{$gbl}[$lex+1]: no exception ok 7888 - delete $vgbl{$gbl}{$gbl}[$lex+1]: value ok 7889 - $vrlex->{$gbl}{$gbl}[$lex+1]: no exception ok 7890 - $vrlex->{$gbl}{$gbl}[$lex+1]: value ok 7891 - $vrlex->{$gbl}{$gbl}[$lex+1] = 123: no exception ok 7892 - $vrlex->{$gbl}{$gbl}[$lex+1] = 123: value ok 7893 - exists $vrlex->{$gbl}{$gbl}[$lex+1]: no exception ok 7894 - exists $vrlex->{$gbl}{$gbl}[$lex+1]: value ok 7895 - delete $vrlex->{$gbl}{$gbl}[$lex+1]: no exception ok 7896 - delete $vrlex->{$gbl}{$gbl}[$lex+1]: value ok 7897 - $vrgbl->{$gbl}{$gbl}[$lex+1]: no exception ok 7898 - $vrgbl->{$gbl}{$gbl}[$lex+1]: value ok 7899 - $vrgbl->{$gbl}{$gbl}[$lex+1] = 123: no exception ok 7900 - $vrgbl->{$gbl}{$gbl}[$lex+1] = 123: value ok 7901 - exists $vrgbl->{$gbl}{$gbl}[$lex+1]: no exception ok 7902 - exists $vrgbl->{$gbl}{$gbl}[$lex+1]: value ok 7903 - delete $vrgbl->{$gbl}{$gbl}[$lex+1]: no exception ok 7904 - delete $vrgbl->{$gbl}{$gbl}[$lex+1]: value ok 7905 - $vlex{"x$lex"}{$gbl}[$lex+1]: no exception ok 7906 - $vlex{"x$lex"}{$gbl}[$lex+1]: value ok 7907 - $vlex{"x$lex"}{$gbl}[$lex+1] = 123: no exception ok 7908 - $vlex{"x$lex"}{$gbl}[$lex+1] = 123: value ok 7909 - exists $vlex{"x$lex"}{$gbl}[$lex+1]: no exception ok 7910 - exists $vlex{"x$lex"}{$gbl}[$lex+1]: value ok 7911 - delete $vlex{"x$lex"}{$gbl}[$lex+1]: no exception ok 7912 - delete $vlex{"x$lex"}{$gbl}[$lex+1]: value ok 7913 - $vgbl{"x$lex"}{$gbl}[$lex+1]: no exception ok 7914 - $vgbl{"x$lex"}{$gbl}[$lex+1]: value ok 7915 - $vgbl{"x$lex"}{$gbl}[$lex+1] = 123: no exception ok 7916 - $vgbl{"x$lex"}{$gbl}[$lex+1] = 123: value ok 7917 - exists $vgbl{"x$lex"}{$gbl}[$lex+1]: no exception ok 7918 - exists $vgbl{"x$lex"}{$gbl}[$lex+1]: value ok 7919 - delete $vgbl{"x$lex"}{$gbl}[$lex+1]: no exception ok 7920 - delete $vgbl{"x$lex"}{$gbl}[$lex+1]: value ok 7921 - $vrlex->{"x$lex"}{$gbl}[$lex+1]: no exception ok 7922 - $vrlex->{"x$lex"}{$gbl}[$lex+1]: value ok 7923 - $vrlex->{"x$lex"}{$gbl}[$lex+1] = 123: no exception ok 7924 - $vrlex->{"x$lex"}{$gbl}[$lex+1] = 123: value ok 7925 - exists $vrlex->{"x$lex"}{$gbl}[$lex+1]: no exception ok 7926 - exists $vrlex->{"x$lex"}{$gbl}[$lex+1]: value ok 7927 - delete $vrlex->{"x$lex"}{$gbl}[$lex+1]: no exception ok 7928 - delete $vrlex->{"x$lex"}{$gbl}[$lex+1]: value ok 7929 - $vrgbl->{"x$lex"}{$gbl}[$lex+1]: no exception ok 7930 - $vrgbl->{"x$lex"}{$gbl}[$lex+1]: value ok 7931 - $vrgbl->{"x$lex"}{$gbl}[$lex+1] = 123: no exception ok 7932 - $vrgbl->{"x$lex"}{$gbl}[$lex+1] = 123: value ok 7933 - exists $vrgbl->{"x$lex"}{$gbl}[$lex+1]: no exception ok 7934 - exists $vrgbl->{"x$lex"}{$gbl}[$lex+1]: value ok 7935 - delete $vrgbl->{"x$lex"}{$gbl}[$lex+1]: no exception ok 7936 - delete $vrgbl->{"x$lex"}{$gbl}[$lex+1]: value ok 7937 - $vlex[0]{"x$lex"}[$lex+1]: no exception ok 7938 - $vlex[0]{"x$lex"}[$lex+1]: value ok 7939 - $vlex[0]{"x$lex"}[$lex+1] = 123: no exception ok 7940 - $vlex[0]{"x$lex"}[$lex+1] = 123: value ok 7941 - exists $vlex[0]{"x$lex"}[$lex+1]: no exception ok 7942 - exists $vlex[0]{"x$lex"}[$lex+1]: value ok 7943 - delete $vlex[0]{"x$lex"}[$lex+1]: no exception ok 7944 - delete $vlex[0]{"x$lex"}[$lex+1]: value ok 7945 - $vgbl[0]{"x$lex"}[$lex+1]: no exception ok 7946 - $vgbl[0]{"x$lex"}[$lex+1]: value ok 7947 - $vgbl[0]{"x$lex"}[$lex+1] = 123: no exception ok 7948 - $vgbl[0]{"x$lex"}[$lex+1] = 123: value ok 7949 - exists $vgbl[0]{"x$lex"}[$lex+1]: no exception ok 7950 - exists $vgbl[0]{"x$lex"}[$lex+1]: value ok 7951 - delete $vgbl[0]{"x$lex"}[$lex+1]: no exception ok 7952 - delete $vgbl[0]{"x$lex"}[$lex+1]: value ok 7953 - $vrlex->[0]{"x$lex"}[$lex+1]: no exception ok 7954 - $vrlex->[0]{"x$lex"}[$lex+1]: value ok 7955 - $vrlex->[0]{"x$lex"}[$lex+1] = 123: no exception ok 7956 - $vrlex->[0]{"x$lex"}[$lex+1] = 123: value ok 7957 - exists $vrlex->[0]{"x$lex"}[$lex+1]: no exception ok 7958 - exists $vrlex->[0]{"x$lex"}[$lex+1]: value ok 7959 - delete $vrlex->[0]{"x$lex"}[$lex+1]: no exception ok 7960 - delete $vrlex->[0]{"x$lex"}[$lex+1]: value ok 7961 - $vrgbl->[0]{"x$lex"}[$lex+1]: no exception ok 7962 - $vrgbl->[0]{"x$lex"}[$lex+1]: value ok 7963 - $vrgbl->[0]{"x$lex"}[$lex+1] = 123: no exception ok 7964 - $vrgbl->[0]{"x$lex"}[$lex+1] = 123: value ok 7965 - exists $vrgbl->[0]{"x$lex"}[$lex+1]: no exception ok 7966 - exists $vrgbl->[0]{"x$lex"}[$lex+1]: value ok 7967 - delete $vrgbl->[0]{"x$lex"}[$lex+1]: no exception ok 7968 - delete $vrgbl->[0]{"x$lex"}[$lex+1]: value ok 7969 - $vlex[$lex]{"x$lex"}[$lex+1]: no exception ok 7970 - $vlex[$lex]{"x$lex"}[$lex+1]: value ok 7971 - $vlex[$lex]{"x$lex"}[$lex+1] = 123: no exception ok 7972 - $vlex[$lex]{"x$lex"}[$lex+1] = 123: value ok 7973 - exists $vlex[$lex]{"x$lex"}[$lex+1]: no exception ok 7974 - exists $vlex[$lex]{"x$lex"}[$lex+1]: value ok 7975 - delete $vlex[$lex]{"x$lex"}[$lex+1]: no exception ok 7976 - delete $vlex[$lex]{"x$lex"}[$lex+1]: value ok 7977 - $vgbl[$lex]{"x$lex"}[$lex+1]: no exception ok 7978 - $vgbl[$lex]{"x$lex"}[$lex+1]: value ok 7979 - $vgbl[$lex]{"x$lex"}[$lex+1] = 123: no exception ok 7980 - $vgbl[$lex]{"x$lex"}[$lex+1] = 123: value ok 7981 - exists $vgbl[$lex]{"x$lex"}[$lex+1]: no exception ok 7982 - exists $vgbl[$lex]{"x$lex"}[$lex+1]: value ok 7983 - delete $vgbl[$lex]{"x$lex"}[$lex+1]: no exception ok 7984 - delete $vgbl[$lex]{"x$lex"}[$lex+1]: value ok 7985 - $vrlex->[$lex]{"x$lex"}[$lex+1]: no exception ok 7986 - $vrlex->[$lex]{"x$lex"}[$lex+1]: value ok 7987 - $vrlex->[$lex]{"x$lex"}[$lex+1] = 123: no exception ok 7988 - $vrlex->[$lex]{"x$lex"}[$lex+1] = 123: value ok 7989 - exists $vrlex->[$lex]{"x$lex"}[$lex+1]: no exception ok 7990 - exists $vrlex->[$lex]{"x$lex"}[$lex+1]: value ok 7991 - delete $vrlex->[$lex]{"x$lex"}[$lex+1]: no exception ok 7992 - delete $vrlex->[$lex]{"x$lex"}[$lex+1]: value ok 7993 - $vrgbl->[$lex]{"x$lex"}[$lex+1]: no exception ok 7994 - $vrgbl->[$lex]{"x$lex"}[$lex+1]: value ok 7995 - $vrgbl->[$lex]{"x$lex"}[$lex+1] = 123: no exception ok 7996 - $vrgbl->[$lex]{"x$lex"}[$lex+1] = 123: value ok 7997 - exists $vrgbl->[$lex]{"x$lex"}[$lex+1]: no exception ok 7998 - exists $vrgbl->[$lex]{"x$lex"}[$lex+1]: value ok 7999 - delete $vrgbl->[$lex]{"x$lex"}[$lex+1]: no exception ok 8000 - delete $vrgbl->[$lex]{"x$lex"}[$lex+1]: value ok 8001 - $vlex[$gbl]{"x$lex"}[$lex+1]: no exception ok 8002 - $vlex[$gbl]{"x$lex"}[$lex+1]: value ok 8003 - $vlex[$gbl]{"x$lex"}[$lex+1] = 123: no exception ok 8004 - $vlex[$gbl]{"x$lex"}[$lex+1] = 123: value ok 8005 - exists $vlex[$gbl]{"x$lex"}[$lex+1]: no exception ok 8006 - exists $vlex[$gbl]{"x$lex"}[$lex+1]: value ok 8007 - delete $vlex[$gbl]{"x$lex"}[$lex+1]: no exception ok 8008 - delete $vlex[$gbl]{"x$lex"}[$lex+1]: value ok 8009 - $vgbl[$gbl]{"x$lex"}[$lex+1]: no exception ok 8010 - $vgbl[$gbl]{"x$lex"}[$lex+1]: value ok 8011 - $vgbl[$gbl]{"x$lex"}[$lex+1] = 123: no exception ok 8012 - $vgbl[$gbl]{"x$lex"}[$lex+1] = 123: value ok 8013 - exists $vgbl[$gbl]{"x$lex"}[$lex+1]: no exception ok 8014 - exists $vgbl[$gbl]{"x$lex"}[$lex+1]: value ok 8015 - delete $vgbl[$gbl]{"x$lex"}[$lex+1]: no exception ok 8016 - delete $vgbl[$gbl]{"x$lex"}[$lex+1]: value ok 8017 - $vrlex->[$gbl]{"x$lex"}[$lex+1]: no exception ok 8018 - $vrlex->[$gbl]{"x$lex"}[$lex+1]: value ok 8019 - $vrlex->[$gbl]{"x$lex"}[$lex+1] = 123: no exception ok 8020 - $vrlex->[$gbl]{"x$lex"}[$lex+1] = 123: value ok 8021 - exists $vrlex->[$gbl]{"x$lex"}[$lex+1]: no exception ok 8022 - exists $vrlex->[$gbl]{"x$lex"}[$lex+1]: value ok 8023 - delete $vrlex->[$gbl]{"x$lex"}[$lex+1]: no exception ok 8024 - delete $vrlex->[$gbl]{"x$lex"}[$lex+1]: value ok 8025 - $vrgbl->[$gbl]{"x$lex"}[$lex+1]: no exception ok 8026 - $vrgbl->[$gbl]{"x$lex"}[$lex+1]: value ok 8027 - $vrgbl->[$gbl]{"x$lex"}[$lex+1] = 123: no exception ok 8028 - $vrgbl->[$gbl]{"x$lex"}[$lex+1] = 123: value ok 8029 - exists $vrgbl->[$gbl]{"x$lex"}[$lex+1]: no exception ok 8030 - exists $vrgbl->[$gbl]{"x$lex"}[$lex+1]: value ok 8031 - delete $vrgbl->[$gbl]{"x$lex"}[$lex+1]: no exception ok 8032 - delete $vrgbl->[$gbl]{"x$lex"}[$lex+1]: value ok 8033 - $vlex[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8034 - $vlex[$lex+1]{"x$lex"}[$lex+1]: value ok 8035 - $vlex[$lex+1]{"x$lex"}[$lex+1] = 123: no exception ok 8036 - $vlex[$lex+1]{"x$lex"}[$lex+1] = 123: value ok 8037 - exists $vlex[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8038 - exists $vlex[$lex+1]{"x$lex"}[$lex+1]: value ok 8039 - delete $vlex[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8040 - delete $vlex[$lex+1]{"x$lex"}[$lex+1]: value ok 8041 - $vgbl[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8042 - $vgbl[$lex+1]{"x$lex"}[$lex+1]: value ok 8043 - $vgbl[$lex+1]{"x$lex"}[$lex+1] = 123: no exception ok 8044 - $vgbl[$lex+1]{"x$lex"}[$lex+1] = 123: value ok 8045 - exists $vgbl[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8046 - exists $vgbl[$lex+1]{"x$lex"}[$lex+1]: value ok 8047 - delete $vgbl[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8048 - delete $vgbl[$lex+1]{"x$lex"}[$lex+1]: value ok 8049 - $vrlex->[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8050 - $vrlex->[$lex+1]{"x$lex"}[$lex+1]: value ok 8051 - $vrlex->[$lex+1]{"x$lex"}[$lex+1] = 123: no exception ok 8052 - $vrlex->[$lex+1]{"x$lex"}[$lex+1] = 123: value ok 8053 - exists $vrlex->[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8054 - exists $vrlex->[$lex+1]{"x$lex"}[$lex+1]: value ok 8055 - delete $vrlex->[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8056 - delete $vrlex->[$lex+1]{"x$lex"}[$lex+1]: value ok 8057 - $vrgbl->[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8058 - $vrgbl->[$lex+1]{"x$lex"}[$lex+1]: value ok 8059 - $vrgbl->[$lex+1]{"x$lex"}[$lex+1] = 123: no exception ok 8060 - $vrgbl->[$lex+1]{"x$lex"}[$lex+1] = 123: value ok 8061 - exists $vrgbl->[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8062 - exists $vrgbl->[$lex+1]{"x$lex"}[$lex+1]: value ok 8063 - delete $vrgbl->[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8064 - delete $vrgbl->[$lex+1]{"x$lex"}[$lex+1]: value ok 8065 - $vlex{foo}{"x$lex"}[$lex+1]: no exception ok 8066 - $vlex{foo}{"x$lex"}[$lex+1]: value ok 8067 - $vlex{foo}{"x$lex"}[$lex+1] = 123: no exception ok 8068 - $vlex{foo}{"x$lex"}[$lex+1] = 123: value ok 8069 - exists $vlex{foo}{"x$lex"}[$lex+1]: no exception ok 8070 - exists $vlex{foo}{"x$lex"}[$lex+1]: value ok 8071 - delete $vlex{foo}{"x$lex"}[$lex+1]: no exception ok 8072 - delete $vlex{foo}{"x$lex"}[$lex+1]: value ok 8073 - $vgbl{foo}{"x$lex"}[$lex+1]: no exception ok 8074 - $vgbl{foo}{"x$lex"}[$lex+1]: value ok 8075 - $vgbl{foo}{"x$lex"}[$lex+1] = 123: no exception ok 8076 - $vgbl{foo}{"x$lex"}[$lex+1] = 123: value ok 8077 - exists $vgbl{foo}{"x$lex"}[$lex+1]: no exception ok 8078 - exists $vgbl{foo}{"x$lex"}[$lex+1]: value ok 8079 - delete $vgbl{foo}{"x$lex"}[$lex+1]: no exception ok 8080 - delete $vgbl{foo}{"x$lex"}[$lex+1]: value ok 8081 - $vrlex->{foo}{"x$lex"}[$lex+1]: no exception ok 8082 - $vrlex->{foo}{"x$lex"}[$lex+1]: value ok 8083 - $vrlex->{foo}{"x$lex"}[$lex+1] = 123: no exception ok 8084 - $vrlex->{foo}{"x$lex"}[$lex+1] = 123: value ok 8085 - exists $vrlex->{foo}{"x$lex"}[$lex+1]: no exception ok 8086 - exists $vrlex->{foo}{"x$lex"}[$lex+1]: value ok 8087 - delete $vrlex->{foo}{"x$lex"}[$lex+1]: no exception ok 8088 - delete $vrlex->{foo}{"x$lex"}[$lex+1]: value ok 8089 - $vrgbl->{foo}{"x$lex"}[$lex+1]: no exception ok 8090 - $vrgbl->{foo}{"x$lex"}[$lex+1]: value ok 8091 - $vrgbl->{foo}{"x$lex"}[$lex+1] = 123: no exception ok 8092 - $vrgbl->{foo}{"x$lex"}[$lex+1] = 123: value ok 8093 - exists $vrgbl->{foo}{"x$lex"}[$lex+1]: no exception ok 8094 - exists $vrgbl->{foo}{"x$lex"}[$lex+1]: value ok 8095 - delete $vrgbl->{foo}{"x$lex"}[$lex+1]: no exception ok 8096 - delete $vrgbl->{foo}{"x$lex"}[$lex+1]: value ok 8097 - $vlex{$lex}{"x$lex"}[$lex+1]: no exception ok 8098 - $vlex{$lex}{"x$lex"}[$lex+1]: value ok 8099 - $vlex{$lex}{"x$lex"}[$lex+1] = 123: no exception ok 8100 - $vlex{$lex}{"x$lex"}[$lex+1] = 123: value ok 8101 - exists $vlex{$lex}{"x$lex"}[$lex+1]: no exception ok 8102 - exists $vlex{$lex}{"x$lex"}[$lex+1]: value ok 8103 - delete $vlex{$lex}{"x$lex"}[$lex+1]: no exception ok 8104 - delete $vlex{$lex}{"x$lex"}[$lex+1]: value ok 8105 - $vgbl{$lex}{"x$lex"}[$lex+1]: no exception ok 8106 - $vgbl{$lex}{"x$lex"}[$lex+1]: value ok 8107 - $vgbl{$lex}{"x$lex"}[$lex+1] = 123: no exception ok 8108 - $vgbl{$lex}{"x$lex"}[$lex+1] = 123: value ok 8109 - exists $vgbl{$lex}{"x$lex"}[$lex+1]: no exception ok 8110 - exists $vgbl{$lex}{"x$lex"}[$lex+1]: value ok 8111 - delete $vgbl{$lex}{"x$lex"}[$lex+1]: no exception ok 8112 - delete $vgbl{$lex}{"x$lex"}[$lex+1]: value ok 8113 - $vrlex->{$lex}{"x$lex"}[$lex+1]: no exception ok 8114 - $vrlex->{$lex}{"x$lex"}[$lex+1]: value ok 8115 - $vrlex->{$lex}{"x$lex"}[$lex+1] = 123: no exception ok 8116 - $vrlex->{$lex}{"x$lex"}[$lex+1] = 123: value ok 8117 - exists $vrlex->{$lex}{"x$lex"}[$lex+1]: no exception ok 8118 - exists $vrlex->{$lex}{"x$lex"}[$lex+1]: value ok 8119 - delete $vrlex->{$lex}{"x$lex"}[$lex+1]: no exception ok 8120 - delete $vrlex->{$lex}{"x$lex"}[$lex+1]: value ok 8121 - $vrgbl->{$lex}{"x$lex"}[$lex+1]: no exception ok 8122 - $vrgbl->{$lex}{"x$lex"}[$lex+1]: value ok 8123 - $vrgbl->{$lex}{"x$lex"}[$lex+1] = 123: no exception ok 8124 - $vrgbl->{$lex}{"x$lex"}[$lex+1] = 123: value ok 8125 - exists $vrgbl->{$lex}{"x$lex"}[$lex+1]: no exception ok 8126 - exists $vrgbl->{$lex}{"x$lex"}[$lex+1]: value ok 8127 - delete $vrgbl->{$lex}{"x$lex"}[$lex+1]: no exception ok 8128 - delete $vrgbl->{$lex}{"x$lex"}[$lex+1]: value ok 8129 - $vlex{$gbl}{"x$lex"}[$lex+1]: no exception ok 8130 - $vlex{$gbl}{"x$lex"}[$lex+1]: value ok 8131 - $vlex{$gbl}{"x$lex"}[$lex+1] = 123: no exception ok 8132 - $vlex{$gbl}{"x$lex"}[$lex+1] = 123: value ok 8133 - exists $vlex{$gbl}{"x$lex"}[$lex+1]: no exception ok 8134 - exists $vlex{$gbl}{"x$lex"}[$lex+1]: value ok 8135 - delete $vlex{$gbl}{"x$lex"}[$lex+1]: no exception ok 8136 - delete $vlex{$gbl}{"x$lex"}[$lex+1]: value ok 8137 - $vgbl{$gbl}{"x$lex"}[$lex+1]: no exception ok 8138 - $vgbl{$gbl}{"x$lex"}[$lex+1]: value ok 8139 - $vgbl{$gbl}{"x$lex"}[$lex+1] = 123: no exception ok 8140 - $vgbl{$gbl}{"x$lex"}[$lex+1] = 123: value ok 8141 - exists $vgbl{$gbl}{"x$lex"}[$lex+1]: no exception ok 8142 - exists $vgbl{$gbl}{"x$lex"}[$lex+1]: value ok 8143 - delete $vgbl{$gbl}{"x$lex"}[$lex+1]: no exception ok 8144 - delete $vgbl{$gbl}{"x$lex"}[$lex+1]: value ok 8145 - $vrlex->{$gbl}{"x$lex"}[$lex+1]: no exception ok 8146 - $vrlex->{$gbl}{"x$lex"}[$lex+1]: value ok 8147 - $vrlex->{$gbl}{"x$lex"}[$lex+1] = 123: no exception ok 8148 - $vrlex->{$gbl}{"x$lex"}[$lex+1] = 123: value ok 8149 - exists $vrlex->{$gbl}{"x$lex"}[$lex+1]: no exception ok 8150 - exists $vrlex->{$gbl}{"x$lex"}[$lex+1]: value ok 8151 - delete $vrlex->{$gbl}{"x$lex"}[$lex+1]: no exception ok 8152 - delete $vrlex->{$gbl}{"x$lex"}[$lex+1]: value ok 8153 - $vrgbl->{$gbl}{"x$lex"}[$lex+1]: no exception ok 8154 - $vrgbl->{$gbl}{"x$lex"}[$lex+1]: value ok 8155 - $vrgbl->{$gbl}{"x$lex"}[$lex+1] = 123: no exception ok 8156 - $vrgbl->{$gbl}{"x$lex"}[$lex+1] = 123: value ok 8157 - exists $vrgbl->{$gbl}{"x$lex"}[$lex+1]: no exception ok 8158 - exists $vrgbl->{$gbl}{"x$lex"}[$lex+1]: value ok 8159 - delete $vrgbl->{$gbl}{"x$lex"}[$lex+1]: no exception ok 8160 - delete $vrgbl->{$gbl}{"x$lex"}[$lex+1]: value ok 8161 - $vlex{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8162 - $vlex{"x$lex"}{"x$lex"}[$lex+1]: value ok 8163 - $vlex{"x$lex"}{"x$lex"}[$lex+1] = 123: no exception ok 8164 - $vlex{"x$lex"}{"x$lex"}[$lex+1] = 123: value ok 8165 - exists $vlex{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8166 - exists $vlex{"x$lex"}{"x$lex"}[$lex+1]: value ok 8167 - delete $vlex{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8168 - delete $vlex{"x$lex"}{"x$lex"}[$lex+1]: value ok 8169 - $vgbl{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8170 - $vgbl{"x$lex"}{"x$lex"}[$lex+1]: value ok 8171 - $vgbl{"x$lex"}{"x$lex"}[$lex+1] = 123: no exception ok 8172 - $vgbl{"x$lex"}{"x$lex"}[$lex+1] = 123: value ok 8173 - exists $vgbl{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8174 - exists $vgbl{"x$lex"}{"x$lex"}[$lex+1]: value ok 8175 - delete $vgbl{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8176 - delete $vgbl{"x$lex"}{"x$lex"}[$lex+1]: value ok 8177 - $vrlex->{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8178 - $vrlex->{"x$lex"}{"x$lex"}[$lex+1]: value ok 8179 - $vrlex->{"x$lex"}{"x$lex"}[$lex+1] = 123: no exception ok 8180 - $vrlex->{"x$lex"}{"x$lex"}[$lex+1] = 123: value ok 8181 - exists $vrlex->{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8182 - exists $vrlex->{"x$lex"}{"x$lex"}[$lex+1]: value ok 8183 - delete $vrlex->{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8184 - delete $vrlex->{"x$lex"}{"x$lex"}[$lex+1]: value ok 8185 - $vrgbl->{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8186 - $vrgbl->{"x$lex"}{"x$lex"}[$lex+1]: value ok 8187 - $vrgbl->{"x$lex"}{"x$lex"}[$lex+1] = 123: no exception ok 8188 - $vrgbl->{"x$lex"}{"x$lex"}[$lex+1] = 123: value ok 8189 - exists $vrgbl->{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8190 - exists $vrgbl->{"x$lex"}{"x$lex"}[$lex+1]: value ok 8191 - delete $vrgbl->{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8192 - delete $vrgbl->{"x$lex"}{"x$lex"}[$lex+1]: value ok 8193 - $vlex[0][0]{foo}: no exception ok 8194 - $vlex[0][0]{foo}: value ok 8195 - $vlex[0][0]{foo} = 123: no exception ok 8196 - $vlex[0][0]{foo} = 123: value ok 8197 - exists $vlex[0][0]{foo}: no exception ok 8198 - exists $vlex[0][0]{foo}: value ok 8199 - delete $vlex[0][0]{foo}: no exception ok 8200 - delete $vlex[0][0]{foo}: value ok 8201 - $vgbl[0][0]{foo}: no exception ok 8202 - $vgbl[0][0]{foo}: value ok 8203 - $vgbl[0][0]{foo} = 123: no exception ok 8204 - $vgbl[0][0]{foo} = 123: value ok 8205 - exists $vgbl[0][0]{foo}: no exception ok 8206 - exists $vgbl[0][0]{foo}: value ok 8207 - delete $vgbl[0][0]{foo}: no exception ok 8208 - delete $vgbl[0][0]{foo}: value ok 8209 - $vrlex->[0][0]{foo}: no exception ok 8210 - $vrlex->[0][0]{foo}: value ok 8211 - $vrlex->[0][0]{foo} = 123: no exception ok 8212 - $vrlex->[0][0]{foo} = 123: value ok 8213 - exists $vrlex->[0][0]{foo}: no exception ok 8214 - exists $vrlex->[0][0]{foo}: value ok 8215 - delete $vrlex->[0][0]{foo}: no exception ok 8216 - delete $vrlex->[0][0]{foo}: value ok 8217 - $vrgbl->[0][0]{foo}: no exception ok 8218 - $vrgbl->[0][0]{foo}: value ok 8219 - $vrgbl->[0][0]{foo} = 123: no exception ok 8220 - $vrgbl->[0][0]{foo} = 123: value ok 8221 - exists $vrgbl->[0][0]{foo}: no exception ok 8222 - exists $vrgbl->[0][0]{foo}: value ok 8223 - delete $vrgbl->[0][0]{foo}: no exception ok 8224 - delete $vrgbl->[0][0]{foo}: value ok 8225 - $vlex[$lex][0]{foo}: no exception ok 8226 - $vlex[$lex][0]{foo}: value ok 8227 - $vlex[$lex][0]{foo} = 123: no exception ok 8228 - $vlex[$lex][0]{foo} = 123: value ok 8229 - exists $vlex[$lex][0]{foo}: no exception ok 8230 - exists $vlex[$lex][0]{foo}: value ok 8231 - delete $vlex[$lex][0]{foo}: no exception ok 8232 - delete $vlex[$lex][0]{foo}: value ok 8233 - $vgbl[$lex][0]{foo}: no exception ok 8234 - $vgbl[$lex][0]{foo}: value ok 8235 - $vgbl[$lex][0]{foo} = 123: no exception ok 8236 - $vgbl[$lex][0]{foo} = 123: value ok 8237 - exists $vgbl[$lex][0]{foo}: no exception ok 8238 - exists $vgbl[$lex][0]{foo}: value ok 8239 - delete $vgbl[$lex][0]{foo}: no exception ok 8240 - delete $vgbl[$lex][0]{foo}: value ok 8241 - $vrlex->[$lex][0]{foo}: no exception ok 8242 - $vrlex->[$lex][0]{foo}: value ok 8243 - $vrlex->[$lex][0]{foo} = 123: no exception ok 8244 - $vrlex->[$lex][0]{foo} = 123: value ok 8245 - exists $vrlex->[$lex][0]{foo}: no exception ok 8246 - exists $vrlex->[$lex][0]{foo}: value ok 8247 - delete $vrlex->[$lex][0]{foo}: no exception ok 8248 - delete $vrlex->[$lex][0]{foo}: value ok 8249 - $vrgbl->[$lex][0]{foo}: no exception ok 8250 - $vrgbl->[$lex][0]{foo}: value ok 8251 - $vrgbl->[$lex][0]{foo} = 123: no exception ok 8252 - $vrgbl->[$lex][0]{foo} = 123: value ok 8253 - exists $vrgbl->[$lex][0]{foo}: no exception ok 8254 - exists $vrgbl->[$lex][0]{foo}: value ok 8255 - delete $vrgbl->[$lex][0]{foo}: no exception ok 8256 - delete $vrgbl->[$lex][0]{foo}: value ok 8257 - $vlex[$gbl][0]{foo}: no exception ok 8258 - $vlex[$gbl][0]{foo}: value ok 8259 - $vlex[$gbl][0]{foo} = 123: no exception ok 8260 - $vlex[$gbl][0]{foo} = 123: value ok 8261 - exists $vlex[$gbl][0]{foo}: no exception ok 8262 - exists $vlex[$gbl][0]{foo}: value ok 8263 - delete $vlex[$gbl][0]{foo}: no exception ok 8264 - delete $vlex[$gbl][0]{foo}: value ok 8265 - $vgbl[$gbl][0]{foo}: no exception ok 8266 - $vgbl[$gbl][0]{foo}: value ok 8267 - $vgbl[$gbl][0]{foo} = 123: no exception ok 8268 - $vgbl[$gbl][0]{foo} = 123: value ok 8269 - exists $vgbl[$gbl][0]{foo}: no exception ok 8270 - exists $vgbl[$gbl][0]{foo}: value ok 8271 - delete $vgbl[$gbl][0]{foo}: no exception ok 8272 - delete $vgbl[$gbl][0]{foo}: value ok 8273 - $vrlex->[$gbl][0]{foo}: no exception ok 8274 - $vrlex->[$gbl][0]{foo}: value ok 8275 - $vrlex->[$gbl][0]{foo} = 123: no exception ok 8276 - $vrlex->[$gbl][0]{foo} = 123: value ok 8277 - exists $vrlex->[$gbl][0]{foo}: no exception ok 8278 - exists $vrlex->[$gbl][0]{foo}: value ok 8279 - delete $vrlex->[$gbl][0]{foo}: no exception ok 8280 - delete $vrlex->[$gbl][0]{foo}: value ok 8281 - $vrgbl->[$gbl][0]{foo}: no exception ok 8282 - $vrgbl->[$gbl][0]{foo}: value ok 8283 - $vrgbl->[$gbl][0]{foo} = 123: no exception ok 8284 - $vrgbl->[$gbl][0]{foo} = 123: value ok 8285 - exists $vrgbl->[$gbl][0]{foo}: no exception ok 8286 - exists $vrgbl->[$gbl][0]{foo}: value ok 8287 - delete $vrgbl->[$gbl][0]{foo}: no exception ok 8288 - delete $vrgbl->[$gbl][0]{foo}: value ok 8289 - $vlex[$lex+1][0]{foo}: no exception ok 8290 - $vlex[$lex+1][0]{foo}: value ok 8291 - $vlex[$lex+1][0]{foo} = 123: no exception ok 8292 - $vlex[$lex+1][0]{foo} = 123: value ok 8293 - exists $vlex[$lex+1][0]{foo}: no exception ok 8294 - exists $vlex[$lex+1][0]{foo}: value ok 8295 - delete $vlex[$lex+1][0]{foo}: no exception ok 8296 - delete $vlex[$lex+1][0]{foo}: value ok 8297 - $vgbl[$lex+1][0]{foo}: no exception ok 8298 - $vgbl[$lex+1][0]{foo}: value ok 8299 - $vgbl[$lex+1][0]{foo} = 123: no exception ok 8300 - $vgbl[$lex+1][0]{foo} = 123: value ok 8301 - exists $vgbl[$lex+1][0]{foo}: no exception ok 8302 - exists $vgbl[$lex+1][0]{foo}: value ok 8303 - delete $vgbl[$lex+1][0]{foo}: no exception ok 8304 - delete $vgbl[$lex+1][0]{foo}: value ok 8305 - $vrlex->[$lex+1][0]{foo}: no exception ok 8306 - $vrlex->[$lex+1][0]{foo}: value ok 8307 - $vrlex->[$lex+1][0]{foo} = 123: no exception ok 8308 - $vrlex->[$lex+1][0]{foo} = 123: value ok 8309 - exists $vrlex->[$lex+1][0]{foo}: no exception ok 8310 - exists $vrlex->[$lex+1][0]{foo}: value ok 8311 - delete $vrlex->[$lex+1][0]{foo}: no exception ok 8312 - delete $vrlex->[$lex+1][0]{foo}: value ok 8313 - $vrgbl->[$lex+1][0]{foo}: no exception ok 8314 - $vrgbl->[$lex+1][0]{foo}: value ok 8315 - $vrgbl->[$lex+1][0]{foo} = 123: no exception ok 8316 - $vrgbl->[$lex+1][0]{foo} = 123: value ok 8317 - exists $vrgbl->[$lex+1][0]{foo}: no exception ok 8318 - exists $vrgbl->[$lex+1][0]{foo}: value ok 8319 - delete $vrgbl->[$lex+1][0]{foo}: no exception ok 8320 - delete $vrgbl->[$lex+1][0]{foo}: value ok 8321 - $vlex{foo}[0]{foo}: no exception ok 8322 - $vlex{foo}[0]{foo}: value ok 8323 - $vlex{foo}[0]{foo} = 123: no exception ok 8324 - $vlex{foo}[0]{foo} = 123: value ok 8325 - exists $vlex{foo}[0]{foo}: no exception ok 8326 - exists $vlex{foo}[0]{foo}: value ok 8327 - delete $vlex{foo}[0]{foo}: no exception ok 8328 - delete $vlex{foo}[0]{foo}: value ok 8329 - $vgbl{foo}[0]{foo}: no exception ok 8330 - $vgbl{foo}[0]{foo}: value ok 8331 - $vgbl{foo}[0]{foo} = 123: no exception ok 8332 - $vgbl{foo}[0]{foo} = 123: value ok 8333 - exists $vgbl{foo}[0]{foo}: no exception ok 8334 - exists $vgbl{foo}[0]{foo}: value ok 8335 - delete $vgbl{foo}[0]{foo}: no exception ok 8336 - delete $vgbl{foo}[0]{foo}: value ok 8337 - $vrlex->{foo}[0]{foo}: no exception ok 8338 - $vrlex->{foo}[0]{foo}: value ok 8339 - $vrlex->{foo}[0]{foo} = 123: no exception ok 8340 - $vrlex->{foo}[0]{foo} = 123: value ok 8341 - exists $vrlex->{foo}[0]{foo}: no exception ok 8342 - exists $vrlex->{foo}[0]{foo}: value ok 8343 - delete $vrlex->{foo}[0]{foo}: no exception ok 8344 - delete $vrlex->{foo}[0]{foo}: value ok 8345 - $vrgbl->{foo}[0]{foo}: no exception ok 8346 - $vrgbl->{foo}[0]{foo}: value ok 8347 - $vrgbl->{foo}[0]{foo} = 123: no exception ok 8348 - $vrgbl->{foo}[0]{foo} = 123: value ok 8349 - exists $vrgbl->{foo}[0]{foo}: no exception ok 8350 - exists $vrgbl->{foo}[0]{foo}: value ok 8351 - delete $vrgbl->{foo}[0]{foo}: no exception ok 8352 - delete $vrgbl->{foo}[0]{foo}: value ok 8353 - $vlex{$lex}[0]{foo}: no exception ok 8354 - $vlex{$lex}[0]{foo}: value ok 8355 - $vlex{$lex}[0]{foo} = 123: no exception ok 8356 - $vlex{$lex}[0]{foo} = 123: value ok 8357 - exists $vlex{$lex}[0]{foo}: no exception ok 8358 - exists $vlex{$lex}[0]{foo}: value ok 8359 - delete $vlex{$lex}[0]{foo}: no exception ok 8360 - delete $vlex{$lex}[0]{foo}: value ok 8361 - $vgbl{$lex}[0]{foo}: no exception ok 8362 - $vgbl{$lex}[0]{foo}: value ok 8363 - $vgbl{$lex}[0]{foo} = 123: no exception ok 8364 - $vgbl{$lex}[0]{foo} = 123: value ok 8365 - exists $vgbl{$lex}[0]{foo}: no exception ok 8366 - exists $vgbl{$lex}[0]{foo}: value ok 8367 - delete $vgbl{$lex}[0]{foo}: no exception ok 8368 - delete $vgbl{$lex}[0]{foo}: value ok 8369 - $vrlex->{$lex}[0]{foo}: no exception ok 8370 - $vrlex->{$lex}[0]{foo}: value ok 8371 - $vrlex->{$lex}[0]{foo} = 123: no exception ok 8372 - $vrlex->{$lex}[0]{foo} = 123: value ok 8373 - exists $vrlex->{$lex}[0]{foo}: no exception ok 8374 - exists $vrlex->{$lex}[0]{foo}: value ok 8375 - delete $vrlex->{$lex}[0]{foo}: no exception ok 8376 - delete $vrlex->{$lex}[0]{foo}: value ok 8377 - $vrgbl->{$lex}[0]{foo}: no exception ok 8378 - $vrgbl->{$lex}[0]{foo}: value ok 8379 - $vrgbl->{$lex}[0]{foo} = 123: no exception ok 8380 - $vrgbl->{$lex}[0]{foo} = 123: value ok 8381 - exists $vrgbl->{$lex}[0]{foo}: no exception ok 8382 - exists $vrgbl->{$lex}[0]{foo}: value ok 8383 - delete $vrgbl->{$lex}[0]{foo}: no exception ok 8384 - delete $vrgbl->{$lex}[0]{foo}: value ok 8385 - $vlex{$gbl}[0]{foo}: no exception ok 8386 - $vlex{$gbl}[0]{foo}: value ok 8387 - $vlex{$gbl}[0]{foo} = 123: no exception ok 8388 - $vlex{$gbl}[0]{foo} = 123: value ok 8389 - exists $vlex{$gbl}[0]{foo}: no exception ok 8390 - exists $vlex{$gbl}[0]{foo}: value ok 8391 - delete $vlex{$gbl}[0]{foo}: no exception ok 8392 - delete $vlex{$gbl}[0]{foo}: value ok 8393 - $vgbl{$gbl}[0]{foo}: no exception ok 8394 - $vgbl{$gbl}[0]{foo}: value ok 8395 - $vgbl{$gbl}[0]{foo} = 123: no exception ok 8396 - $vgbl{$gbl}[0]{foo} = 123: value ok 8397 - exists $vgbl{$gbl}[0]{foo}: no exception ok 8398 - exists $vgbl{$gbl}[0]{foo}: value ok 8399 - delete $vgbl{$gbl}[0]{foo}: no exception ok 8400 - delete $vgbl{$gbl}[0]{foo}: value ok 8401 - $vrlex->{$gbl}[0]{foo}: no exception ok 8402 - $vrlex->{$gbl}[0]{foo}: value ok 8403 - $vrlex->{$gbl}[0]{foo} = 123: no exception ok 8404 - $vrlex->{$gbl}[0]{foo} = 123: value ok 8405 - exists $vrlex->{$gbl}[0]{foo}: no exception ok 8406 - exists $vrlex->{$gbl}[0]{foo}: value ok 8407 - delete $vrlex->{$gbl}[0]{foo}: no exception ok 8408 - delete $vrlex->{$gbl}[0]{foo}: value ok 8409 - $vrgbl->{$gbl}[0]{foo}: no exception ok 8410 - $vrgbl->{$gbl}[0]{foo}: value ok 8411 - $vrgbl->{$gbl}[0]{foo} = 123: no exception ok 8412 - $vrgbl->{$gbl}[0]{foo} = 123: value ok 8413 - exists $vrgbl->{$gbl}[0]{foo}: no exception ok 8414 - exists $vrgbl->{$gbl}[0]{foo}: value ok 8415 - delete $vrgbl->{$gbl}[0]{foo}: no exception ok 8416 - delete $vrgbl->{$gbl}[0]{foo}: value ok 8417 - $vlex{"x$lex"}[0]{foo}: no exception ok 8418 - $vlex{"x$lex"}[0]{foo}: value ok 8419 - $vlex{"x$lex"}[0]{foo} = 123: no exception ok 8420 - $vlex{"x$lex"}[0]{foo} = 123: value ok 8421 - exists $vlex{"x$lex"}[0]{foo}: no exception ok 8422 - exists $vlex{"x$lex"}[0]{foo}: value ok 8423 - delete $vlex{"x$lex"}[0]{foo}: no exception ok 8424 - delete $vlex{"x$lex"}[0]{foo}: value ok 8425 - $vgbl{"x$lex"}[0]{foo}: no exception ok 8426 - $vgbl{"x$lex"}[0]{foo}: value ok 8427 - $vgbl{"x$lex"}[0]{foo} = 123: no exception ok 8428 - $vgbl{"x$lex"}[0]{foo} = 123: value ok 8429 - exists $vgbl{"x$lex"}[0]{foo}: no exception ok 8430 - exists $vgbl{"x$lex"}[0]{foo}: value ok 8431 - delete $vgbl{"x$lex"}[0]{foo}: no exception ok 8432 - delete $vgbl{"x$lex"}[0]{foo}: value ok 8433 - $vrlex->{"x$lex"}[0]{foo}: no exception ok 8434 - $vrlex->{"x$lex"}[0]{foo}: value ok 8435 - $vrlex->{"x$lex"}[0]{foo} = 123: no exception ok 8436 - $vrlex->{"x$lex"}[0]{foo} = 123: value ok 8437 - exists $vrlex->{"x$lex"}[0]{foo}: no exception ok 8438 - exists $vrlex->{"x$lex"}[0]{foo}: value ok 8439 - delete $vrlex->{"x$lex"}[0]{foo}: no exception ok 8440 - delete $vrlex->{"x$lex"}[0]{foo}: value ok 8441 - $vrgbl->{"x$lex"}[0]{foo}: no exception ok 8442 - $vrgbl->{"x$lex"}[0]{foo}: value ok 8443 - $vrgbl->{"x$lex"}[0]{foo} = 123: no exception ok 8444 - $vrgbl->{"x$lex"}[0]{foo} = 123: value ok 8445 - exists $vrgbl->{"x$lex"}[0]{foo}: no exception ok 8446 - exists $vrgbl->{"x$lex"}[0]{foo}: value ok 8447 - delete $vrgbl->{"x$lex"}[0]{foo}: no exception ok 8448 - delete $vrgbl->{"x$lex"}[0]{foo}: value ok 8449 - $vlex[0][$lex]{foo}: no exception ok 8450 - $vlex[0][$lex]{foo}: value ok 8451 - $vlex[0][$lex]{foo} = 123: no exception ok 8452 - $vlex[0][$lex]{foo} = 123: value ok 8453 - exists $vlex[0][$lex]{foo}: no exception ok 8454 - exists $vlex[0][$lex]{foo}: value ok 8455 - delete $vlex[0][$lex]{foo}: no exception ok 8456 - delete $vlex[0][$lex]{foo}: value ok 8457 - $vgbl[0][$lex]{foo}: no exception ok 8458 - $vgbl[0][$lex]{foo}: value ok 8459 - $vgbl[0][$lex]{foo} = 123: no exception ok 8460 - $vgbl[0][$lex]{foo} = 123: value ok 8461 - exists $vgbl[0][$lex]{foo}: no exception ok 8462 - exists $vgbl[0][$lex]{foo}: value ok 8463 - delete $vgbl[0][$lex]{foo}: no exception ok 8464 - delete $vgbl[0][$lex]{foo}: value ok 8465 - $vrlex->[0][$lex]{foo}: no exception ok 8466 - $vrlex->[0][$lex]{foo}: value ok 8467 - $vrlex->[0][$lex]{foo} = 123: no exception ok 8468 - $vrlex->[0][$lex]{foo} = 123: value ok 8469 - exists $vrlex->[0][$lex]{foo}: no exception ok 8470 - exists $vrlex->[0][$lex]{foo}: value ok 8471 - delete $vrlex->[0][$lex]{foo}: no exception ok 8472 - delete $vrlex->[0][$lex]{foo}: value ok 8473 - $vrgbl->[0][$lex]{foo}: no exception ok 8474 - $vrgbl->[0][$lex]{foo}: value ok 8475 - $vrgbl->[0][$lex]{foo} = 123: no exception ok 8476 - $vrgbl->[0][$lex]{foo} = 123: value ok 8477 - exists $vrgbl->[0][$lex]{foo}: no exception ok 8478 - exists $vrgbl->[0][$lex]{foo}: value ok 8479 - delete $vrgbl->[0][$lex]{foo}: no exception ok 8480 - delete $vrgbl->[0][$lex]{foo}: value ok 8481 - $vlex[$lex][$lex]{foo}: no exception ok 8482 - $vlex[$lex][$lex]{foo}: value ok 8483 - $vlex[$lex][$lex]{foo} = 123: no exception ok 8484 - $vlex[$lex][$lex]{foo} = 123: value ok 8485 - exists $vlex[$lex][$lex]{foo}: no exception ok 8486 - exists $vlex[$lex][$lex]{foo}: value ok 8487 - delete $vlex[$lex][$lex]{foo}: no exception ok 8488 - delete $vlex[$lex][$lex]{foo}: value ok 8489 - $vgbl[$lex][$lex]{foo}: no exception ok 8490 - $vgbl[$lex][$lex]{foo}: value ok 8491 - $vgbl[$lex][$lex]{foo} = 123: no exception ok 8492 - $vgbl[$lex][$lex]{foo} = 123: value ok 8493 - exists $vgbl[$lex][$lex]{foo}: no exception ok 8494 - exists $vgbl[$lex][$lex]{foo}: value ok 8495 - delete $vgbl[$lex][$lex]{foo}: no exception ok 8496 - delete $vgbl[$lex][$lex]{foo}: value ok 8497 - $vrlex->[$lex][$lex]{foo}: no exception ok 8498 - $vrlex->[$lex][$lex]{foo}: value ok 8499 - $vrlex->[$lex][$lex]{foo} = 123: no exception ok 8500 - $vrlex->[$lex][$lex]{foo} = 123: value ok 8501 - exists $vrlex->[$lex][$lex]{foo}: no exception ok 8502 - exists $vrlex->[$lex][$lex]{foo}: value ok 8503 - delete $vrlex->[$lex][$lex]{foo}: no exception ok 8504 - delete $vrlex->[$lex][$lex]{foo}: value ok 8505 - $vrgbl->[$lex][$lex]{foo}: no exception ok 8506 - $vrgbl->[$lex][$lex]{foo}: value ok 8507 - $vrgbl->[$lex][$lex]{foo} = 123: no exception ok 8508 - $vrgbl->[$lex][$lex]{foo} = 123: value ok 8509 - exists $vrgbl->[$lex][$lex]{foo}: no exception ok 8510 - exists $vrgbl->[$lex][$lex]{foo}: value ok 8511 - delete $vrgbl->[$lex][$lex]{foo}: no exception ok 8512 - delete $vrgbl->[$lex][$lex]{foo}: value ok 8513 - $vlex[$gbl][$lex]{foo}: no exception ok 8514 - $vlex[$gbl][$lex]{foo}: value ok 8515 - $vlex[$gbl][$lex]{foo} = 123: no exception ok 8516 - $vlex[$gbl][$lex]{foo} = 123: value ok 8517 - exists $vlex[$gbl][$lex]{foo}: no exception ok 8518 - exists $vlex[$gbl][$lex]{foo}: value ok 8519 - delete $vlex[$gbl][$lex]{foo}: no exception ok 8520 - delete $vlex[$gbl][$lex]{foo}: value ok 8521 - $vgbl[$gbl][$lex]{foo}: no exception ok 8522 - $vgbl[$gbl][$lex]{foo}: value ok 8523 - $vgbl[$gbl][$lex]{foo} = 123: no exception ok 8524 - $vgbl[$gbl][$lex]{foo} = 123: value ok 8525 - exists $vgbl[$gbl][$lex]{foo}: no exception ok 8526 - exists $vgbl[$gbl][$lex]{foo}: value ok 8527 - delete $vgbl[$gbl][$lex]{foo}: no exception ok 8528 - delete $vgbl[$gbl][$lex]{foo}: value ok 8529 - $vrlex->[$gbl][$lex]{foo}: no exception ok 8530 - $vrlex->[$gbl][$lex]{foo}: value ok 8531 - $vrlex->[$gbl][$lex]{foo} = 123: no exception ok 8532 - $vrlex->[$gbl][$lex]{foo} = 123: value ok 8533 - exists $vrlex->[$gbl][$lex]{foo}: no exception ok 8534 - exists $vrlex->[$gbl][$lex]{foo}: value ok 8535 - delete $vrlex->[$gbl][$lex]{foo}: no exception ok 8536 - delete $vrlex->[$gbl][$lex]{foo}: value ok 8537 - $vrgbl->[$gbl][$lex]{foo}: no exception ok 8538 - $vrgbl->[$gbl][$lex]{foo}: value ok 8539 - $vrgbl->[$gbl][$lex]{foo} = 123: no exception ok 8540 - $vrgbl->[$gbl][$lex]{foo} = 123: value ok 8541 - exists $vrgbl->[$gbl][$lex]{foo}: no exception ok 8542 - exists $vrgbl->[$gbl][$lex]{foo}: value ok 8543 - delete $vrgbl->[$gbl][$lex]{foo}: no exception ok 8544 - delete $vrgbl->[$gbl][$lex]{foo}: value ok 8545 - $vlex[$lex+1][$lex]{foo}: no exception ok 8546 - $vlex[$lex+1][$lex]{foo}: value ok 8547 - $vlex[$lex+1][$lex]{foo} = 123: no exception ok 8548 - $vlex[$lex+1][$lex]{foo} = 123: value ok 8549 - exists $vlex[$lex+1][$lex]{foo}: no exception ok 8550 - exists $vlex[$lex+1][$lex]{foo}: value ok 8551 - delete $vlex[$lex+1][$lex]{foo}: no exception ok 8552 - delete $vlex[$lex+1][$lex]{foo}: value ok 8553 - $vgbl[$lex+1][$lex]{foo}: no exception ok 8554 - $vgbl[$lex+1][$lex]{foo}: value ok 8555 - $vgbl[$lex+1][$lex]{foo} = 123: no exception ok 8556 - $vgbl[$lex+1][$lex]{foo} = 123: value ok 8557 - exists $vgbl[$lex+1][$lex]{foo}: no exception ok 8558 - exists $vgbl[$lex+1][$lex]{foo}: value ok 8559 - delete $vgbl[$lex+1][$lex]{foo}: no exception ok 8560 - delete $vgbl[$lex+1][$lex]{foo}: value ok 8561 - $vrlex->[$lex+1][$lex]{foo}: no exception ok 8562 - $vrlex->[$lex+1][$lex]{foo}: value ok 8563 - $vrlex->[$lex+1][$lex]{foo} = 123: no exception ok 8564 - $vrlex->[$lex+1][$lex]{foo} = 123: value ok 8565 - exists $vrlex->[$lex+1][$lex]{foo}: no exception ok 8566 - exists $vrlex->[$lex+1][$lex]{foo}: value ok 8567 - delete $vrlex->[$lex+1][$lex]{foo}: no exception ok 8568 - delete $vrlex->[$lex+1][$lex]{foo}: value ok 8569 - $vrgbl->[$lex+1][$lex]{foo}: no exception ok 8570 - $vrgbl->[$lex+1][$lex]{foo}: value ok 8571 - $vrgbl->[$lex+1][$lex]{foo} = 123: no exception ok 8572 - $vrgbl->[$lex+1][$lex]{foo} = 123: value ok 8573 - exists $vrgbl->[$lex+1][$lex]{foo}: no exception ok 8574 - exists $vrgbl->[$lex+1][$lex]{foo}: value ok 8575 - delete $vrgbl->[$lex+1][$lex]{foo}: no exception ok 8576 - delete $vrgbl->[$lex+1][$lex]{foo}: value ok 8577 - $vlex{foo}[$lex]{foo}: no exception ok 8578 - $vlex{foo}[$lex]{foo}: value ok 8579 - $vlex{foo}[$lex]{foo} = 123: no exception ok 8580 - $vlex{foo}[$lex]{foo} = 123: value ok 8581 - exists $vlex{foo}[$lex]{foo}: no exception ok 8582 - exists $vlex{foo}[$lex]{foo}: value ok 8583 - delete $vlex{foo}[$lex]{foo}: no exception ok 8584 - delete $vlex{foo}[$lex]{foo}: value ok 8585 - $vgbl{foo}[$lex]{foo}: no exception ok 8586 - $vgbl{foo}[$lex]{foo}: value ok 8587 - $vgbl{foo}[$lex]{foo} = 123: no exception ok 8588 - $vgbl{foo}[$lex]{foo} = 123: value ok 8589 - exists $vgbl{foo}[$lex]{foo}: no exception ok 8590 - exists $vgbl{foo}[$lex]{foo}: value ok 8591 - delete $vgbl{foo}[$lex]{foo}: no exception ok 8592 - delete $vgbl{foo}[$lex]{foo}: value ok 8593 - $vrlex->{foo}[$lex]{foo}: no exception ok 8594 - $vrlex->{foo}[$lex]{foo}: value ok 8595 - $vrlex->{foo}[$lex]{foo} = 123: no exception ok 8596 - $vrlex->{foo}[$lex]{foo} = 123: value ok 8597 - exists $vrlex->{foo}[$lex]{foo}: no exception ok 8598 - exists $vrlex->{foo}[$lex]{foo}: value ok 8599 - delete $vrlex->{foo}[$lex]{foo}: no exception ok 8600 - delete $vrlex->{foo}[$lex]{foo}: value ok 8601 - $vrgbl->{foo}[$lex]{foo}: no exception ok 8602 - $vrgbl->{foo}[$lex]{foo}: value ok 8603 - $vrgbl->{foo}[$lex]{foo} = 123: no exception ok 8604 - $vrgbl->{foo}[$lex]{foo} = 123: value ok 8605 - exists $vrgbl->{foo}[$lex]{foo}: no exception ok 8606 - exists $vrgbl->{foo}[$lex]{foo}: value ok 8607 - delete $vrgbl->{foo}[$lex]{foo}: no exception ok 8608 - delete $vrgbl->{foo}[$lex]{foo}: value ok 8609 - $vlex{$lex}[$lex]{foo}: no exception ok 8610 - $vlex{$lex}[$lex]{foo}: value ok 8611 - $vlex{$lex}[$lex]{foo} = 123: no exception ok 8612 - $vlex{$lex}[$lex]{foo} = 123: value ok 8613 - exists $vlex{$lex}[$lex]{foo}: no exception ok 8614 - exists $vlex{$lex}[$lex]{foo}: value ok 8615 - delete $vlex{$lex}[$lex]{foo}: no exception ok 8616 - delete $vlex{$lex}[$lex]{foo}: value ok 8617 - $vgbl{$lex}[$lex]{foo}: no exception ok 8618 - $vgbl{$lex}[$lex]{foo}: value ok 8619 - $vgbl{$lex}[$lex]{foo} = 123: no exception ok 8620 - $vgbl{$lex}[$lex]{foo} = 123: value ok 8621 - exists $vgbl{$lex}[$lex]{foo}: no exception ok 8622 - exists $vgbl{$lex}[$lex]{foo}: value ok 8623 - delete $vgbl{$lex}[$lex]{foo}: no exception ok 8624 - delete $vgbl{$lex}[$lex]{foo}: value ok 8625 - $vrlex->{$lex}[$lex]{foo}: no exception ok 8626 - $vrlex->{$lex}[$lex]{foo}: value ok 8627 - $vrlex->{$lex}[$lex]{foo} = 123: no exception ok 8628 - $vrlex->{$lex}[$lex]{foo} = 123: value ok 8629 - exists $vrlex->{$lex}[$lex]{foo}: no exception ok 8630 - exists $vrlex->{$lex}[$lex]{foo}: value ok 8631 - delete $vrlex->{$lex}[$lex]{foo}: no exception ok 8632 - delete $vrlex->{$lex}[$lex]{foo}: value ok 8633 - $vrgbl->{$lex}[$lex]{foo}: no exception ok 8634 - $vrgbl->{$lex}[$lex]{foo}: value ok 8635 - $vrgbl->{$lex}[$lex]{foo} = 123: no exception ok 8636 - $vrgbl->{$lex}[$lex]{foo} = 123: value ok 8637 - exists $vrgbl->{$lex}[$lex]{foo}: no exception ok 8638 - exists $vrgbl->{$lex}[$lex]{foo}: value ok 8639 - delete $vrgbl->{$lex}[$lex]{foo}: no exception ok 8640 - delete $vrgbl->{$lex}[$lex]{foo}: value ok 8641 - $vlex{$gbl}[$lex]{foo}: no exception ok 8642 - $vlex{$gbl}[$lex]{foo}: value ok 8643 - $vlex{$gbl}[$lex]{foo} = 123: no exception ok 8644 - $vlex{$gbl}[$lex]{foo} = 123: value ok 8645 - exists $vlex{$gbl}[$lex]{foo}: no exception ok 8646 - exists $vlex{$gbl}[$lex]{foo}: value ok 8647 - delete $vlex{$gbl}[$lex]{foo}: no exception ok 8648 - delete $vlex{$gbl}[$lex]{foo}: value ok 8649 - $vgbl{$gbl}[$lex]{foo}: no exception ok 8650 - $vgbl{$gbl}[$lex]{foo}: value ok 8651 - $vgbl{$gbl}[$lex]{foo} = 123: no exception ok 8652 - $vgbl{$gbl}[$lex]{foo} = 123: value ok 8653 - exists $vgbl{$gbl}[$lex]{foo}: no exception ok 8654 - exists $vgbl{$gbl}[$lex]{foo}: value ok 8655 - delete $vgbl{$gbl}[$lex]{foo}: no exception ok 8656 - delete $vgbl{$gbl}[$lex]{foo}: value ok 8657 - $vrlex->{$gbl}[$lex]{foo}: no exception ok 8658 - $vrlex->{$gbl}[$lex]{foo}: value ok 8659 - $vrlex->{$gbl}[$lex]{foo} = 123: no exception ok 8660 - $vrlex->{$gbl}[$lex]{foo} = 123: value ok 8661 - exists $vrlex->{$gbl}[$lex]{foo}: no exception ok 8662 - exists $vrlex->{$gbl}[$lex]{foo}: value ok 8663 - delete $vrlex->{$gbl}[$lex]{foo}: no exception ok 8664 - delete $vrlex->{$gbl}[$lex]{foo}: value ok 8665 - $vrgbl->{$gbl}[$lex]{foo}: no exception ok 8666 - $vrgbl->{$gbl}[$lex]{foo}: value ok 8667 - $vrgbl->{$gbl}[$lex]{foo} = 123: no exception ok 8668 - $vrgbl->{$gbl}[$lex]{foo} = 123: value ok 8669 - exists $vrgbl->{$gbl}[$lex]{foo}: no exception ok 8670 - exists $vrgbl->{$gbl}[$lex]{foo}: value ok 8671 - delete $vrgbl->{$gbl}[$lex]{foo}: no exception ok 8672 - delete $vrgbl->{$gbl}[$lex]{foo}: value ok 8673 - $vlex{"x$lex"}[$lex]{foo}: no exception ok 8674 - $vlex{"x$lex"}[$lex]{foo}: value ok 8675 - $vlex{"x$lex"}[$lex]{foo} = 123: no exception ok 8676 - $vlex{"x$lex"}[$lex]{foo} = 123: value ok 8677 - exists $vlex{"x$lex"}[$lex]{foo}: no exception ok 8678 - exists $vlex{"x$lex"}[$lex]{foo}: value ok 8679 - delete $vlex{"x$lex"}[$lex]{foo}: no exception ok 8680 - delete $vlex{"x$lex"}[$lex]{foo}: value ok 8681 - $vgbl{"x$lex"}[$lex]{foo}: no exception ok 8682 - $vgbl{"x$lex"}[$lex]{foo}: value ok 8683 - $vgbl{"x$lex"}[$lex]{foo} = 123: no exception ok 8684 - $vgbl{"x$lex"}[$lex]{foo} = 123: value ok 8685 - exists $vgbl{"x$lex"}[$lex]{foo}: no exception ok 8686 - exists $vgbl{"x$lex"}[$lex]{foo}: value ok 8687 - delete $vgbl{"x$lex"}[$lex]{foo}: no exception ok 8688 - delete $vgbl{"x$lex"}[$lex]{foo}: value ok 8689 - $vrlex->{"x$lex"}[$lex]{foo}: no exception ok 8690 - $vrlex->{"x$lex"}[$lex]{foo}: value ok 8691 - $vrlex->{"x$lex"}[$lex]{foo} = 123: no exception ok 8692 - $vrlex->{"x$lex"}[$lex]{foo} = 123: value ok 8693 - exists $vrlex->{"x$lex"}[$lex]{foo}: no exception ok 8694 - exists $vrlex->{"x$lex"}[$lex]{foo}: value ok 8695 - delete $vrlex->{"x$lex"}[$lex]{foo}: no exception ok 8696 - delete $vrlex->{"x$lex"}[$lex]{foo}: value ok 8697 - $vrgbl->{"x$lex"}[$lex]{foo}: no exception ok 8698 - $vrgbl->{"x$lex"}[$lex]{foo}: value ok 8699 - $vrgbl->{"x$lex"}[$lex]{foo} = 123: no exception ok 8700 - $vrgbl->{"x$lex"}[$lex]{foo} = 123: value ok 8701 - exists $vrgbl->{"x$lex"}[$lex]{foo}: no exception ok 8702 - exists $vrgbl->{"x$lex"}[$lex]{foo}: value ok 8703 - delete $vrgbl->{"x$lex"}[$lex]{foo}: no exception ok 8704 - delete $vrgbl->{"x$lex"}[$lex]{foo}: value ok 8705 - $vlex[0][$gbl]{foo}: no exception ok 8706 - $vlex[0][$gbl]{foo}: value ok 8707 - $vlex[0][$gbl]{foo} = 123: no exception ok 8708 - $vlex[0][$gbl]{foo} = 123: value ok 8709 - exists $vlex[0][$gbl]{foo}: no exception ok 8710 - exists $vlex[0][$gbl]{foo}: value ok 8711 - delete $vlex[0][$gbl]{foo}: no exception ok 8712 - delete $vlex[0][$gbl]{foo}: value ok 8713 - $vgbl[0][$gbl]{foo}: no exception ok 8714 - $vgbl[0][$gbl]{foo}: value ok 8715 - $vgbl[0][$gbl]{foo} = 123: no exception ok 8716 - $vgbl[0][$gbl]{foo} = 123: value ok 8717 - exists $vgbl[0][$gbl]{foo}: no exception ok 8718 - exists $vgbl[0][$gbl]{foo}: value ok 8719 - delete $vgbl[0][$gbl]{foo}: no exception ok 8720 - delete $vgbl[0][$gbl]{foo}: value ok 8721 - $vrlex->[0][$gbl]{foo}: no exception ok 8722 - $vrlex->[0][$gbl]{foo}: value ok 8723 - $vrlex->[0][$gbl]{foo} = 123: no exception ok 8724 - $vrlex->[0][$gbl]{foo} = 123: value ok 8725 - exists $vrlex->[0][$gbl]{foo}: no exception ok 8726 - exists $vrlex->[0][$gbl]{foo}: value ok 8727 - delete $vrlex->[0][$gbl]{foo}: no exception ok 8728 - delete $vrlex->[0][$gbl]{foo}: value ok 8729 - $vrgbl->[0][$gbl]{foo}: no exception ok 8730 - $vrgbl->[0][$gbl]{foo}: value ok 8731 - $vrgbl->[0][$gbl]{foo} = 123: no exception ok 8732 - $vrgbl->[0][$gbl]{foo} = 123: value ok 8733 - exists $vrgbl->[0][$gbl]{foo}: no exception ok 8734 - exists $vrgbl->[0][$gbl]{foo}: value ok 8735 - delete $vrgbl->[0][$gbl]{foo}: no exception ok 8736 - delete $vrgbl->[0][$gbl]{foo}: value ok 8737 - $vlex[$lex][$gbl]{foo}: no exception ok 8738 - $vlex[$lex][$gbl]{foo}: value ok 8739 - $vlex[$lex][$gbl]{foo} = 123: no exception ok 8740 - $vlex[$lex][$gbl]{foo} = 123: value ok 8741 - exists $vlex[$lex][$gbl]{foo}: no exception ok 8742 - exists $vlex[$lex][$gbl]{foo}: value ok 8743 - delete $vlex[$lex][$gbl]{foo}: no exception ok 8744 - delete $vlex[$lex][$gbl]{foo}: value ok 8745 - $vgbl[$lex][$gbl]{foo}: no exception ok 8746 - $vgbl[$lex][$gbl]{foo}: value ok 8747 - $vgbl[$lex][$gbl]{foo} = 123: no exception ok 8748 - $vgbl[$lex][$gbl]{foo} = 123: value ok 8749 - exists $vgbl[$lex][$gbl]{foo}: no exception ok 8750 - exists $vgbl[$lex][$gbl]{foo}: value ok 8751 - delete $vgbl[$lex][$gbl]{foo}: no exception ok 8752 - delete $vgbl[$lex][$gbl]{foo}: value ok 8753 - $vrlex->[$lex][$gbl]{foo}: no exception ok 8754 - $vrlex->[$lex][$gbl]{foo}: value ok 8755 - $vrlex->[$lex][$gbl]{foo} = 123: no exception ok 8756 - $vrlex->[$lex][$gbl]{foo} = 123: value ok 8757 - exists $vrlex->[$lex][$gbl]{foo}: no exception ok 8758 - exists $vrlex->[$lex][$gbl]{foo}: value ok 8759 - delete $vrlex->[$lex][$gbl]{foo}: no exception ok 8760 - delete $vrlex->[$lex][$gbl]{foo}: value ok 8761 - $vrgbl->[$lex][$gbl]{foo}: no exception ok 8762 - $vrgbl->[$lex][$gbl]{foo}: value ok 8763 - $vrgbl->[$lex][$gbl]{foo} = 123: no exception ok 8764 - $vrgbl->[$lex][$gbl]{foo} = 123: value ok 8765 - exists $vrgbl->[$lex][$gbl]{foo}: no exception ok 8766 - exists $vrgbl->[$lex][$gbl]{foo}: value ok 8767 - delete $vrgbl->[$lex][$gbl]{foo}: no exception ok 8768 - delete $vrgbl->[$lex][$gbl]{foo}: value ok 8769 - $vlex[$gbl][$gbl]{foo}: no exception ok 8770 - $vlex[$gbl][$gbl]{foo}: value ok 8771 - $vlex[$gbl][$gbl]{foo} = 123: no exception ok 8772 - $vlex[$gbl][$gbl]{foo} = 123: value ok 8773 - exists $vlex[$gbl][$gbl]{foo}: no exception ok 8774 - exists $vlex[$gbl][$gbl]{foo}: value ok 8775 - delete $vlex[$gbl][$gbl]{foo}: no exception ok 8776 - delete $vlex[$gbl][$gbl]{foo}: value ok 8777 - $vgbl[$gbl][$gbl]{foo}: no exception ok 8778 - $vgbl[$gbl][$gbl]{foo}: value ok 8779 - $vgbl[$gbl][$gbl]{foo} = 123: no exception ok 8780 - $vgbl[$gbl][$gbl]{foo} = 123: value ok 8781 - exists $vgbl[$gbl][$gbl]{foo}: no exception ok 8782 - exists $vgbl[$gbl][$gbl]{foo}: value ok 8783 - delete $vgbl[$gbl][$gbl]{foo}: no exception ok 8784 - delete $vgbl[$gbl][$gbl]{foo}: value ok 8785 - $vrlex->[$gbl][$gbl]{foo}: no exception ok 8786 - $vrlex->[$gbl][$gbl]{foo}: value ok 8787 - $vrlex->[$gbl][$gbl]{foo} = 123: no exception ok 8788 - $vrlex->[$gbl][$gbl]{foo} = 123: value ok 8789 - exists $vrlex->[$gbl][$gbl]{foo}: no exception ok 8790 - exists $vrlex->[$gbl][$gbl]{foo}: value ok 8791 - delete $vrlex->[$gbl][$gbl]{foo}: no exception ok 8792 - delete $vrlex->[$gbl][$gbl]{foo}: value ok 8793 - $vrgbl->[$gbl][$gbl]{foo}: no exception ok 8794 - $vrgbl->[$gbl][$gbl]{foo}: value ok 8795 - $vrgbl->[$gbl][$gbl]{foo} = 123: no exception ok 8796 - $vrgbl->[$gbl][$gbl]{foo} = 123: value ok 8797 - exists $vrgbl->[$gbl][$gbl]{foo}: no exception ok 8798 - exists $vrgbl->[$gbl][$gbl]{foo}: value ok 8799 - delete $vrgbl->[$gbl][$gbl]{foo}: no exception ok 8800 - delete $vrgbl->[$gbl][$gbl]{foo}: value ok 8801 - $vlex[$lex+1][$gbl]{foo}: no exception ok 8802 - $vlex[$lex+1][$gbl]{foo}: value ok 8803 - $vlex[$lex+1][$gbl]{foo} = 123: no exception ok 8804 - $vlex[$lex+1][$gbl]{foo} = 123: value ok 8805 - exists $vlex[$lex+1][$gbl]{foo}: no exception ok 8806 - exists $vlex[$lex+1][$gbl]{foo}: value ok 8807 - delete $vlex[$lex+1][$gbl]{foo}: no exception ok 8808 - delete $vlex[$lex+1][$gbl]{foo}: value ok 8809 - $vgbl[$lex+1][$gbl]{foo}: no exception ok 8810 - $vgbl[$lex+1][$gbl]{foo}: value ok 8811 - $vgbl[$lex+1][$gbl]{foo} = 123: no exception ok 8812 - $vgbl[$lex+1][$gbl]{foo} = 123: value ok 8813 - exists $vgbl[$lex+1][$gbl]{foo}: no exception ok 8814 - exists $vgbl[$lex+1][$gbl]{foo}: value ok 8815 - delete $vgbl[$lex+1][$gbl]{foo}: no exception ok 8816 - delete $vgbl[$lex+1][$gbl]{foo}: value ok 8817 - $vrlex->[$lex+1][$gbl]{foo}: no exception ok 8818 - $vrlex->[$lex+1][$gbl]{foo}: value ok 8819 - $vrlex->[$lex+1][$gbl]{foo} = 123: no exception ok 8820 - $vrlex->[$lex+1][$gbl]{foo} = 123: value ok 8821 - exists $vrlex->[$lex+1][$gbl]{foo}: no exception ok 8822 - exists $vrlex->[$lex+1][$gbl]{foo}: value ok 8823 - delete $vrlex->[$lex+1][$gbl]{foo}: no exception ok 8824 - delete $vrlex->[$lex+1][$gbl]{foo}: value ok 8825 - $vrgbl->[$lex+1][$gbl]{foo}: no exception ok 8826 - $vrgbl->[$lex+1][$gbl]{foo}: value ok 8827 - $vrgbl->[$lex+1][$gbl]{foo} = 123: no exception ok 8828 - $vrgbl->[$lex+1][$gbl]{foo} = 123: value ok 8829 - exists $vrgbl->[$lex+1][$gbl]{foo}: no exception ok 8830 - exists $vrgbl->[$lex+1][$gbl]{foo}: value ok 8831 - delete $vrgbl->[$lex+1][$gbl]{foo}: no exception ok 8832 - delete $vrgbl->[$lex+1][$gbl]{foo}: value ok 8833 - $vlex{foo}[$gbl]{foo}: no exception ok 8834 - $vlex{foo}[$gbl]{foo}: value ok 8835 - $vlex{foo}[$gbl]{foo} = 123: no exception ok 8836 - $vlex{foo}[$gbl]{foo} = 123: value ok 8837 - exists $vlex{foo}[$gbl]{foo}: no exception ok 8838 - exists $vlex{foo}[$gbl]{foo}: value ok 8839 - delete $vlex{foo}[$gbl]{foo}: no exception ok 8840 - delete $vlex{foo}[$gbl]{foo}: value ok 8841 - $vgbl{foo}[$gbl]{foo}: no exception ok 8842 - $vgbl{foo}[$gbl]{foo}: value ok 8843 - $vgbl{foo}[$gbl]{foo} = 123: no exception ok 8844 - $vgbl{foo}[$gbl]{foo} = 123: value ok 8845 - exists $vgbl{foo}[$gbl]{foo}: no exception ok 8846 - exists $vgbl{foo}[$gbl]{foo}: value ok 8847 - delete $vgbl{foo}[$gbl]{foo}: no exception ok 8848 - delete $vgbl{foo}[$gbl]{foo}: value ok 8849 - $vrlex->{foo}[$gbl]{foo}: no exception ok 8850 - $vrlex->{foo}[$gbl]{foo}: value ok 8851 - $vrlex->{foo}[$gbl]{foo} = 123: no exception ok 8852 - $vrlex->{foo}[$gbl]{foo} = 123: value ok 8853 - exists $vrlex->{foo}[$gbl]{foo}: no exception ok 8854 - exists $vrlex->{foo}[$gbl]{foo}: value ok 8855 - delete $vrlex->{foo}[$gbl]{foo}: no exception ok 8856 - delete $vrlex->{foo}[$gbl]{foo}: value ok 8857 - $vrgbl->{foo}[$gbl]{foo}: no exception ok 8858 - $vrgbl->{foo}[$gbl]{foo}: value ok 8859 - $vrgbl->{foo}[$gbl]{foo} = 123: no exception ok 8860 - $vrgbl->{foo}[$gbl]{foo} = 123: value ok 8861 - exists $vrgbl->{foo}[$gbl]{foo}: no exception ok 8862 - exists $vrgbl->{foo}[$gbl]{foo}: value ok 8863 - delete $vrgbl->{foo}[$gbl]{foo}: no exception ok 8864 - delete $vrgbl->{foo}[$gbl]{foo}: value ok 8865 - $vlex{$lex}[$gbl]{foo}: no exception ok 8866 - $vlex{$lex}[$gbl]{foo}: value ok 8867 - $vlex{$lex}[$gbl]{foo} = 123: no exception ok 8868 - $vlex{$lex}[$gbl]{foo} = 123: value ok 8869 - exists $vlex{$lex}[$gbl]{foo}: no exception ok 8870 - exists $vlex{$lex}[$gbl]{foo}: value ok 8871 - delete $vlex{$lex}[$gbl]{foo}: no exception ok 8872 - delete $vlex{$lex}[$gbl]{foo}: value ok 8873 - $vgbl{$lex}[$gbl]{foo}: no exception ok 8874 - $vgbl{$lex}[$gbl]{foo}: value ok 8875 - $vgbl{$lex}[$gbl]{foo} = 123: no exception ok 8876 - $vgbl{$lex}[$gbl]{foo} = 123: value ok 8877 - exists $vgbl{$lex}[$gbl]{foo}: no exception ok 8878 - exists $vgbl{$lex}[$gbl]{foo}: value ok 8879 - delete $vgbl{$lex}[$gbl]{foo}: no exception ok 8880 - delete $vgbl{$lex}[$gbl]{foo}: value ok 8881 - $vrlex->{$lex}[$gbl]{foo}: no exception ok 8882 - $vrlex->{$lex}[$gbl]{foo}: value ok 8883 - $vrlex->{$lex}[$gbl]{foo} = 123: no exception ok 8884 - $vrlex->{$lex}[$gbl]{foo} = 123: value ok 8885 - exists $vrlex->{$lex}[$gbl]{foo}: no exception ok 8886 - exists $vrlex->{$lex}[$gbl]{foo}: value ok 8887 - delete $vrlex->{$lex}[$gbl]{foo}: no exception ok 8888 - delete $vrlex->{$lex}[$gbl]{foo}: value ok 8889 - $vrgbl->{$lex}[$gbl]{foo}: no exception ok 8890 - $vrgbl->{$lex}[$gbl]{foo}: value ok 8891 - $vrgbl->{$lex}[$gbl]{foo} = 123: no exception ok 8892 - $vrgbl->{$lex}[$gbl]{foo} = 123: value ok 8893 - exists $vrgbl->{$lex}[$gbl]{foo}: no exception ok 8894 - exists $vrgbl->{$lex}[$gbl]{foo}: value ok 8895 - delete $vrgbl->{$lex}[$gbl]{foo}: no exception ok 8896 - delete $vrgbl->{$lex}[$gbl]{foo}: value ok 8897 - $vlex{$gbl}[$gbl]{foo}: no exception ok 8898 - $vlex{$gbl}[$gbl]{foo}: value ok 8899 - $vlex{$gbl}[$gbl]{foo} = 123: no exception ok 8900 - $vlex{$gbl}[$gbl]{foo} = 123: value ok 8901 - exists $vlex{$gbl}[$gbl]{foo}: no exception ok 8902 - exists $vlex{$gbl}[$gbl]{foo}: value ok 8903 - delete $vlex{$gbl}[$gbl]{foo}: no exception ok 8904 - delete $vlex{$gbl}[$gbl]{foo}: value ok 8905 - $vgbl{$gbl}[$gbl]{foo}: no exception ok 8906 - $vgbl{$gbl}[$gbl]{foo}: value ok 8907 - $vgbl{$gbl}[$gbl]{foo} = 123: no exception ok 8908 - $vgbl{$gbl}[$gbl]{foo} = 123: value ok 8909 - exists $vgbl{$gbl}[$gbl]{foo}: no exception ok 8910 - exists $vgbl{$gbl}[$gbl]{foo}: value ok 8911 - delete $vgbl{$gbl}[$gbl]{foo}: no exception ok 8912 - delete $vgbl{$gbl}[$gbl]{foo}: value ok 8913 - $vrlex->{$gbl}[$gbl]{foo}: no exception ok 8914 - $vrlex->{$gbl}[$gbl]{foo}: value ok 8915 - $vrlex->{$gbl}[$gbl]{foo} = 123: no exception ok 8916 - $vrlex->{$gbl}[$gbl]{foo} = 123: value ok 8917 - exists $vrlex->{$gbl}[$gbl]{foo}: no exception ok 8918 - exists $vrlex->{$gbl}[$gbl]{foo}: value ok 8919 - delete $vrlex->{$gbl}[$gbl]{foo}: no exception ok 8920 - delete $vrlex->{$gbl}[$gbl]{foo}: value ok 8921 - $vrgbl->{$gbl}[$gbl]{foo}: no exception ok 8922 - $vrgbl->{$gbl}[$gbl]{foo}: value ok 8923 - $vrgbl->{$gbl}[$gbl]{foo} = 123: no exception ok 8924 - $vrgbl->{$gbl}[$gbl]{foo} = 123: value ok 8925 - exists $vrgbl->{$gbl}[$gbl]{foo}: no exception ok 8926 - exists $vrgbl->{$gbl}[$gbl]{foo}: value ok 8927 - delete $vrgbl->{$gbl}[$gbl]{foo}: no exception ok 8928 - delete $vrgbl->{$gbl}[$gbl]{foo}: value ok 8929 - $vlex{"x$lex"}[$gbl]{foo}: no exception ok 8930 - $vlex{"x$lex"}[$gbl]{foo}: value ok 8931 - $vlex{"x$lex"}[$gbl]{foo} = 123: no exception ok 8932 - $vlex{"x$lex"}[$gbl]{foo} = 123: value ok 8933 - exists $vlex{"x$lex"}[$gbl]{foo}: no exception ok 8934 - exists $vlex{"x$lex"}[$gbl]{foo}: value ok 8935 - delete $vlex{"x$lex"}[$gbl]{foo}: no exception ok 8936 - delete $vlex{"x$lex"}[$gbl]{foo}: value ok 8937 - $vgbl{"x$lex"}[$gbl]{foo}: no exception ok 8938 - $vgbl{"x$lex"}[$gbl]{foo}: value ok 8939 - $vgbl{"x$lex"}[$gbl]{foo} = 123: no exception ok 8940 - $vgbl{"x$lex"}[$gbl]{foo} = 123: value ok 8941 - exists $vgbl{"x$lex"}[$gbl]{foo}: no exception ok 8942 - exists $vgbl{"x$lex"}[$gbl]{foo}: value ok 8943 - delete $vgbl{"x$lex"}[$gbl]{foo}: no exception ok 8944 - delete $vgbl{"x$lex"}[$gbl]{foo}: value ok 8945 - $vrlex->{"x$lex"}[$gbl]{foo}: no exception ok 8946 - $vrlex->{"x$lex"}[$gbl]{foo}: value ok 8947 - $vrlex->{"x$lex"}[$gbl]{foo} = 123: no exception ok 8948 - $vrlex->{"x$lex"}[$gbl]{foo} = 123: value ok 8949 - exists $vrlex->{"x$lex"}[$gbl]{foo}: no exception ok 8950 - exists $vrlex->{"x$lex"}[$gbl]{foo}: value ok 8951 - delete $vrlex->{"x$lex"}[$gbl]{foo}: no exception ok 8952 - delete $vrlex->{"x$lex"}[$gbl]{foo}: value ok 8953 - $vrgbl->{"x$lex"}[$gbl]{foo}: no exception ok 8954 - $vrgbl->{"x$lex"}[$gbl]{foo}: value ok 8955 - $vrgbl->{"x$lex"}[$gbl]{foo} = 123: no exception ok 8956 - $vrgbl->{"x$lex"}[$gbl]{foo} = 123: value ok 8957 - exists $vrgbl->{"x$lex"}[$gbl]{foo}: no exception ok 8958 - exists $vrgbl->{"x$lex"}[$gbl]{foo}: value ok 8959 - delete $vrgbl->{"x$lex"}[$gbl]{foo}: no exception ok 8960 - delete $vrgbl->{"x$lex"}[$gbl]{foo}: value ok 8961 - $vlex[0][$lex+1]{foo}: no exception ok 8962 - $vlex[0][$lex+1]{foo}: value ok 8963 - $vlex[0][$lex+1]{foo} = 123: no exception ok 8964 - $vlex[0][$lex+1]{foo} = 123: value ok 8965 - exists $vlex[0][$lex+1]{foo}: no exception ok 8966 - exists $vlex[0][$lex+1]{foo}: value ok 8967 - delete $vlex[0][$lex+1]{foo}: no exception ok 8968 - delete $vlex[0][$lex+1]{foo}: value ok 8969 - $vgbl[0][$lex+1]{foo}: no exception ok 8970 - $vgbl[0][$lex+1]{foo}: value ok 8971 - $vgbl[0][$lex+1]{foo} = 123: no exception ok 8972 - $vgbl[0][$lex+1]{foo} = 123: value ok 8973 - exists $vgbl[0][$lex+1]{foo}: no exception ok 8974 - exists $vgbl[0][$lex+1]{foo}: value ok 8975 - delete $vgbl[0][$lex+1]{foo}: no exception ok 8976 - delete $vgbl[0][$lex+1]{foo}: value ok 8977 - $vrlex->[0][$lex+1]{foo}: no exception ok 8978 - $vrlex->[0][$lex+1]{foo}: value ok 8979 - $vrlex->[0][$lex+1]{foo} = 123: no exception ok 8980 - $vrlex->[0][$lex+1]{foo} = 123: value ok 8981 - exists $vrlex->[0][$lex+1]{foo}: no exception ok 8982 - exists $vrlex->[0][$lex+1]{foo}: value ok 8983 - delete $vrlex->[0][$lex+1]{foo}: no exception ok 8984 - delete $vrlex->[0][$lex+1]{foo}: value ok 8985 - $vrgbl->[0][$lex+1]{foo}: no exception ok 8986 - $vrgbl->[0][$lex+1]{foo}: value ok 8987 - $vrgbl->[0][$lex+1]{foo} = 123: no exception ok 8988 - $vrgbl->[0][$lex+1]{foo} = 123: value ok 8989 - exists $vrgbl->[0][$lex+1]{foo}: no exception ok 8990 - exists $vrgbl->[0][$lex+1]{foo}: value ok 8991 - delete $vrgbl->[0][$lex+1]{foo}: no exception ok 8992 - delete $vrgbl->[0][$lex+1]{foo}: value ok 8993 - $vlex[$lex][$lex+1]{foo}: no exception ok 8994 - $vlex[$lex][$lex+1]{foo}: value ok 8995 - $vlex[$lex][$lex+1]{foo} = 123: no exception ok 8996 - $vlex[$lex][$lex+1]{foo} = 123: value ok 8997 - exists $vlex[$lex][$lex+1]{foo}: no exception ok 8998 - exists $vlex[$lex][$lex+1]{foo}: value ok 8999 - delete $vlex[$lex][$lex+1]{foo}: no exception ok 9000 - delete $vlex[$lex][$lex+1]{foo}: value ok 9001 - $vgbl[$lex][$lex+1]{foo}: no exception ok 9002 - $vgbl[$lex][$lex+1]{foo}: value ok 9003 - $vgbl[$lex][$lex+1]{foo} = 123: no exception ok 9004 - $vgbl[$lex][$lex+1]{foo} = 123: value ok 9005 - exists $vgbl[$lex][$lex+1]{foo}: no exception ok 9006 - exists $vgbl[$lex][$lex+1]{foo}: value ok 9007 - delete $vgbl[$lex][$lex+1]{foo}: no exception ok 9008 - delete $vgbl[$lex][$lex+1]{foo}: value ok 9009 - $vrlex->[$lex][$lex+1]{foo}: no exception ok 9010 - $vrlex->[$lex][$lex+1]{foo}: value ok 9011 - $vrlex->[$lex][$lex+1]{foo} = 123: no exception ok 9012 - $vrlex->[$lex][$lex+1]{foo} = 123: value ok 9013 - exists $vrlex->[$lex][$lex+1]{foo}: no exception ok 9014 - exists $vrlex->[$lex][$lex+1]{foo}: value ok 9015 - delete $vrlex->[$lex][$lex+1]{foo}: no exception ok 9016 - delete $vrlex->[$lex][$lex+1]{foo}: value ok 9017 - $vrgbl->[$lex][$lex+1]{foo}: no exception ok 9018 - $vrgbl->[$lex][$lex+1]{foo}: value ok 9019 - $vrgbl->[$lex][$lex+1]{foo} = 123: no exception ok 9020 - $vrgbl->[$lex][$lex+1]{foo} = 123: value ok 9021 - exists $vrgbl->[$lex][$lex+1]{foo}: no exception ok 9022 - exists $vrgbl->[$lex][$lex+1]{foo}: value ok 9023 - delete $vrgbl->[$lex][$lex+1]{foo}: no exception ok 9024 - delete $vrgbl->[$lex][$lex+1]{foo}: value ok 9025 - $vlex[$gbl][$lex+1]{foo}: no exception ok 9026 - $vlex[$gbl][$lex+1]{foo}: value ok 9027 - $vlex[$gbl][$lex+1]{foo} = 123: no exception ok 9028 - $vlex[$gbl][$lex+1]{foo} = 123: value ok 9029 - exists $vlex[$gbl][$lex+1]{foo}: no exception ok 9030 - exists $vlex[$gbl][$lex+1]{foo}: value ok 9031 - delete $vlex[$gbl][$lex+1]{foo}: no exception ok 9032 - delete $vlex[$gbl][$lex+1]{foo}: value ok 9033 - $vgbl[$gbl][$lex+1]{foo}: no exception ok 9034 - $vgbl[$gbl][$lex+1]{foo}: value ok 9035 - $vgbl[$gbl][$lex+1]{foo} = 123: no exception ok 9036 - $vgbl[$gbl][$lex+1]{foo} = 123: value ok 9037 - exists $vgbl[$gbl][$lex+1]{foo}: no exception ok 9038 - exists $vgbl[$gbl][$lex+1]{foo}: value ok 9039 - delete $vgbl[$gbl][$lex+1]{foo}: no exception ok 9040 - delete $vgbl[$gbl][$lex+1]{foo}: value ok 9041 - $vrlex->[$gbl][$lex+1]{foo}: no exception ok 9042 - $vrlex->[$gbl][$lex+1]{foo}: value ok 9043 - $vrlex->[$gbl][$lex+1]{foo} = 123: no exception ok 9044 - $vrlex->[$gbl][$lex+1]{foo} = 123: value ok 9045 - exists $vrlex->[$gbl][$lex+1]{foo}: no exception ok 9046 - exists $vrlex->[$gbl][$lex+1]{foo}: value ok 9047 - delete $vrlex->[$gbl][$lex+1]{foo}: no exception ok 9048 - delete $vrlex->[$gbl][$lex+1]{foo}: value ok 9049 - $vrgbl->[$gbl][$lex+1]{foo}: no exception ok 9050 - $vrgbl->[$gbl][$lex+1]{foo}: value ok 9051 - $vrgbl->[$gbl][$lex+1]{foo} = 123: no exception ok 9052 - $vrgbl->[$gbl][$lex+1]{foo} = 123: value ok 9053 - exists $vrgbl->[$gbl][$lex+1]{foo}: no exception ok 9054 - exists $vrgbl->[$gbl][$lex+1]{foo}: value ok 9055 - delete $vrgbl->[$gbl][$lex+1]{foo}: no exception ok 9056 - delete $vrgbl->[$gbl][$lex+1]{foo}: value ok 9057 - $vlex[$lex+1][$lex+1]{foo}: no exception ok 9058 - $vlex[$lex+1][$lex+1]{foo}: value ok 9059 - $vlex[$lex+1][$lex+1]{foo} = 123: no exception ok 9060 - $vlex[$lex+1][$lex+1]{foo} = 123: value ok 9061 - exists $vlex[$lex+1][$lex+1]{foo}: no exception ok 9062 - exists $vlex[$lex+1][$lex+1]{foo}: value ok 9063 - delete $vlex[$lex+1][$lex+1]{foo}: no exception ok 9064 - delete $vlex[$lex+1][$lex+1]{foo}: value ok 9065 - $vgbl[$lex+1][$lex+1]{foo}: no exception ok 9066 - $vgbl[$lex+1][$lex+1]{foo}: value ok 9067 - $vgbl[$lex+1][$lex+1]{foo} = 123: no exception ok 9068 - $vgbl[$lex+1][$lex+1]{foo} = 123: value ok 9069 - exists $vgbl[$lex+1][$lex+1]{foo}: no exception ok 9070 - exists $vgbl[$lex+1][$lex+1]{foo}: value ok 9071 - delete $vgbl[$lex+1][$lex+1]{foo}: no exception ok 9072 - delete $vgbl[$lex+1][$lex+1]{foo}: value ok 9073 - $vrlex->[$lex+1][$lex+1]{foo}: no exception ok 9074 - $vrlex->[$lex+1][$lex+1]{foo}: value ok 9075 - $vrlex->[$lex+1][$lex+1]{foo} = 123: no exception ok 9076 - $vrlex->[$lex+1][$lex+1]{foo} = 123: value ok 9077 - exists $vrlex->[$lex+1][$lex+1]{foo}: no exception ok 9078 - exists $vrlex->[$lex+1][$lex+1]{foo}: value ok 9079 - delete $vrlex->[$lex+1][$lex+1]{foo}: no exception ok 9080 - delete $vrlex->[$lex+1][$lex+1]{foo}: value ok 9081 - $vrgbl->[$lex+1][$lex+1]{foo}: no exception ok 9082 - $vrgbl->[$lex+1][$lex+1]{foo}: value ok 9083 - $vrgbl->[$lex+1][$lex+1]{foo} = 123: no exception ok 9084 - $vrgbl->[$lex+1][$lex+1]{foo} = 123: value ok 9085 - exists $vrgbl->[$lex+1][$lex+1]{foo}: no exception ok 9086 - exists $vrgbl->[$lex+1][$lex+1]{foo}: value ok 9087 - delete $vrgbl->[$lex+1][$lex+1]{foo}: no exception ok 9088 - delete $vrgbl->[$lex+1][$lex+1]{foo}: value ok 9089 - $vlex{foo}[$lex+1]{foo}: no exception ok 9090 - $vlex{foo}[$lex+1]{foo}: value ok 9091 - $vlex{foo}[$lex+1]{foo} = 123: no exception ok 9092 - $vlex{foo}[$lex+1]{foo} = 123: value ok 9093 - exists $vlex{foo}[$lex+1]{foo}: no exception ok 9094 - exists $vlex{foo}[$lex+1]{foo}: value ok 9095 - delete $vlex{foo}[$lex+1]{foo}: no exception ok 9096 - delete $vlex{foo}[$lex+1]{foo}: value ok 9097 - $vgbl{foo}[$lex+1]{foo}: no exception ok 9098 - $vgbl{foo}[$lex+1]{foo}: value ok 9099 - $vgbl{foo}[$lex+1]{foo} = 123: no exception ok 9100 - $vgbl{foo}[$lex+1]{foo} = 123: value ok 9101 - exists $vgbl{foo}[$lex+1]{foo}: no exception ok 9102 - exists $vgbl{foo}[$lex+1]{foo}: value ok 9103 - delete $vgbl{foo}[$lex+1]{foo}: no exception ok 9104 - delete $vgbl{foo}[$lex+1]{foo}: value ok 9105 - $vrlex->{foo}[$lex+1]{foo}: no exception ok 9106 - $vrlex->{foo}[$lex+1]{foo}: value ok 9107 - $vrlex->{foo}[$lex+1]{foo} = 123: no exception ok 9108 - $vrlex->{foo}[$lex+1]{foo} = 123: value ok 9109 - exists $vrlex->{foo}[$lex+1]{foo}: no exception ok 9110 - exists $vrlex->{foo}[$lex+1]{foo}: value ok 9111 - delete $vrlex->{foo}[$lex+1]{foo}: no exception ok 9112 - delete $vrlex->{foo}[$lex+1]{foo}: value ok 9113 - $vrgbl->{foo}[$lex+1]{foo}: no exception ok 9114 - $vrgbl->{foo}[$lex+1]{foo}: value ok 9115 - $vrgbl->{foo}[$lex+1]{foo} = 123: no exception ok 9116 - $vrgbl->{foo}[$lex+1]{foo} = 123: value ok 9117 - exists $vrgbl->{foo}[$lex+1]{foo}: no exception ok 9118 - exists $vrgbl->{foo}[$lex+1]{foo}: value ok 9119 - delete $vrgbl->{foo}[$lex+1]{foo}: no exception ok 9120 - delete $vrgbl->{foo}[$lex+1]{foo}: value ok 9121 - $vlex{$lex}[$lex+1]{foo}: no exception ok 9122 - $vlex{$lex}[$lex+1]{foo}: value ok 9123 - $vlex{$lex}[$lex+1]{foo} = 123: no exception ok 9124 - $vlex{$lex}[$lex+1]{foo} = 123: value ok 9125 - exists $vlex{$lex}[$lex+1]{foo}: no exception ok 9126 - exists $vlex{$lex}[$lex+1]{foo}: value ok 9127 - delete $vlex{$lex}[$lex+1]{foo}: no exception ok 9128 - delete $vlex{$lex}[$lex+1]{foo}: value ok 9129 - $vgbl{$lex}[$lex+1]{foo}: no exception ok 9130 - $vgbl{$lex}[$lex+1]{foo}: value ok 9131 - $vgbl{$lex}[$lex+1]{foo} = 123: no exception ok 9132 - $vgbl{$lex}[$lex+1]{foo} = 123: value ok 9133 - exists $vgbl{$lex}[$lex+1]{foo}: no exception ok 9134 - exists $vgbl{$lex}[$lex+1]{foo}: value ok 9135 - delete $vgbl{$lex}[$lex+1]{foo}: no exception ok 9136 - delete $vgbl{$lex}[$lex+1]{foo}: value ok 9137 - $vrlex->{$lex}[$lex+1]{foo}: no exception ok 9138 - $vrlex->{$lex}[$lex+1]{foo}: value ok 9139 - $vrlex->{$lex}[$lex+1]{foo} = 123: no exception ok 9140 - $vrlex->{$lex}[$lex+1]{foo} = 123: value ok 9141 - exists $vrlex->{$lex}[$lex+1]{foo}: no exception ok 9142 - exists $vrlex->{$lex}[$lex+1]{foo}: value ok 9143 - delete $vrlex->{$lex}[$lex+1]{foo}: no exception ok 9144 - delete $vrlex->{$lex}[$lex+1]{foo}: value ok 9145 - $vrgbl->{$lex}[$lex+1]{foo}: no exception ok 9146 - $vrgbl->{$lex}[$lex+1]{foo}: value ok 9147 - $vrgbl->{$lex}[$lex+1]{foo} = 123: no exception ok 9148 - $vrgbl->{$lex}[$lex+1]{foo} = 123: value ok 9149 - exists $vrgbl->{$lex}[$lex+1]{foo}: no exception ok 9150 - exists $vrgbl->{$lex}[$lex+1]{foo}: value ok 9151 - delete $vrgbl->{$lex}[$lex+1]{foo}: no exception ok 9152 - delete $vrgbl->{$lex}[$lex+1]{foo}: value ok 9153 - $vlex{$gbl}[$lex+1]{foo}: no exception ok 9154 - $vlex{$gbl}[$lex+1]{foo}: value ok 9155 - $vlex{$gbl}[$lex+1]{foo} = 123: no exception ok 9156 - $vlex{$gbl}[$lex+1]{foo} = 123: value ok 9157 - exists $vlex{$gbl}[$lex+1]{foo}: no exception ok 9158 - exists $vlex{$gbl}[$lex+1]{foo}: value ok 9159 - delete $vlex{$gbl}[$lex+1]{foo}: no exception ok 9160 - delete $vlex{$gbl}[$lex+1]{foo}: value ok 9161 - $vgbl{$gbl}[$lex+1]{foo}: no exception ok 9162 - $vgbl{$gbl}[$lex+1]{foo}: value ok 9163 - $vgbl{$gbl}[$lex+1]{foo} = 123: no exception ok 9164 - $vgbl{$gbl}[$lex+1]{foo} = 123: value ok 9165 - exists $vgbl{$gbl}[$lex+1]{foo}: no exception ok 9166 - exists $vgbl{$gbl}[$lex+1]{foo}: value ok 9167 - delete $vgbl{$gbl}[$lex+1]{foo}: no exception ok 9168 - delete $vgbl{$gbl}[$lex+1]{foo}: value ok 9169 - $vrlex->{$gbl}[$lex+1]{foo}: no exception ok 9170 - $vrlex->{$gbl}[$lex+1]{foo}: value ok 9171 - $vrlex->{$gbl}[$lex+1]{foo} = 123: no exception ok 9172 - $vrlex->{$gbl}[$lex+1]{foo} = 123: value ok 9173 - exists $vrlex->{$gbl}[$lex+1]{foo}: no exception ok 9174 - exists $vrlex->{$gbl}[$lex+1]{foo}: value ok 9175 - delete $vrlex->{$gbl}[$lex+1]{foo}: no exception ok 9176 - delete $vrlex->{$gbl}[$lex+1]{foo}: value ok 9177 - $vrgbl->{$gbl}[$lex+1]{foo}: no exception ok 9178 - $vrgbl->{$gbl}[$lex+1]{foo}: value ok 9179 - $vrgbl->{$gbl}[$lex+1]{foo} = 123: no exception ok 9180 - $vrgbl->{$gbl}[$lex+1]{foo} = 123: value ok 9181 - exists $vrgbl->{$gbl}[$lex+1]{foo}: no exception ok 9182 - exists $vrgbl->{$gbl}[$lex+1]{foo}: value ok 9183 - delete $vrgbl->{$gbl}[$lex+1]{foo}: no exception ok 9184 - delete $vrgbl->{$gbl}[$lex+1]{foo}: value ok 9185 - $vlex{"x$lex"}[$lex+1]{foo}: no exception ok 9186 - $vlex{"x$lex"}[$lex+1]{foo}: value ok 9187 - $vlex{"x$lex"}[$lex+1]{foo} = 123: no exception ok 9188 - $vlex{"x$lex"}[$lex+1]{foo} = 123: value ok 9189 - exists $vlex{"x$lex"}[$lex+1]{foo}: no exception ok 9190 - exists $vlex{"x$lex"}[$lex+1]{foo}: value ok 9191 - delete $vlex{"x$lex"}[$lex+1]{foo}: no exception ok 9192 - delete $vlex{"x$lex"}[$lex+1]{foo}: value ok 9193 - $vgbl{"x$lex"}[$lex+1]{foo}: no exception ok 9194 - $vgbl{"x$lex"}[$lex+1]{foo}: value ok 9195 - $vgbl{"x$lex"}[$lex+1]{foo} = 123: no exception ok 9196 - $vgbl{"x$lex"}[$lex+1]{foo} = 123: value ok 9197 - exists $vgbl{"x$lex"}[$lex+1]{foo}: no exception ok 9198 - exists $vgbl{"x$lex"}[$lex+1]{foo}: value ok 9199 - delete $vgbl{"x$lex"}[$lex+1]{foo}: no exception ok 9200 - delete $vgbl{"x$lex"}[$lex+1]{foo}: value ok 9201 - $vrlex->{"x$lex"}[$lex+1]{foo}: no exception ok 9202 - $vrlex->{"x$lex"}[$lex+1]{foo}: value ok 9203 - $vrlex->{"x$lex"}[$lex+1]{foo} = 123: no exception ok 9204 - $vrlex->{"x$lex"}[$lex+1]{foo} = 123: value ok 9205 - exists $vrlex->{"x$lex"}[$lex+1]{foo}: no exception ok 9206 - exists $vrlex->{"x$lex"}[$lex+1]{foo}: value ok 9207 - delete $vrlex->{"x$lex"}[$lex+1]{foo}: no exception ok 9208 - delete $vrlex->{"x$lex"}[$lex+1]{foo}: value ok 9209 - $vrgbl->{"x$lex"}[$lex+1]{foo}: no exception ok 9210 - $vrgbl->{"x$lex"}[$lex+1]{foo}: value ok 9211 - $vrgbl->{"x$lex"}[$lex+1]{foo} = 123: no exception ok 9212 - $vrgbl->{"x$lex"}[$lex+1]{foo} = 123: value ok 9213 - exists $vrgbl->{"x$lex"}[$lex+1]{foo}: no exception ok 9214 - exists $vrgbl->{"x$lex"}[$lex+1]{foo}: value ok 9215 - delete $vrgbl->{"x$lex"}[$lex+1]{foo}: no exception ok 9216 - delete $vrgbl->{"x$lex"}[$lex+1]{foo}: value ok 9217 - $vlex[0]{foo}{foo}: no exception ok 9218 - $vlex[0]{foo}{foo}: value ok 9219 - $vlex[0]{foo}{foo} = 123: no exception ok 9220 - $vlex[0]{foo}{foo} = 123: value ok 9221 - exists $vlex[0]{foo}{foo}: no exception ok 9222 - exists $vlex[0]{foo}{foo}: value ok 9223 - delete $vlex[0]{foo}{foo}: no exception ok 9224 - delete $vlex[0]{foo}{foo}: value ok 9225 - $vgbl[0]{foo}{foo}: no exception ok 9226 - $vgbl[0]{foo}{foo}: value ok 9227 - $vgbl[0]{foo}{foo} = 123: no exception ok 9228 - $vgbl[0]{foo}{foo} = 123: value ok 9229 - exists $vgbl[0]{foo}{foo}: no exception ok 9230 - exists $vgbl[0]{foo}{foo}: value ok 9231 - delete $vgbl[0]{foo}{foo}: no exception ok 9232 - delete $vgbl[0]{foo}{foo}: value ok 9233 - $vrlex->[0]{foo}{foo}: no exception ok 9234 - $vrlex->[0]{foo}{foo}: value ok 9235 - $vrlex->[0]{foo}{foo} = 123: no exception ok 9236 - $vrlex->[0]{foo}{foo} = 123: value ok 9237 - exists $vrlex->[0]{foo}{foo}: no exception ok 9238 - exists $vrlex->[0]{foo}{foo}: value ok 9239 - delete $vrlex->[0]{foo}{foo}: no exception ok 9240 - delete $vrlex->[0]{foo}{foo}: value ok 9241 - $vrgbl->[0]{foo}{foo}: no exception ok 9242 - $vrgbl->[0]{foo}{foo}: value ok 9243 - $vrgbl->[0]{foo}{foo} = 123: no exception ok 9244 - $vrgbl->[0]{foo}{foo} = 123: value ok 9245 - exists $vrgbl->[0]{foo}{foo}: no exception ok 9246 - exists $vrgbl->[0]{foo}{foo}: value ok 9247 - delete $vrgbl->[0]{foo}{foo}: no exception ok 9248 - delete $vrgbl->[0]{foo}{foo}: value ok 9249 - $vlex[$lex]{foo}{foo}: no exception ok 9250 - $vlex[$lex]{foo}{foo}: value ok 9251 - $vlex[$lex]{foo}{foo} = 123: no exception ok 9252 - $vlex[$lex]{foo}{foo} = 123: value ok 9253 - exists $vlex[$lex]{foo}{foo}: no exception ok 9254 - exists $vlex[$lex]{foo}{foo}: value ok 9255 - delete $vlex[$lex]{foo}{foo}: no exception ok 9256 - delete $vlex[$lex]{foo}{foo}: value ok 9257 - $vgbl[$lex]{foo}{foo}: no exception ok 9258 - $vgbl[$lex]{foo}{foo}: value ok 9259 - $vgbl[$lex]{foo}{foo} = 123: no exception ok 9260 - $vgbl[$lex]{foo}{foo} = 123: value ok 9261 - exists $vgbl[$lex]{foo}{foo}: no exception ok 9262 - exists $vgbl[$lex]{foo}{foo}: value ok 9263 - delete $vgbl[$lex]{foo}{foo}: no exception ok 9264 - delete $vgbl[$lex]{foo}{foo}: value ok 9265 - $vrlex->[$lex]{foo}{foo}: no exception ok 9266 - $vrlex->[$lex]{foo}{foo}: value ok 9267 - $vrlex->[$lex]{foo}{foo} = 123: no exception ok 9268 - $vrlex->[$lex]{foo}{foo} = 123: value ok 9269 - exists $vrlex->[$lex]{foo}{foo}: no exception ok 9270 - exists $vrlex->[$lex]{foo}{foo}: value ok 9271 - delete $vrlex->[$lex]{foo}{foo}: no exception ok 9272 - delete $vrlex->[$lex]{foo}{foo}: value ok 9273 - $vrgbl->[$lex]{foo}{foo}: no exception ok 9274 - $vrgbl->[$lex]{foo}{foo}: value ok 9275 - $vrgbl->[$lex]{foo}{foo} = 123: no exception ok 9276 - $vrgbl->[$lex]{foo}{foo} = 123: value ok 9277 - exists $vrgbl->[$lex]{foo}{foo}: no exception ok 9278 - exists $vrgbl->[$lex]{foo}{foo}: value ok 9279 - delete $vrgbl->[$lex]{foo}{foo}: no exception ok 9280 - delete $vrgbl->[$lex]{foo}{foo}: value ok 9281 - $vlex[$gbl]{foo}{foo}: no exception ok 9282 - $vlex[$gbl]{foo}{foo}: value ok 9283 - $vlex[$gbl]{foo}{foo} = 123: no exception ok 9284 - $vlex[$gbl]{foo}{foo} = 123: value ok 9285 - exists $vlex[$gbl]{foo}{foo}: no exception ok 9286 - exists $vlex[$gbl]{foo}{foo}: value ok 9287 - delete $vlex[$gbl]{foo}{foo}: no exception ok 9288 - delete $vlex[$gbl]{foo}{foo}: value ok 9289 - $vgbl[$gbl]{foo}{foo}: no exception ok 9290 - $vgbl[$gbl]{foo}{foo}: value ok 9291 - $vgbl[$gbl]{foo}{foo} = 123: no exception ok 9292 - $vgbl[$gbl]{foo}{foo} = 123: value ok 9293 - exists $vgbl[$gbl]{foo}{foo}: no exception ok 9294 - exists $vgbl[$gbl]{foo}{foo}: value ok 9295 - delete $vgbl[$gbl]{foo}{foo}: no exception ok 9296 - delete $vgbl[$gbl]{foo}{foo}: value ok 9297 - $vrlex->[$gbl]{foo}{foo}: no exception ok 9298 - $vrlex->[$gbl]{foo}{foo}: value ok 9299 - $vrlex->[$gbl]{foo}{foo} = 123: no exception ok 9300 - $vrlex->[$gbl]{foo}{foo} = 123: value ok 9301 - exists $vrlex->[$gbl]{foo}{foo}: no exception ok 9302 - exists $vrlex->[$gbl]{foo}{foo}: value ok 9303 - delete $vrlex->[$gbl]{foo}{foo}: no exception ok 9304 - delete $vrlex->[$gbl]{foo}{foo}: value ok 9305 - $vrgbl->[$gbl]{foo}{foo}: no exception ok 9306 - $vrgbl->[$gbl]{foo}{foo}: value ok 9307 - $vrgbl->[$gbl]{foo}{foo} = 123: no exception ok 9308 - $vrgbl->[$gbl]{foo}{foo} = 123: value ok 9309 - exists $vrgbl->[$gbl]{foo}{foo}: no exception ok 9310 - exists $vrgbl->[$gbl]{foo}{foo}: value ok 9311 - delete $vrgbl->[$gbl]{foo}{foo}: no exception ok 9312 - delete $vrgbl->[$gbl]{foo}{foo}: value ok 9313 - $vlex[$lex+1]{foo}{foo}: no exception ok 9314 - $vlex[$lex+1]{foo}{foo}: value ok 9315 - $vlex[$lex+1]{foo}{foo} = 123: no exception ok 9316 - $vlex[$lex+1]{foo}{foo} = 123: value ok 9317 - exists $vlex[$lex+1]{foo}{foo}: no exception ok 9318 - exists $vlex[$lex+1]{foo}{foo}: value ok 9319 - delete $vlex[$lex+1]{foo}{foo}: no exception ok 9320 - delete $vlex[$lex+1]{foo}{foo}: value ok 9321 - $vgbl[$lex+1]{foo}{foo}: no exception ok 9322 - $vgbl[$lex+1]{foo}{foo}: value ok 9323 - $vgbl[$lex+1]{foo}{foo} = 123: no exception ok 9324 - $vgbl[$lex+1]{foo}{foo} = 123: value ok 9325 - exists $vgbl[$lex+1]{foo}{foo}: no exception ok 9326 - exists $vgbl[$lex+1]{foo}{foo}: value ok 9327 - delete $vgbl[$lex+1]{foo}{foo}: no exception ok 9328 - delete $vgbl[$lex+1]{foo}{foo}: value ok 9329 - $vrlex->[$lex+1]{foo}{foo}: no exception ok 9330 - $vrlex->[$lex+1]{foo}{foo}: value ok 9331 - $vrlex->[$lex+1]{foo}{foo} = 123: no exception ok 9332 - $vrlex->[$lex+1]{foo}{foo} = 123: value ok 9333 - exists $vrlex->[$lex+1]{foo}{foo}: no exception ok 9334 - exists $vrlex->[$lex+1]{foo}{foo}: value ok 9335 - delete $vrlex->[$lex+1]{foo}{foo}: no exception ok 9336 - delete $vrlex->[$lex+1]{foo}{foo}: value ok 9337 - $vrgbl->[$lex+1]{foo}{foo}: no exception ok 9338 - $vrgbl->[$lex+1]{foo}{foo}: value ok 9339 - $vrgbl->[$lex+1]{foo}{foo} = 123: no exception ok 9340 - $vrgbl->[$lex+1]{foo}{foo} = 123: value ok 9341 - exists $vrgbl->[$lex+1]{foo}{foo}: no exception ok 9342 - exists $vrgbl->[$lex+1]{foo}{foo}: value ok 9343 - delete $vrgbl->[$lex+1]{foo}{foo}: no exception ok 9344 - delete $vrgbl->[$lex+1]{foo}{foo}: value ok 9345 - $vlex{foo}{foo}{foo}: no exception ok 9346 - $vlex{foo}{foo}{foo}: value ok 9347 - $vlex{foo}{foo}{foo} = 123: no exception ok 9348 - $vlex{foo}{foo}{foo} = 123: value ok 9349 - exists $vlex{foo}{foo}{foo}: no exception ok 9350 - exists $vlex{foo}{foo}{foo}: value ok 9351 - delete $vlex{foo}{foo}{foo}: no exception ok 9352 - delete $vlex{foo}{foo}{foo}: value ok 9353 - $vgbl{foo}{foo}{foo}: no exception ok 9354 - $vgbl{foo}{foo}{foo}: value ok 9355 - $vgbl{foo}{foo}{foo} = 123: no exception ok 9356 - $vgbl{foo}{foo}{foo} = 123: value ok 9357 - exists $vgbl{foo}{foo}{foo}: no exception ok 9358 - exists $vgbl{foo}{foo}{foo}: value ok 9359 - delete $vgbl{foo}{foo}{foo}: no exception ok 9360 - delete $vgbl{foo}{foo}{foo}: value ok 9361 - $vrlex->{foo}{foo}{foo}: no exception ok 9362 - $vrlex->{foo}{foo}{foo}: value ok 9363 - $vrlex->{foo}{foo}{foo} = 123: no exception ok 9364 - $vrlex->{foo}{foo}{foo} = 123: value ok 9365 - exists $vrlex->{foo}{foo}{foo}: no exception ok 9366 - exists $vrlex->{foo}{foo}{foo}: value ok 9367 - delete $vrlex->{foo}{foo}{foo}: no exception ok 9368 - delete $vrlex->{foo}{foo}{foo}: value ok 9369 - $vrgbl->{foo}{foo}{foo}: no exception ok 9370 - $vrgbl->{foo}{foo}{foo}: value ok 9371 - $vrgbl->{foo}{foo}{foo} = 123: no exception ok 9372 - $vrgbl->{foo}{foo}{foo} = 123: value ok 9373 - exists $vrgbl->{foo}{foo}{foo}: no exception ok 9374 - exists $vrgbl->{foo}{foo}{foo}: value ok 9375 - delete $vrgbl->{foo}{foo}{foo}: no exception ok 9376 - delete $vrgbl->{foo}{foo}{foo}: value ok 9377 - $vlex{$lex}{foo}{foo}: no exception ok 9378 - $vlex{$lex}{foo}{foo}: value ok 9379 - $vlex{$lex}{foo}{foo} = 123: no exception ok 9380 - $vlex{$lex}{foo}{foo} = 123: value ok 9381 - exists $vlex{$lex}{foo}{foo}: no exception ok 9382 - exists $vlex{$lex}{foo}{foo}: value ok 9383 - delete $vlex{$lex}{foo}{foo}: no exception ok 9384 - delete $vlex{$lex}{foo}{foo}: value ok 9385 - $vgbl{$lex}{foo}{foo}: no exception ok 9386 - $vgbl{$lex}{foo}{foo}: value ok 9387 - $vgbl{$lex}{foo}{foo} = 123: no exception ok 9388 - $vgbl{$lex}{foo}{foo} = 123: value ok 9389 - exists $vgbl{$lex}{foo}{foo}: no exception ok 9390 - exists $vgbl{$lex}{foo}{foo}: value ok 9391 - delete $vgbl{$lex}{foo}{foo}: no exception ok 9392 - delete $vgbl{$lex}{foo}{foo}: value ok 9393 - $vrlex->{$lex}{foo}{foo}: no exception ok 9394 - $vrlex->{$lex}{foo}{foo}: value ok 9395 - $vrlex->{$lex}{foo}{foo} = 123: no exception ok 9396 - $vrlex->{$lex}{foo}{foo} = 123: value ok 9397 - exists $vrlex->{$lex}{foo}{foo}: no exception ok 9398 - exists $vrlex->{$lex}{foo}{foo}: value ok 9399 - delete $vrlex->{$lex}{foo}{foo}: no exception ok 9400 - delete $vrlex->{$lex}{foo}{foo}: value ok 9401 - $vrgbl->{$lex}{foo}{foo}: no exception ok 9402 - $vrgbl->{$lex}{foo}{foo}: value ok 9403 - $vrgbl->{$lex}{foo}{foo} = 123: no exception ok 9404 - $vrgbl->{$lex}{foo}{foo} = 123: value ok 9405 - exists $vrgbl->{$lex}{foo}{foo}: no exception ok 9406 - exists $vrgbl->{$lex}{foo}{foo}: value ok 9407 - delete $vrgbl->{$lex}{foo}{foo}: no exception ok 9408 - delete $vrgbl->{$lex}{foo}{foo}: value ok 9409 - $vlex{$gbl}{foo}{foo}: no exception ok 9410 - $vlex{$gbl}{foo}{foo}: value ok 9411 - $vlex{$gbl}{foo}{foo} = 123: no exception ok 9412 - $vlex{$gbl}{foo}{foo} = 123: value ok 9413 - exists $vlex{$gbl}{foo}{foo}: no exception ok 9414 - exists $vlex{$gbl}{foo}{foo}: value ok 9415 - delete $vlex{$gbl}{foo}{foo}: no exception ok 9416 - delete $vlex{$gbl}{foo}{foo}: value ok 9417 - $vgbl{$gbl}{foo}{foo}: no exception ok 9418 - $vgbl{$gbl}{foo}{foo}: value ok 9419 - $vgbl{$gbl}{foo}{foo} = 123: no exception ok 9420 - $vgbl{$gbl}{foo}{foo} = 123: value ok 9421 - exists $vgbl{$gbl}{foo}{foo}: no exception ok 9422 - exists $vgbl{$gbl}{foo}{foo}: value ok 9423 - delete $vgbl{$gbl}{foo}{foo}: no exception ok 9424 - delete $vgbl{$gbl}{foo}{foo}: value ok 9425 - $vrlex->{$gbl}{foo}{foo}: no exception ok 9426 - $vrlex->{$gbl}{foo}{foo}: value ok 9427 - $vrlex->{$gbl}{foo}{foo} = 123: no exception ok 9428 - $vrlex->{$gbl}{foo}{foo} = 123: value ok 9429 - exists $vrlex->{$gbl}{foo}{foo}: no exception ok 9430 - exists $vrlex->{$gbl}{foo}{foo}: value ok 9431 - delete $vrlex->{$gbl}{foo}{foo}: no exception ok 9432 - delete $vrlex->{$gbl}{foo}{foo}: value ok 9433 - $vrgbl->{$gbl}{foo}{foo}: no exception ok 9434 - $vrgbl->{$gbl}{foo}{foo}: value ok 9435 - $vrgbl->{$gbl}{foo}{foo} = 123: no exception ok 9436 - $vrgbl->{$gbl}{foo}{foo} = 123: value ok 9437 - exists $vrgbl->{$gbl}{foo}{foo}: no exception ok 9438 - exists $vrgbl->{$gbl}{foo}{foo}: value ok 9439 - delete $vrgbl->{$gbl}{foo}{foo}: no exception ok 9440 - delete $vrgbl->{$gbl}{foo}{foo}: value ok 9441 - $vlex{"x$lex"}{foo}{foo}: no exception ok 9442 - $vlex{"x$lex"}{foo}{foo}: value ok 9443 - $vlex{"x$lex"}{foo}{foo} = 123: no exception ok 9444 - $vlex{"x$lex"}{foo}{foo} = 123: value ok 9445 - exists $vlex{"x$lex"}{foo}{foo}: no exception ok 9446 - exists $vlex{"x$lex"}{foo}{foo}: value ok 9447 - delete $vlex{"x$lex"}{foo}{foo}: no exception ok 9448 - delete $vlex{"x$lex"}{foo}{foo}: value ok 9449 - $vgbl{"x$lex"}{foo}{foo}: no exception ok 9450 - $vgbl{"x$lex"}{foo}{foo}: value ok 9451 - $vgbl{"x$lex"}{foo}{foo} = 123: no exception ok 9452 - $vgbl{"x$lex"}{foo}{foo} = 123: value ok 9453 - exists $vgbl{"x$lex"}{foo}{foo}: no exception ok 9454 - exists $vgbl{"x$lex"}{foo}{foo}: value ok 9455 - delete $vgbl{"x$lex"}{foo}{foo}: no exception ok 9456 - delete $vgbl{"x$lex"}{foo}{foo}: value ok 9457 - $vrlex->{"x$lex"}{foo}{foo}: no exception ok 9458 - $vrlex->{"x$lex"}{foo}{foo}: value ok 9459 - $vrlex->{"x$lex"}{foo}{foo} = 123: no exception ok 9460 - $vrlex->{"x$lex"}{foo}{foo} = 123: value ok 9461 - exists $vrlex->{"x$lex"}{foo}{foo}: no exception ok 9462 - exists $vrlex->{"x$lex"}{foo}{foo}: value ok 9463 - delete $vrlex->{"x$lex"}{foo}{foo}: no exception ok 9464 - delete $vrlex->{"x$lex"}{foo}{foo}: value ok 9465 - $vrgbl->{"x$lex"}{foo}{foo}: no exception ok 9466 - $vrgbl->{"x$lex"}{foo}{foo}: value ok 9467 - $vrgbl->{"x$lex"}{foo}{foo} = 123: no exception ok 9468 - $vrgbl->{"x$lex"}{foo}{foo} = 123: value ok 9469 - exists $vrgbl->{"x$lex"}{foo}{foo}: no exception ok 9470 - exists $vrgbl->{"x$lex"}{foo}{foo}: value ok 9471 - delete $vrgbl->{"x$lex"}{foo}{foo}: no exception ok 9472 - delete $vrgbl->{"x$lex"}{foo}{foo}: value ok 9473 - $vlex[0]{$lex}{foo}: no exception ok 9474 - $vlex[0]{$lex}{foo}: value ok 9475 - $vlex[0]{$lex}{foo} = 123: no exception ok 9476 - $vlex[0]{$lex}{foo} = 123: value ok 9477 - exists $vlex[0]{$lex}{foo}: no exception ok 9478 - exists $vlex[0]{$lex}{foo}: value ok 9479 - delete $vlex[0]{$lex}{foo}: no exception ok 9480 - delete $vlex[0]{$lex}{foo}: value ok 9481 - $vgbl[0]{$lex}{foo}: no exception ok 9482 - $vgbl[0]{$lex}{foo}: value ok 9483 - $vgbl[0]{$lex}{foo} = 123: no exception ok 9484 - $vgbl[0]{$lex}{foo} = 123: value ok 9485 - exists $vgbl[0]{$lex}{foo}: no exception ok 9486 - exists $vgbl[0]{$lex}{foo}: value ok 9487 - delete $vgbl[0]{$lex}{foo}: no exception ok 9488 - delete $vgbl[0]{$lex}{foo}: value ok 9489 - $vrlex->[0]{$lex}{foo}: no exception ok 9490 - $vrlex->[0]{$lex}{foo}: value ok 9491 - $vrlex->[0]{$lex}{foo} = 123: no exception ok 9492 - $vrlex->[0]{$lex}{foo} = 123: value ok 9493 - exists $vrlex->[0]{$lex}{foo}: no exception ok 9494 - exists $vrlex->[0]{$lex}{foo}: value ok 9495 - delete $vrlex->[0]{$lex}{foo}: no exception ok 9496 - delete $vrlex->[0]{$lex}{foo}: value ok 9497 - $vrgbl->[0]{$lex}{foo}: no exception ok 9498 - $vrgbl->[0]{$lex}{foo}: value ok 9499 - $vrgbl->[0]{$lex}{foo} = 123: no exception ok 9500 - $vrgbl->[0]{$lex}{foo} = 123: value ok 9501 - exists $vrgbl->[0]{$lex}{foo}: no exception ok 9502 - exists $vrgbl->[0]{$lex}{foo}: value ok 9503 - delete $vrgbl->[0]{$lex}{foo}: no exception ok 9504 - delete $vrgbl->[0]{$lex}{foo}: value ok 9505 - $vlex[$lex]{$lex}{foo}: no exception ok 9506 - $vlex[$lex]{$lex}{foo}: value ok 9507 - $vlex[$lex]{$lex}{foo} = 123: no exception ok 9508 - $vlex[$lex]{$lex}{foo} = 123: value ok 9509 - exists $vlex[$lex]{$lex}{foo}: no exception ok 9510 - exists $vlex[$lex]{$lex}{foo}: value ok 9511 - delete $vlex[$lex]{$lex}{foo}: no exception ok 9512 - delete $vlex[$lex]{$lex}{foo}: value ok 9513 - $vgbl[$lex]{$lex}{foo}: no exception ok 9514 - $vgbl[$lex]{$lex}{foo}: value ok 9515 - $vgbl[$lex]{$lex}{foo} = 123: no exception ok 9516 - $vgbl[$lex]{$lex}{foo} = 123: value ok 9517 - exists $vgbl[$lex]{$lex}{foo}: no exception ok 9518 - exists $vgbl[$lex]{$lex}{foo}: value ok 9519 - delete $vgbl[$lex]{$lex}{foo}: no exception ok 9520 - delete $vgbl[$lex]{$lex}{foo}: value ok 9521 - $vrlex->[$lex]{$lex}{foo}: no exception ok 9522 - $vrlex->[$lex]{$lex}{foo}: value ok 9523 - $vrlex->[$lex]{$lex}{foo} = 123: no exception ok 9524 - $vrlex->[$lex]{$lex}{foo} = 123: value ok 9525 - exists $vrlex->[$lex]{$lex}{foo}: no exception ok 9526 - exists $vrlex->[$lex]{$lex}{foo}: value ok 9527 - delete $vrlex->[$lex]{$lex}{foo}: no exception ok 9528 - delete $vrlex->[$lex]{$lex}{foo}: value ok 9529 - $vrgbl->[$lex]{$lex}{foo}: no exception ok 9530 - $vrgbl->[$lex]{$lex}{foo}: value ok 9531 - $vrgbl->[$lex]{$lex}{foo} = 123: no exception ok 9532 - $vrgbl->[$lex]{$lex}{foo} = 123: value ok 9533 - exists $vrgbl->[$lex]{$lex}{foo}: no exception ok 9534 - exists $vrgbl->[$lex]{$lex}{foo}: value ok 9535 - delete $vrgbl->[$lex]{$lex}{foo}: no exception ok 9536 - delete $vrgbl->[$lex]{$lex}{foo}: value ok 9537 - $vlex[$gbl]{$lex}{foo}: no exception ok 9538 - $vlex[$gbl]{$lex}{foo}: value ok 9539 - $vlex[$gbl]{$lex}{foo} = 123: no exception ok 9540 - $vlex[$gbl]{$lex}{foo} = 123: value ok 9541 - exists $vlex[$gbl]{$lex}{foo}: no exception ok 9542 - exists $vlex[$gbl]{$lex}{foo}: value ok 9543 - delete $vlex[$gbl]{$lex}{foo}: no exception ok 9544 - delete $vlex[$gbl]{$lex}{foo}: value ok 9545 - $vgbl[$gbl]{$lex}{foo}: no exception ok 9546 - $vgbl[$gbl]{$lex}{foo}: value ok 9547 - $vgbl[$gbl]{$lex}{foo} = 123: no exception ok 9548 - $vgbl[$gbl]{$lex}{foo} = 123: value ok 9549 - exists $vgbl[$gbl]{$lex}{foo}: no exception ok 9550 - exists $vgbl[$gbl]{$lex}{foo}: value ok 9551 - delete $vgbl[$gbl]{$lex}{foo}: no exception ok 9552 - delete $vgbl[$gbl]{$lex}{foo}: value ok 9553 - $vrlex->[$gbl]{$lex}{foo}: no exception ok 9554 - $vrlex->[$gbl]{$lex}{foo}: value ok 9555 - $vrlex->[$gbl]{$lex}{foo} = 123: no exception ok 9556 - $vrlex->[$gbl]{$lex}{foo} = 123: value ok 9557 - exists $vrlex->[$gbl]{$lex}{foo}: no exception ok 9558 - exists $vrlex->[$gbl]{$lex}{foo}: value ok 9559 - delete $vrlex->[$gbl]{$lex}{foo}: no exception ok 9560 - delete $vrlex->[$gbl]{$lex}{foo}: value ok 9561 - $vrgbl->[$gbl]{$lex}{foo}: no exception ok 9562 - $vrgbl->[$gbl]{$lex}{foo}: value ok 9563 - $vrgbl->[$gbl]{$lex}{foo} = 123: no exception ok 9564 - $vrgbl->[$gbl]{$lex}{foo} = 123: value ok 9565 - exists $vrgbl->[$gbl]{$lex}{foo}: no exception ok 9566 - exists $vrgbl->[$gbl]{$lex}{foo}: value ok 9567 - delete $vrgbl->[$gbl]{$lex}{foo}: no exception ok 9568 - delete $vrgbl->[$gbl]{$lex}{foo}: value ok 9569 - $vlex[$lex+1]{$lex}{foo}: no exception ok 9570 - $vlex[$lex+1]{$lex}{foo}: value ok 9571 - $vlex[$lex+1]{$lex}{foo} = 123: no exception ok 9572 - $vlex[$lex+1]{$lex}{foo} = 123: value ok 9573 - exists $vlex[$lex+1]{$lex}{foo}: no exception ok 9574 - exists $vlex[$lex+1]{$lex}{foo}: value ok 9575 - delete $vlex[$lex+1]{$lex}{foo}: no exception ok 9576 - delete $vlex[$lex+1]{$lex}{foo}: value ok 9577 - $vgbl[$lex+1]{$lex}{foo}: no exception ok 9578 - $vgbl[$lex+1]{$lex}{foo}: value ok 9579 - $vgbl[$lex+1]{$lex}{foo} = 123: no exception ok 9580 - $vgbl[$lex+1]{$lex}{foo} = 123: value ok 9581 - exists $vgbl[$lex+1]{$lex}{foo}: no exception ok 9582 - exists $vgbl[$lex+1]{$lex}{foo}: value ok 9583 - delete $vgbl[$lex+1]{$lex}{foo}: no exception ok 9584 - delete $vgbl[$lex+1]{$lex}{foo}: value ok 9585 - $vrlex->[$lex+1]{$lex}{foo}: no exception ok 9586 - $vrlex->[$lex+1]{$lex}{foo}: value ok 9587 - $vrlex->[$lex+1]{$lex}{foo} = 123: no exception ok 9588 - $vrlex->[$lex+1]{$lex}{foo} = 123: value ok 9589 - exists $vrlex->[$lex+1]{$lex}{foo}: no exception ok 9590 - exists $vrlex->[$lex+1]{$lex}{foo}: value ok 9591 - delete $vrlex->[$lex+1]{$lex}{foo}: no exception ok 9592 - delete $vrlex->[$lex+1]{$lex}{foo}: value ok 9593 - $vrgbl->[$lex+1]{$lex}{foo}: no exception ok 9594 - $vrgbl->[$lex+1]{$lex}{foo}: value ok 9595 - $vrgbl->[$lex+1]{$lex}{foo} = 123: no exception ok 9596 - $vrgbl->[$lex+1]{$lex}{foo} = 123: value ok 9597 - exists $vrgbl->[$lex+1]{$lex}{foo}: no exception ok 9598 - exists $vrgbl->[$lex+1]{$lex}{foo}: value ok 9599 - delete $vrgbl->[$lex+1]{$lex}{foo}: no exception ok 9600 - delete $vrgbl->[$lex+1]{$lex}{foo}: value ok 9601 - $vlex{foo}{$lex}{foo}: no exception ok 9602 - $vlex{foo}{$lex}{foo}: value ok 9603 - $vlex{foo}{$lex}{foo} = 123: no exception ok 9604 - $vlex{foo}{$lex}{foo} = 123: value ok 9605 - exists $vlex{foo}{$lex}{foo}: no exception ok 9606 - exists $vlex{foo}{$lex}{foo}: value ok 9607 - delete $vlex{foo}{$lex}{foo}: no exception ok 9608 - delete $vlex{foo}{$lex}{foo}: value ok 9609 - $vgbl{foo}{$lex}{foo}: no exception ok 9610 - $vgbl{foo}{$lex}{foo}: value ok 9611 - $vgbl{foo}{$lex}{foo} = 123: no exception ok 9612 - $vgbl{foo}{$lex}{foo} = 123: value ok 9613 - exists $vgbl{foo}{$lex}{foo}: no exception ok 9614 - exists $vgbl{foo}{$lex}{foo}: value ok 9615 - delete $vgbl{foo}{$lex}{foo}: no exception ok 9616 - delete $vgbl{foo}{$lex}{foo}: value ok 9617 - $vrlex->{foo}{$lex}{foo}: no exception ok 9618 - $vrlex->{foo}{$lex}{foo}: value ok 9619 - $vrlex->{foo}{$lex}{foo} = 123: no exception ok 9620 - $vrlex->{foo}{$lex}{foo} = 123: value ok 9621 - exists $vrlex->{foo}{$lex}{foo}: no exception ok 9622 - exists $vrlex->{foo}{$lex}{foo}: value ok 9623 - delete $vrlex->{foo}{$lex}{foo}: no exception ok 9624 - delete $vrlex->{foo}{$lex}{foo}: value ok 9625 - $vrgbl->{foo}{$lex}{foo}: no exception ok 9626 - $vrgbl->{foo}{$lex}{foo}: value ok 9627 - $vrgbl->{foo}{$lex}{foo} = 123: no exception ok 9628 - $vrgbl->{foo}{$lex}{foo} = 123: value ok 9629 - exists $vrgbl->{foo}{$lex}{foo}: no exception ok 9630 - exists $vrgbl->{foo}{$lex}{foo}: value ok 9631 - delete $vrgbl->{foo}{$lex}{foo}: no exception ok 9632 - delete $vrgbl->{foo}{$lex}{foo}: value ok 9633 - $vlex{$lex}{$lex}{foo}: no exception ok 9634 - $vlex{$lex}{$lex}{foo}: value ok 9635 - $vlex{$lex}{$lex}{foo} = 123: no exception ok 9636 - $vlex{$lex}{$lex}{foo} = 123: value ok 9637 - exists $vlex{$lex}{$lex}{foo}: no exception ok 9638 - exists $vlex{$lex}{$lex}{foo}: value ok 9639 - delete $vlex{$lex}{$lex}{foo}: no exception ok 9640 - delete $vlex{$lex}{$lex}{foo}: value ok 9641 - $vgbl{$lex}{$lex}{foo}: no exception ok 9642 - $vgbl{$lex}{$lex}{foo}: value ok 9643 - $vgbl{$lex}{$lex}{foo} = 123: no exception ok 9644 - $vgbl{$lex}{$lex}{foo} = 123: value ok 9645 - exists $vgbl{$lex}{$lex}{foo}: no exception ok 9646 - exists $vgbl{$lex}{$lex}{foo}: value ok 9647 - delete $vgbl{$lex}{$lex}{foo}: no exception ok 9648 - delete $vgbl{$lex}{$lex}{foo}: value ok 9649 - $vrlex->{$lex}{$lex}{foo}: no exception ok 9650 - $vrlex->{$lex}{$lex}{foo}: value ok 9651 - $vrlex->{$lex}{$lex}{foo} = 123: no exception ok 9652 - $vrlex->{$lex}{$lex}{foo} = 123: value ok 9653 - exists $vrlex->{$lex}{$lex}{foo}: no exception ok 9654 - exists $vrlex->{$lex}{$lex}{foo}: value ok 9655 - delete $vrlex->{$lex}{$lex}{foo}: no exception ok 9656 - delete $vrlex->{$lex}{$lex}{foo}: value ok 9657 - $vrgbl->{$lex}{$lex}{foo}: no exception ok 9658 - $vrgbl->{$lex}{$lex}{foo}: value ok 9659 - $vrgbl->{$lex}{$lex}{foo} = 123: no exception ok 9660 - $vrgbl->{$lex}{$lex}{foo} = 123: value ok 9661 - exists $vrgbl->{$lex}{$lex}{foo}: no exception ok 9662 - exists $vrgbl->{$lex}{$lex}{foo}: value ok 9663 - delete $vrgbl->{$lex}{$lex}{foo}: no exception ok 9664 - delete $vrgbl->{$lex}{$lex}{foo}: value ok 9665 - $vlex{$gbl}{$lex}{foo}: no exception ok 9666 - $vlex{$gbl}{$lex}{foo}: value ok 9667 - $vlex{$gbl}{$lex}{foo} = 123: no exception ok 9668 - $vlex{$gbl}{$lex}{foo} = 123: value ok 9669 - exists $vlex{$gbl}{$lex}{foo}: no exception ok 9670 - exists $vlex{$gbl}{$lex}{foo}: value ok 9671 - delete $vlex{$gbl}{$lex}{foo}: no exception ok 9672 - delete $vlex{$gbl}{$lex}{foo}: value ok 9673 - $vgbl{$gbl}{$lex}{foo}: no exception ok 9674 - $vgbl{$gbl}{$lex}{foo}: value ok 9675 - $vgbl{$gbl}{$lex}{foo} = 123: no exception ok 9676 - $vgbl{$gbl}{$lex}{foo} = 123: value ok 9677 - exists $vgbl{$gbl}{$lex}{foo}: no exception ok 9678 - exists $vgbl{$gbl}{$lex}{foo}: value ok 9679 - delete $vgbl{$gbl}{$lex}{foo}: no exception ok 9680 - delete $vgbl{$gbl}{$lex}{foo}: value ok 9681 - $vrlex->{$gbl}{$lex}{foo}: no exception ok 9682 - $vrlex->{$gbl}{$lex}{foo}: value ok 9683 - $vrlex->{$gbl}{$lex}{foo} = 123: no exception ok 9684 - $vrlex->{$gbl}{$lex}{foo} = 123: value ok 9685 - exists $vrlex->{$gbl}{$lex}{foo}: no exception ok 9686 - exists $vrlex->{$gbl}{$lex}{foo}: value ok 9687 - delete $vrlex->{$gbl}{$lex}{foo}: no exception ok 9688 - delete $vrlex->{$gbl}{$lex}{foo}: value ok 9689 - $vrgbl->{$gbl}{$lex}{foo}: no exception ok 9690 - $vrgbl->{$gbl}{$lex}{foo}: value ok 9691 - $vrgbl->{$gbl}{$lex}{foo} = 123: no exception ok 9692 - $vrgbl->{$gbl}{$lex}{foo} = 123: value ok 9693 - exists $vrgbl->{$gbl}{$lex}{foo}: no exception ok 9694 - exists $vrgbl->{$gbl}{$lex}{foo}: value ok 9695 - delete $vrgbl->{$gbl}{$lex}{foo}: no exception ok 9696 - delete $vrgbl->{$gbl}{$lex}{foo}: value ok 9697 - $vlex{"x$lex"}{$lex}{foo}: no exception ok 9698 - $vlex{"x$lex"}{$lex}{foo}: value ok 9699 - $vlex{"x$lex"}{$lex}{foo} = 123: no exception ok 9700 - $vlex{"x$lex"}{$lex}{foo} = 123: value ok 9701 - exists $vlex{"x$lex"}{$lex}{foo}: no exception ok 9702 - exists $vlex{"x$lex"}{$lex}{foo}: value ok 9703 - delete $vlex{"x$lex"}{$lex}{foo}: no exception ok 9704 - delete $vlex{"x$lex"}{$lex}{foo}: value ok 9705 - $vgbl{"x$lex"}{$lex}{foo}: no exception ok 9706 - $vgbl{"x$lex"}{$lex}{foo}: value ok 9707 - $vgbl{"x$lex"}{$lex}{foo} = 123: no exception ok 9708 - $vgbl{"x$lex"}{$lex}{foo} = 123: value ok 9709 - exists $vgbl{"x$lex"}{$lex}{foo}: no exception ok 9710 - exists $vgbl{"x$lex"}{$lex}{foo}: value ok 9711 - delete $vgbl{"x$lex"}{$lex}{foo}: no exception ok 9712 - delete $vgbl{"x$lex"}{$lex}{foo}: value ok 9713 - $vrlex->{"x$lex"}{$lex}{foo}: no exception ok 9714 - $vrlex->{"x$lex"}{$lex}{foo}: value ok 9715 - $vrlex->{"x$lex"}{$lex}{foo} = 123: no exception ok 9716 - $vrlex->{"x$lex"}{$lex}{foo} = 123: value ok 9717 - exists $vrlex->{"x$lex"}{$lex}{foo}: no exception ok 9718 - exists $vrlex->{"x$lex"}{$lex}{foo}: value ok 9719 - delete $vrlex->{"x$lex"}{$lex}{foo}: no exception ok 9720 - delete $vrlex->{"x$lex"}{$lex}{foo}: value ok 9721 - $vrgbl->{"x$lex"}{$lex}{foo}: no exception ok 9722 - $vrgbl->{"x$lex"}{$lex}{foo}: value ok 9723 - $vrgbl->{"x$lex"}{$lex}{foo} = 123: no exception ok 9724 - $vrgbl->{"x$lex"}{$lex}{foo} = 123: value ok 9725 - exists $vrgbl->{"x$lex"}{$lex}{foo}: no exception ok 9726 - exists $vrgbl->{"x$lex"}{$lex}{foo}: value ok 9727 - delete $vrgbl->{"x$lex"}{$lex}{foo}: no exception ok 9728 - delete $vrgbl->{"x$lex"}{$lex}{foo}: value ok 9729 - $vlex[0]{$gbl}{foo}: no exception ok 9730 - $vlex[0]{$gbl}{foo}: value ok 9731 - $vlex[0]{$gbl}{foo} = 123: no exception ok 9732 - $vlex[0]{$gbl}{foo} = 123: value ok 9733 - exists $vlex[0]{$gbl}{foo}: no exception ok 9734 - exists $vlex[0]{$gbl}{foo}: value ok 9735 - delete $vlex[0]{$gbl}{foo}: no exception ok 9736 - delete $vlex[0]{$gbl}{foo}: value ok 9737 - $vgbl[0]{$gbl}{foo}: no exception ok 9738 - $vgbl[0]{$gbl}{foo}: value ok 9739 - $vgbl[0]{$gbl}{foo} = 123: no exception ok 9740 - $vgbl[0]{$gbl}{foo} = 123: value ok 9741 - exists $vgbl[0]{$gbl}{foo}: no exception ok 9742 - exists $vgbl[0]{$gbl}{foo}: value ok 9743 - delete $vgbl[0]{$gbl}{foo}: no exception ok 9744 - delete $vgbl[0]{$gbl}{foo}: value ok 9745 - $vrlex->[0]{$gbl}{foo}: no exception ok 9746 - $vrlex->[0]{$gbl}{foo}: value ok 9747 - $vrlex->[0]{$gbl}{foo} = 123: no exception ok 9748 - $vrlex->[0]{$gbl}{foo} = 123: value ok 9749 - exists $vrlex->[0]{$gbl}{foo}: no exception ok 9750 - exists $vrlex->[0]{$gbl}{foo}: value ok 9751 - delete $vrlex->[0]{$gbl}{foo}: no exception ok 9752 - delete $vrlex->[0]{$gbl}{foo}: value ok 9753 - $vrgbl->[0]{$gbl}{foo}: no exception ok 9754 - $vrgbl->[0]{$gbl}{foo}: value ok 9755 - $vrgbl->[0]{$gbl}{foo} = 123: no exception ok 9756 - $vrgbl->[0]{$gbl}{foo} = 123: value ok 9757 - exists $vrgbl->[0]{$gbl}{foo}: no exception ok 9758 - exists $vrgbl->[0]{$gbl}{foo}: value ok 9759 - delete $vrgbl->[0]{$gbl}{foo}: no exception ok 9760 - delete $vrgbl->[0]{$gbl}{foo}: value ok 9761 - $vlex[$lex]{$gbl}{foo}: no exception ok 9762 - $vlex[$lex]{$gbl}{foo}: value ok 9763 - $vlex[$lex]{$gbl}{foo} = 123: no exception ok 9764 - $vlex[$lex]{$gbl}{foo} = 123: value ok 9765 - exists $vlex[$lex]{$gbl}{foo}: no exception ok 9766 - exists $vlex[$lex]{$gbl}{foo}: value ok 9767 - delete $vlex[$lex]{$gbl}{foo}: no exception ok 9768 - delete $vlex[$lex]{$gbl}{foo}: value ok 9769 - $vgbl[$lex]{$gbl}{foo}: no exception ok 9770 - $vgbl[$lex]{$gbl}{foo}: value ok 9771 - $vgbl[$lex]{$gbl}{foo} = 123: no exception ok 9772 - $vgbl[$lex]{$gbl}{foo} = 123: value ok 9773 - exists $vgbl[$lex]{$gbl}{foo}: no exception ok 9774 - exists $vgbl[$lex]{$gbl}{foo}: value ok 9775 - delete $vgbl[$lex]{$gbl}{foo}: no exception ok 9776 - delete $vgbl[$lex]{$gbl}{foo}: value ok 9777 - $vrlex->[$lex]{$gbl}{foo}: no exception ok 9778 - $vrlex->[$lex]{$gbl}{foo}: value ok 9779 - $vrlex->[$lex]{$gbl}{foo} = 123: no exception ok 9780 - $vrlex->[$lex]{$gbl}{foo} = 123: value ok 9781 - exists $vrlex->[$lex]{$gbl}{foo}: no exception ok 9782 - exists $vrlex->[$lex]{$gbl}{foo}: value ok 9783 - delete $vrlex->[$lex]{$gbl}{foo}: no exception ok 9784 - delete $vrlex->[$lex]{$gbl}{foo}: value ok 9785 - $vrgbl->[$lex]{$gbl}{foo}: no exception ok 9786 - $vrgbl->[$lex]{$gbl}{foo}: value ok 9787 - $vrgbl->[$lex]{$gbl}{foo} = 123: no exception ok 9788 - $vrgbl->[$lex]{$gbl}{foo} = 123: value ok 9789 - exists $vrgbl->[$lex]{$gbl}{foo}: no exception ok 9790 - exists $vrgbl->[$lex]{$gbl}{foo}: value ok 9791 - delete $vrgbl->[$lex]{$gbl}{foo}: no exception ok 9792 - delete $vrgbl->[$lex]{$gbl}{foo}: value ok 9793 - $vlex[$gbl]{$gbl}{foo}: no exception ok 9794 - $vlex[$gbl]{$gbl}{foo}: value ok 9795 - $vlex[$gbl]{$gbl}{foo} = 123: no exception ok 9796 - $vlex[$gbl]{$gbl}{foo} = 123: value ok 9797 - exists $vlex[$gbl]{$gbl}{foo}: no exception ok 9798 - exists $vlex[$gbl]{$gbl}{foo}: value ok 9799 - delete $vlex[$gbl]{$gbl}{foo}: no exception ok 9800 - delete $vlex[$gbl]{$gbl}{foo}: value ok 9801 - $vgbl[$gbl]{$gbl}{foo}: no exception ok 9802 - $vgbl[$gbl]{$gbl}{foo}: value ok 9803 - $vgbl[$gbl]{$gbl}{foo} = 123: no exception ok 9804 - $vgbl[$gbl]{$gbl}{foo} = 123: value ok 9805 - exists $vgbl[$gbl]{$gbl}{foo}: no exception ok 9806 - exists $vgbl[$gbl]{$gbl}{foo}: value ok 9807 - delete $vgbl[$gbl]{$gbl}{foo}: no exception ok 9808 - delete $vgbl[$gbl]{$gbl}{foo}: value ok 9809 - $vrlex->[$gbl]{$gbl}{foo}: no exception ok 9810 - $vrlex->[$gbl]{$gbl}{foo}: value ok 9811 - $vrlex->[$gbl]{$gbl}{foo} = 123: no exception ok 9812 - $vrlex->[$gbl]{$gbl}{foo} = 123: value ok 9813 - exists $vrlex->[$gbl]{$gbl}{foo}: no exception ok 9814 - exists $vrlex->[$gbl]{$gbl}{foo}: value ok 9815 - delete $vrlex->[$gbl]{$gbl}{foo}: no exception ok 9816 - delete $vrlex->[$gbl]{$gbl}{foo}: value ok 9817 - $vrgbl->[$gbl]{$gbl}{foo}: no exception ok 9818 - $vrgbl->[$gbl]{$gbl}{foo}: value ok 9819 - $vrgbl->[$gbl]{$gbl}{foo} = 123: no exception ok 9820 - $vrgbl->[$gbl]{$gbl}{foo} = 123: value ok 9821 - exists $vrgbl->[$gbl]{$gbl}{foo}: no exception ok 9822 - exists $vrgbl->[$gbl]{$gbl}{foo}: value ok 9823 - delete $vrgbl->[$gbl]{$gbl}{foo}: no exception ok 9824 - delete $vrgbl->[$gbl]{$gbl}{foo}: value ok 9825 - $vlex[$lex+1]{$gbl}{foo}: no exception ok 9826 - $vlex[$lex+1]{$gbl}{foo}: value ok 9827 - $vlex[$lex+1]{$gbl}{foo} = 123: no exception ok 9828 - $vlex[$lex+1]{$gbl}{foo} = 123: value ok 9829 - exists $vlex[$lex+1]{$gbl}{foo}: no exception ok 9830 - exists $vlex[$lex+1]{$gbl}{foo}: value ok 9831 - delete $vlex[$lex+1]{$gbl}{foo}: no exception ok 9832 - delete $vlex[$lex+1]{$gbl}{foo}: value ok 9833 - $vgbl[$lex+1]{$gbl}{foo}: no exception ok 9834 - $vgbl[$lex+1]{$gbl}{foo}: value ok 9835 - $vgbl[$lex+1]{$gbl}{foo} = 123: no exception ok 9836 - $vgbl[$lex+1]{$gbl}{foo} = 123: value ok 9837 - exists $vgbl[$lex+1]{$gbl}{foo}: no exception ok 9838 - exists $vgbl[$lex+1]{$gbl}{foo}: value ok 9839 - delete $vgbl[$lex+1]{$gbl}{foo}: no exception ok 9840 - delete $vgbl[$lex+1]{$gbl}{foo}: value ok 9841 - $vrlex->[$lex+1]{$gbl}{foo}: no exception ok 9842 - $vrlex->[$lex+1]{$gbl}{foo}: value ok 9843 - $vrlex->[$lex+1]{$gbl}{foo} = 123: no exception ok 9844 - $vrlex->[$lex+1]{$gbl}{foo} = 123: value ok 9845 - exists $vrlex->[$lex+1]{$gbl}{foo}: no exception ok 9846 - exists $vrlex->[$lex+1]{$gbl}{foo}: value ok 9847 - delete $vrlex->[$lex+1]{$gbl}{foo}: no exception ok 9848 - delete $vrlex->[$lex+1]{$gbl}{foo}: value ok 9849 - $vrgbl->[$lex+1]{$gbl}{foo}: no exception ok 9850 - $vrgbl->[$lex+1]{$gbl}{foo}: value ok 9851 - $vrgbl->[$lex+1]{$gbl}{foo} = 123: no exception ok 9852 - $vrgbl->[$lex+1]{$gbl}{foo} = 123: value ok 9853 - exists $vrgbl->[$lex+1]{$gbl}{foo}: no exception ok 9854 - exists $vrgbl->[$lex+1]{$gbl}{foo}: value ok 9855 - delete $vrgbl->[$lex+1]{$gbl}{foo}: no exception ok 9856 - delete $vrgbl->[$lex+1]{$gbl}{foo}: value ok 9857 - $vlex{foo}{$gbl}{foo}: no exception ok 9858 - $vlex{foo}{$gbl}{foo}: value ok 9859 - $vlex{foo}{$gbl}{foo} = 123: no exception ok 9860 - $vlex{foo}{$gbl}{foo} = 123: value ok 9861 - exists $vlex{foo}{$gbl}{foo}: no exception ok 9862 - exists $vlex{foo}{$gbl}{foo}: value ok 9863 - delete $vlex{foo}{$gbl}{foo}: no exception ok 9864 - delete $vlex{foo}{$gbl}{foo}: value ok 9865 - $vgbl{foo}{$gbl}{foo}: no exception ok 9866 - $vgbl{foo}{$gbl}{foo}: value ok 9867 - $vgbl{foo}{$gbl}{foo} = 123: no exception ok 9868 - $vgbl{foo}{$gbl}{foo} = 123: value ok 9869 - exists $vgbl{foo}{$gbl}{foo}: no exception ok 9870 - exists $vgbl{foo}{$gbl}{foo}: value ok 9871 - delete $vgbl{foo}{$gbl}{foo}: no exception ok 9872 - delete $vgbl{foo}{$gbl}{foo}: value ok 9873 - $vrlex->{foo}{$gbl}{foo}: no exception ok 9874 - $vrlex->{foo}{$gbl}{foo}: value ok 9875 - $vrlex->{foo}{$gbl}{foo} = 123: no exception ok 9876 - $vrlex->{foo}{$gbl}{foo} = 123: value ok 9877 - exists $vrlex->{foo}{$gbl}{foo}: no exception ok 9878 - exists $vrlex->{foo}{$gbl}{foo}: value ok 9879 - delete $vrlex->{foo}{$gbl}{foo}: no exception ok 9880 - delete $vrlex->{foo}{$gbl}{foo}: value ok 9881 - $vrgbl->{foo}{$gbl}{foo}: no exception ok 9882 - $vrgbl->{foo}{$gbl}{foo}: value ok 9883 - $vrgbl->{foo}{$gbl}{foo} = 123: no exception ok 9884 - $vrgbl->{foo}{$gbl}{foo} = 123: value ok 9885 - exists $vrgbl->{foo}{$gbl}{foo}: no exception ok 9886 - exists $vrgbl->{foo}{$gbl}{foo}: value ok 9887 - delete $vrgbl->{foo}{$gbl}{foo}: no exception ok 9888 - delete $vrgbl->{foo}{$gbl}{foo}: value ok 9889 - $vlex{$lex}{$gbl}{foo}: no exception ok 9890 - $vlex{$lex}{$gbl}{foo}: value ok 9891 - $vlex{$lex}{$gbl}{foo} = 123: no exception ok 9892 - $vlex{$lex}{$gbl}{foo} = 123: value ok 9893 - exists $vlex{$lex}{$gbl}{foo}: no exception ok 9894 - exists $vlex{$lex}{$gbl}{foo}: value ok 9895 - delete $vlex{$lex}{$gbl}{foo}: no exception ok 9896 - delete $vlex{$lex}{$gbl}{foo}: value ok 9897 - $vgbl{$lex}{$gbl}{foo}: no exception ok 9898 - $vgbl{$lex}{$gbl}{foo}: value ok 9899 - $vgbl{$lex}{$gbl}{foo} = 123: no exception ok 9900 - $vgbl{$lex}{$gbl}{foo} = 123: value ok 9901 - exists $vgbl{$lex}{$gbl}{foo}: no exception ok 9902 - exists $vgbl{$lex}{$gbl}{foo}: value ok 9903 - delete $vgbl{$lex}{$gbl}{foo}: no exception ok 9904 - delete $vgbl{$lex}{$gbl}{foo}: value ok 9905 - $vrlex->{$lex}{$gbl}{foo}: no exception ok 9906 - $vrlex->{$lex}{$gbl}{foo}: value ok 9907 - $vrlex->{$lex}{$gbl}{foo} = 123: no exception ok 9908 - $vrlex->{$lex}{$gbl}{foo} = 123: value ok 9909 - exists $vrlex->{$lex}{$gbl}{foo}: no exception ok 9910 - exists $vrlex->{$lex}{$gbl}{foo}: value ok 9911 - delete $vrlex->{$lex}{$gbl}{foo}: no exception ok 9912 - delete $vrlex->{$lex}{$gbl}{foo}: value ok 9913 - $vrgbl->{$lex}{$gbl}{foo}: no exception ok 9914 - $vrgbl->{$lex}{$gbl}{foo}: value ok 9915 - $vrgbl->{$lex}{$gbl}{foo} = 123: no exception ok 9916 - $vrgbl->{$lex}{$gbl}{foo} = 123: value ok 9917 - exists $vrgbl->{$lex}{$gbl}{foo}: no exception ok 9918 - exists $vrgbl->{$lex}{$gbl}{foo}: value ok 9919 - delete $vrgbl->{$lex}{$gbl}{foo}: no exception ok 9920 - delete $vrgbl->{$lex}{$gbl}{foo}: value ok 9921 - $vlex{$gbl}{$gbl}{foo}: no exception ok 9922 - $vlex{$gbl}{$gbl}{foo}: value ok 9923 - $vlex{$gbl}{$gbl}{foo} = 123: no exception ok 9924 - $vlex{$gbl}{$gbl}{foo} = 123: value ok 9925 - exists $vlex{$gbl}{$gbl}{foo}: no exception ok 9926 - exists $vlex{$gbl}{$gbl}{foo}: value ok 9927 - delete $vlex{$gbl}{$gbl}{foo}: no exception ok 9928 - delete $vlex{$gbl}{$gbl}{foo}: value ok 9929 - $vgbl{$gbl}{$gbl}{foo}: no exception ok 9930 - $vgbl{$gbl}{$gbl}{foo}: value ok 9931 - $vgbl{$gbl}{$gbl}{foo} = 123: no exception ok 9932 - $vgbl{$gbl}{$gbl}{foo} = 123: value ok 9933 - exists $vgbl{$gbl}{$gbl}{foo}: no exception ok 9934 - exists $vgbl{$gbl}{$gbl}{foo}: value ok 9935 - delete $vgbl{$gbl}{$gbl}{foo}: no exception ok 9936 - delete $vgbl{$gbl}{$gbl}{foo}: value ok 9937 - $vrlex->{$gbl}{$gbl}{foo}: no exception ok 9938 - $vrlex->{$gbl}{$gbl}{foo}: value ok 9939 - $vrlex->{$gbl}{$gbl}{foo} = 123: no exception ok 9940 - $vrlex->{$gbl}{$gbl}{foo} = 123: value ok 9941 - exists $vrlex->{$gbl}{$gbl}{foo}: no exception ok 9942 - exists $vrlex->{$gbl}{$gbl}{foo}: value ok 9943 - delete $vrlex->{$gbl}{$gbl}{foo}: no exception ok 9944 - delete $vrlex->{$gbl}{$gbl}{foo}: value ok 9945 - $vrgbl->{$gbl}{$gbl}{foo}: no exception ok 9946 - $vrgbl->{$gbl}{$gbl}{foo}: value ok 9947 - $vrgbl->{$gbl}{$gbl}{foo} = 123: no exception ok 9948 - $vrgbl->{$gbl}{$gbl}{foo} = 123: value ok 9949 - exists $vrgbl->{$gbl}{$gbl}{foo}: no exception ok 9950 - exists $vrgbl->{$gbl}{$gbl}{foo}: value ok 9951 - delete $vrgbl->{$gbl}{$gbl}{foo}: no exception ok 9952 - delete $vrgbl->{$gbl}{$gbl}{foo}: value ok 9953 - $vlex{"x$lex"}{$gbl}{foo}: no exception ok 9954 - $vlex{"x$lex"}{$gbl}{foo}: value ok 9955 - $vlex{"x$lex"}{$gbl}{foo} = 123: no exception ok 9956 - $vlex{"x$lex"}{$gbl}{foo} = 123: value ok 9957 - exists $vlex{"x$lex"}{$gbl}{foo}: no exception ok 9958 - exists $vlex{"x$lex"}{$gbl}{foo}: value ok 9959 - delete $vlex{"x$lex"}{$gbl}{foo}: no exception ok 9960 - delete $vlex{"x$lex"}{$gbl}{foo}: value ok 9961 - $vgbl{"x$lex"}{$gbl}{foo}: no exception ok 9962 - $vgbl{"x$lex"}{$gbl}{foo}: value ok 9963 - $vgbl{"x$lex"}{$gbl}{foo} = 123: no exception ok 9964 - $vgbl{"x$lex"}{$gbl}{foo} = 123: value ok 9965 - exists $vgbl{"x$lex"}{$gbl}{foo}: no exception ok 9966 - exists $vgbl{"x$lex"}{$gbl}{foo}: value ok 9967 - delete $vgbl{"x$lex"}{$gbl}{foo}: no exception ok 9968 - delete $vgbl{"x$lex"}{$gbl}{foo}: value ok 9969 - $vrlex->{"x$lex"}{$gbl}{foo}: no exception ok 9970 - $vrlex->{"x$lex"}{$gbl}{foo}: value ok 9971 - $vrlex->{"x$lex"}{$gbl}{foo} = 123: no exception ok 9972 - $vrlex->{"x$lex"}{$gbl}{foo} = 123: value ok 9973 - exists $vrlex->{"x$lex"}{$gbl}{foo}: no exception ok 9974 - exists $vrlex->{"x$lex"}{$gbl}{foo}: value ok 9975 - delete $vrlex->{"x$lex"}{$gbl}{foo}: no exception ok 9976 - delete $vrlex->{"x$lex"}{$gbl}{foo}: value ok 9977 - $vrgbl->{"x$lex"}{$gbl}{foo}: no exception ok 9978 - $vrgbl->{"x$lex"}{$gbl}{foo}: value ok 9979 - $vrgbl->{"x$lex"}{$gbl}{foo} = 123: no exception ok 9980 - $vrgbl->{"x$lex"}{$gbl}{foo} = 123: value ok 9981 - exists $vrgbl->{"x$lex"}{$gbl}{foo}: no exception ok 9982 - exists $vrgbl->{"x$lex"}{$gbl}{foo}: value ok 9983 - delete $vrgbl->{"x$lex"}{$gbl}{foo}: no exception ok 9984 - delete $vrgbl->{"x$lex"}{$gbl}{foo}: value ok 9985 - $vlex[0]{"x$lex"}{foo}: no exception ok 9986 - $vlex[0]{"x$lex"}{foo}: value ok 9987 - $vlex[0]{"x$lex"}{foo} = 123: no exception ok 9988 - $vlex[0]{"x$lex"}{foo} = 123: value ok 9989 - exists $vlex[0]{"x$lex"}{foo}: no exception ok 9990 - exists $vlex[0]{"x$lex"}{foo}: value ok 9991 - delete $vlex[0]{"x$lex"}{foo}: no exception ok 9992 - delete $vlex[0]{"x$lex"}{foo}: value ok 9993 - $vgbl[0]{"x$lex"}{foo}: no exception ok 9994 - $vgbl[0]{"x$lex"}{foo}: value ok 9995 - $vgbl[0]{"x$lex"}{foo} = 123: no exception ok 9996 - $vgbl[0]{"x$lex"}{foo} = 123: value ok 9997 - exists $vgbl[0]{"x$lex"}{foo}: no exception ok 9998 - exists $vgbl[0]{"x$lex"}{foo}: value ok 9999 - delete $vgbl[0]{"x$lex"}{foo}: no exception ok 10000 - delete $vgbl[0]{"x$lex"}{foo}: value ok 10001 - $vrlex->[0]{"x$lex"}{foo}: no exception ok 10002 - $vrlex->[0]{"x$lex"}{foo}: value ok 10003 - $vrlex->[0]{"x$lex"}{foo} = 123: no exception ok 10004 - $vrlex->[0]{"x$lex"}{foo} = 123: value ok 10005 - exists $vrlex->[0]{"x$lex"}{foo}: no exception ok 10006 - exists $vrlex->[0]{"x$lex"}{foo}: value ok 10007 - delete $vrlex->[0]{"x$lex"}{foo}: no exception ok 10008 - delete $vrlex->[0]{"x$lex"}{foo}: value ok 10009 - $vrgbl->[0]{"x$lex"}{foo}: no exception ok 10010 - $vrgbl->[0]{"x$lex"}{foo}: value ok 10011 - $vrgbl->[0]{"x$lex"}{foo} = 123: no exception ok 10012 - $vrgbl->[0]{"x$lex"}{foo} = 123: value ok 10013 - exists $vrgbl->[0]{"x$lex"}{foo}: no exception ok 10014 - exists $vrgbl->[0]{"x$lex"}{foo}: value ok 10015 - delete $vrgbl->[0]{"x$lex"}{foo}: no exception ok 10016 - delete $vrgbl->[0]{"x$lex"}{foo}: value ok 10017 - $vlex[$lex]{"x$lex"}{foo}: no exception ok 10018 - $vlex[$lex]{"x$lex"}{foo}: value ok 10019 - $vlex[$lex]{"x$lex"}{foo} = 123: no exception ok 10020 - $vlex[$lex]{"x$lex"}{foo} = 123: value ok 10021 - exists $vlex[$lex]{"x$lex"}{foo}: no exception ok 10022 - exists $vlex[$lex]{"x$lex"}{foo}: value ok 10023 - delete $vlex[$lex]{"x$lex"}{foo}: no exception ok 10024 - delete $vlex[$lex]{"x$lex"}{foo}: value ok 10025 - $vgbl[$lex]{"x$lex"}{foo}: no exception ok 10026 - $vgbl[$lex]{"x$lex"}{foo}: value ok 10027 - $vgbl[$lex]{"x$lex"}{foo} = 123: no exception ok 10028 - $vgbl[$lex]{"x$lex"}{foo} = 123: value ok 10029 - exists $vgbl[$lex]{"x$lex"}{foo}: no exception ok 10030 - exists $vgbl[$lex]{"x$lex"}{foo}: value ok 10031 - delete $vgbl[$lex]{"x$lex"}{foo}: no exception ok 10032 - delete $vgbl[$lex]{"x$lex"}{foo}: value ok 10033 - $vrlex->[$lex]{"x$lex"}{foo}: no exception ok 10034 - $vrlex->[$lex]{"x$lex"}{foo}: value ok 10035 - $vrlex->[$lex]{"x$lex"}{foo} = 123: no exception ok 10036 - $vrlex->[$lex]{"x$lex"}{foo} = 123: value ok 10037 - exists $vrlex->[$lex]{"x$lex"}{foo}: no exception ok 10038 - exists $vrlex->[$lex]{"x$lex"}{foo}: value ok 10039 - delete $vrlex->[$lex]{"x$lex"}{foo}: no exception ok 10040 - delete $vrlex->[$lex]{"x$lex"}{foo}: value ok 10041 - $vrgbl->[$lex]{"x$lex"}{foo}: no exception ok 10042 - $vrgbl->[$lex]{"x$lex"}{foo}: value ok 10043 - $vrgbl->[$lex]{"x$lex"}{foo} = 123: no exception ok 10044 - $vrgbl->[$lex]{"x$lex"}{foo} = 123: value ok 10045 - exists $vrgbl->[$lex]{"x$lex"}{foo}: no exception ok 10046 - exists $vrgbl->[$lex]{"x$lex"}{foo}: value ok 10047 - delete $vrgbl->[$lex]{"x$lex"}{foo}: no exception ok 10048 - delete $vrgbl->[$lex]{"x$lex"}{foo}: value ok 10049 - $vlex[$gbl]{"x$lex"}{foo}: no exception ok 10050 - $vlex[$gbl]{"x$lex"}{foo}: value ok 10051 - $vlex[$gbl]{"x$lex"}{foo} = 123: no exception ok 10052 - $vlex[$gbl]{"x$lex"}{foo} = 123: value ok 10053 - exists $vlex[$gbl]{"x$lex"}{foo}: no exception ok 10054 - exists $vlex[$gbl]{"x$lex"}{foo}: value ok 10055 - delete $vlex[$gbl]{"x$lex"}{foo}: no exception ok 10056 - delete $vlex[$gbl]{"x$lex"}{foo}: value ok 10057 - $vgbl[$gbl]{"x$lex"}{foo}: no exception ok 10058 - $vgbl[$gbl]{"x$lex"}{foo}: value ok 10059 - $vgbl[$gbl]{"x$lex"}{foo} = 123: no exception ok 10060 - $vgbl[$gbl]{"x$lex"}{foo} = 123: value ok 10061 - exists $vgbl[$gbl]{"x$lex"}{foo}: no exception ok 10062 - exists $vgbl[$gbl]{"x$lex"}{foo}: value ok 10063 - delete $vgbl[$gbl]{"x$lex"}{foo}: no exception ok 10064 - delete $vgbl[$gbl]{"x$lex"}{foo}: value ok 10065 - $vrlex->[$gbl]{"x$lex"}{foo}: no exception ok 10066 - $vrlex->[$gbl]{"x$lex"}{foo}: value ok 10067 - $vrlex->[$gbl]{"x$lex"}{foo} = 123: no exception ok 10068 - $vrlex->[$gbl]{"x$lex"}{foo} = 123: value ok 10069 - exists $vrlex->[$gbl]{"x$lex"}{foo}: no exception ok 10070 - exists $vrlex->[$gbl]{"x$lex"}{foo}: value ok 10071 - delete $vrlex->[$gbl]{"x$lex"}{foo}: no exception ok 10072 - delete $vrlex->[$gbl]{"x$lex"}{foo}: value ok 10073 - $vrgbl->[$gbl]{"x$lex"}{foo}: no exception ok 10074 - $vrgbl->[$gbl]{"x$lex"}{foo}: value ok 10075 - $vrgbl->[$gbl]{"x$lex"}{foo} = 123: no exception ok 10076 - $vrgbl->[$gbl]{"x$lex"}{foo} = 123: value ok 10077 - exists $vrgbl->[$gbl]{"x$lex"}{foo}: no exception ok 10078 - exists $vrgbl->[$gbl]{"x$lex"}{foo}: value ok 10079 - delete $vrgbl->[$gbl]{"x$lex"}{foo}: no exception ok 10080 - delete $vrgbl->[$gbl]{"x$lex"}{foo}: value ok 10081 - $vlex[$lex+1]{"x$lex"}{foo}: no exception ok 10082 - $vlex[$lex+1]{"x$lex"}{foo}: value ok 10083 - $vlex[$lex+1]{"x$lex"}{foo} = 123: no exception ok 10084 - $vlex[$lex+1]{"x$lex"}{foo} = 123: value ok 10085 - exists $vlex[$lex+1]{"x$lex"}{foo}: no exception ok 10086 - exists $vlex[$lex+1]{"x$lex"}{foo}: value ok 10087 - delete $vlex[$lex+1]{"x$lex"}{foo}: no exception ok 10088 - delete $vlex[$lex+1]{"x$lex"}{foo}: value ok 10089 - $vgbl[$lex+1]{"x$lex"}{foo}: no exception ok 10090 - $vgbl[$lex+1]{"x$lex"}{foo}: value ok 10091 - $vgbl[$lex+1]{"x$lex"}{foo} = 123: no exception ok 10092 - $vgbl[$lex+1]{"x$lex"}{foo} = 123: value ok 10093 - exists $vgbl[$lex+1]{"x$lex"}{foo}: no exception ok 10094 - exists $vgbl[$lex+1]{"x$lex"}{foo}: value ok 10095 - delete $vgbl[$lex+1]{"x$lex"}{foo}: no exception ok 10096 - delete $vgbl[$lex+1]{"x$lex"}{foo}: value ok 10097 - $vrlex->[$lex+1]{"x$lex"}{foo}: no exception ok 10098 - $vrlex->[$lex+1]{"x$lex"}{foo}: value ok 10099 - $vrlex->[$lex+1]{"x$lex"}{foo} = 123: no exception ok 10100 - $vrlex->[$lex+1]{"x$lex"}{foo} = 123: value ok 10101 - exists $vrlex->[$lex+1]{"x$lex"}{foo}: no exception ok 10102 - exists $vrlex->[$lex+1]{"x$lex"}{foo}: value ok 10103 - delete $vrlex->[$lex+1]{"x$lex"}{foo}: no exception ok 10104 - delete $vrlex->[$lex+1]{"x$lex"}{foo}: value ok 10105 - $vrgbl->[$lex+1]{"x$lex"}{foo}: no exception ok 10106 - $vrgbl->[$lex+1]{"x$lex"}{foo}: value ok 10107 - $vrgbl->[$lex+1]{"x$lex"}{foo} = 123: no exception ok 10108 - $vrgbl->[$lex+1]{"x$lex"}{foo} = 123: value ok 10109 - exists $vrgbl->[$lex+1]{"x$lex"}{foo}: no exception ok 10110 - exists $vrgbl->[$lex+1]{"x$lex"}{foo}: value ok 10111 - delete $vrgbl->[$lex+1]{"x$lex"}{foo}: no exception ok 10112 - delete $vrgbl->[$lex+1]{"x$lex"}{foo}: value ok 10113 - $vlex{foo}{"x$lex"}{foo}: no exception ok 10114 - $vlex{foo}{"x$lex"}{foo}: value ok 10115 - $vlex{foo}{"x$lex"}{foo} = 123: no exception ok 10116 - $vlex{foo}{"x$lex"}{foo} = 123: value ok 10117 - exists $vlex{foo}{"x$lex"}{foo}: no exception ok 10118 - exists $vlex{foo}{"x$lex"}{foo}: value ok 10119 - delete $vlex{foo}{"x$lex"}{foo}: no exception ok 10120 - delete $vlex{foo}{"x$lex"}{foo}: value ok 10121 - $vgbl{foo}{"x$lex"}{foo}: no exception ok 10122 - $vgbl{foo}{"x$lex"}{foo}: value ok 10123 - $vgbl{foo}{"x$lex"}{foo} = 123: no exception ok 10124 - $vgbl{foo}{"x$lex"}{foo} = 123: value ok 10125 - exists $vgbl{foo}{"x$lex"}{foo}: no exception ok 10126 - exists $vgbl{foo}{"x$lex"}{foo}: value ok 10127 - delete $vgbl{foo}{"x$lex"}{foo}: no exception ok 10128 - delete $vgbl{foo}{"x$lex"}{foo}: value ok 10129 - $vrlex->{foo}{"x$lex"}{foo}: no exception ok 10130 - $vrlex->{foo}{"x$lex"}{foo}: value ok 10131 - $vrlex->{foo}{"x$lex"}{foo} = 123: no exception ok 10132 - $vrlex->{foo}{"x$lex"}{foo} = 123: value ok 10133 - exists $vrlex->{foo}{"x$lex"}{foo}: no exception ok 10134 - exists $vrlex->{foo}{"x$lex"}{foo}: value ok 10135 - delete $vrlex->{foo}{"x$lex"}{foo}: no exception ok 10136 - delete $vrlex->{foo}{"x$lex"}{foo}: value ok 10137 - $vrgbl->{foo}{"x$lex"}{foo}: no exception ok 10138 - $vrgbl->{foo}{"x$lex"}{foo}: value ok 10139 - $vrgbl->{foo}{"x$lex"}{foo} = 123: no exception ok 10140 - $vrgbl->{foo}{"x$lex"}{foo} = 123: value ok 10141 - exists $vrgbl->{foo}{"x$lex"}{foo}: no exception ok 10142 - exists $vrgbl->{foo}{"x$lex"}{foo}: value ok 10143 - delete $vrgbl->{foo}{"x$lex"}{foo}: no exception ok 10144 - delete $vrgbl->{foo}{"x$lex"}{foo}: value ok 10145 - $vlex{$lex}{"x$lex"}{foo}: no exception ok 10146 - $vlex{$lex}{"x$lex"}{foo}: value ok 10147 - $vlex{$lex}{"x$lex"}{foo} = 123: no exception ok 10148 - $vlex{$lex}{"x$lex"}{foo} = 123: value ok 10149 - exists $vlex{$lex}{"x$lex"}{foo}: no exception ok 10150 - exists $vlex{$lex}{"x$lex"}{foo}: value ok 10151 - delete $vlex{$lex}{"x$lex"}{foo}: no exception ok 10152 - delete $vlex{$lex}{"x$lex"}{foo}: value ok 10153 - $vgbl{$lex}{"x$lex"}{foo}: no exception ok 10154 - $vgbl{$lex}{"x$lex"}{foo}: value ok 10155 - $vgbl{$lex}{"x$lex"}{foo} = 123: no exception ok 10156 - $vgbl{$lex}{"x$lex"}{foo} = 123: value ok 10157 - exists $vgbl{$lex}{"x$lex"}{foo}: no exception ok 10158 - exists $vgbl{$lex}{"x$lex"}{foo}: value ok 10159 - delete $vgbl{$lex}{"x$lex"}{foo}: no exception ok 10160 - delete $vgbl{$lex}{"x$lex"}{foo}: value ok 10161 - $vrlex->{$lex}{"x$lex"}{foo}: no exception ok 10162 - $vrlex->{$lex}{"x$lex"}{foo}: value ok 10163 - $vrlex->{$lex}{"x$lex"}{foo} = 123: no exception ok 10164 - $vrlex->{$lex}{"x$lex"}{foo} = 123: value ok 10165 - exists $vrlex->{$lex}{"x$lex"}{foo}: no exception ok 10166 - exists $vrlex->{$lex}{"x$lex"}{foo}: value ok 10167 - delete $vrlex->{$lex}{"x$lex"}{foo}: no exception ok 10168 - delete $vrlex->{$lex}{"x$lex"}{foo}: value ok 10169 - $vrgbl->{$lex}{"x$lex"}{foo}: no exception ok 10170 - $vrgbl->{$lex}{"x$lex"}{foo}: value ok 10171 - $vrgbl->{$lex}{"x$lex"}{foo} = 123: no exception ok 10172 - $vrgbl->{$lex}{"x$lex"}{foo} = 123: value ok 10173 - exists $vrgbl->{$lex}{"x$lex"}{foo}: no exception ok 10174 - exists $vrgbl->{$lex}{"x$lex"}{foo}: value ok 10175 - delete $vrgbl->{$lex}{"x$lex"}{foo}: no exception ok 10176 - delete $vrgbl->{$lex}{"x$lex"}{foo}: value ok 10177 - $vlex{$gbl}{"x$lex"}{foo}: no exception ok 10178 - $vlex{$gbl}{"x$lex"}{foo}: value ok 10179 - $vlex{$gbl}{"x$lex"}{foo} = 123: no exception ok 10180 - $vlex{$gbl}{"x$lex"}{foo} = 123: value ok 10181 - exists $vlex{$gbl}{"x$lex"}{foo}: no exception ok 10182 - exists $vlex{$gbl}{"x$lex"}{foo}: value ok 10183 - delete $vlex{$gbl}{"x$lex"}{foo}: no exception ok 10184 - delete $vlex{$gbl}{"x$lex"}{foo}: value ok 10185 - $vgbl{$gbl}{"x$lex"}{foo}: no exception ok 10186 - $vgbl{$gbl}{"x$lex"}{foo}: value ok 10187 - $vgbl{$gbl}{"x$lex"}{foo} = 123: no exception ok 10188 - $vgbl{$gbl}{"x$lex"}{foo} = 123: value ok 10189 - exists $vgbl{$gbl}{"x$lex"}{foo}: no exception ok 10190 - exists $vgbl{$gbl}{"x$lex"}{foo}: value ok 10191 - delete $vgbl{$gbl}{"x$lex"}{foo}: no exception ok 10192 - delete $vgbl{$gbl}{"x$lex"}{foo}: value ok 10193 - $vrlex->{$gbl}{"x$lex"}{foo}: no exception ok 10194 - $vrlex->{$gbl}{"x$lex"}{foo}: value ok 10195 - $vrlex->{$gbl}{"x$lex"}{foo} = 123: no exception ok 10196 - $vrlex->{$gbl}{"x$lex"}{foo} = 123: value ok 10197 - exists $vrlex->{$gbl}{"x$lex"}{foo}: no exception ok 10198 - exists $vrlex->{$gbl}{"x$lex"}{foo}: value ok 10199 - delete $vrlex->{$gbl}{"x$lex"}{foo}: no exception ok 10200 - delete $vrlex->{$gbl}{"x$lex"}{foo}: value ok 10201 - $vrgbl->{$gbl}{"x$lex"}{foo}: no exception ok 10202 - $vrgbl->{$gbl}{"x$lex"}{foo}: value ok 10203 - $vrgbl->{$gbl}{"x$lex"}{foo} = 123: no exception ok 10204 - $vrgbl->{$gbl}{"x$lex"}{foo} = 123: value ok 10205 - exists $vrgbl->{$gbl}{"x$lex"}{foo}: no exception ok 10206 - exists $vrgbl->{$gbl}{"x$lex"}{foo}: value ok 10207 - delete $vrgbl->{$gbl}{"x$lex"}{foo}: no exception ok 10208 - delete $vrgbl->{$gbl}{"x$lex"}{foo}: value ok 10209 - $vlex{"x$lex"}{"x$lex"}{foo}: no exception ok 10210 - $vlex{"x$lex"}{"x$lex"}{foo}: value ok 10211 - $vlex{"x$lex"}{"x$lex"}{foo} = 123: no exception ok 10212 - $vlex{"x$lex"}{"x$lex"}{foo} = 123: value ok 10213 - exists $vlex{"x$lex"}{"x$lex"}{foo}: no exception ok 10214 - exists $vlex{"x$lex"}{"x$lex"}{foo}: value ok 10215 - delete $vlex{"x$lex"}{"x$lex"}{foo}: no exception ok 10216 - delete $vlex{"x$lex"}{"x$lex"}{foo}: value ok 10217 - $vgbl{"x$lex"}{"x$lex"}{foo}: no exception ok 10218 - $vgbl{"x$lex"}{"x$lex"}{foo}: value ok 10219 - $vgbl{"x$lex"}{"x$lex"}{foo} = 123: no exception ok 10220 - $vgbl{"x$lex"}{"x$lex"}{foo} = 123: value ok 10221 - exists $vgbl{"x$lex"}{"x$lex"}{foo}: no exception ok 10222 - exists $vgbl{"x$lex"}{"x$lex"}{foo}: value ok 10223 - delete $vgbl{"x$lex"}{"x$lex"}{foo}: no exception ok 10224 - delete $vgbl{"x$lex"}{"x$lex"}{foo}: value ok 10225 - $vrlex->{"x$lex"}{"x$lex"}{foo}: no exception ok 10226 - $vrlex->{"x$lex"}{"x$lex"}{foo}: value ok 10227 - $vrlex->{"x$lex"}{"x$lex"}{foo} = 123: no exception ok 10228 - $vrlex->{"x$lex"}{"x$lex"}{foo} = 123: value ok 10229 - exists $vrlex->{"x$lex"}{"x$lex"}{foo}: no exception ok 10230 - exists $vrlex->{"x$lex"}{"x$lex"}{foo}: value ok 10231 - delete $vrlex->{"x$lex"}{"x$lex"}{foo}: no exception ok 10232 - delete $vrlex->{"x$lex"}{"x$lex"}{foo}: value ok 10233 - $vrgbl->{"x$lex"}{"x$lex"}{foo}: no exception ok 10234 - $vrgbl->{"x$lex"}{"x$lex"}{foo}: value ok 10235 - $vrgbl->{"x$lex"}{"x$lex"}{foo} = 123: no exception ok 10236 - $vrgbl->{"x$lex"}{"x$lex"}{foo} = 123: value ok 10237 - exists $vrgbl->{"x$lex"}{"x$lex"}{foo}: no exception ok 10238 - exists $vrgbl->{"x$lex"}{"x$lex"}{foo}: value ok 10239 - delete $vrgbl->{"x$lex"}{"x$lex"}{foo}: no exception ok 10240 - delete $vrgbl->{"x$lex"}{"x$lex"}{foo}: value ok 10241 - $vlex[0][0]{$lex}: no exception ok 10242 - $vlex[0][0]{$lex}: value ok 10243 - $vlex[0][0]{$lex} = 123: no exception ok 10244 - $vlex[0][0]{$lex} = 123: value ok 10245 - exists $vlex[0][0]{$lex}: no exception ok 10246 - exists $vlex[0][0]{$lex}: value ok 10247 - delete $vlex[0][0]{$lex}: no exception ok 10248 - delete $vlex[0][0]{$lex}: value ok 10249 - $vgbl[0][0]{$lex}: no exception ok 10250 - $vgbl[0][0]{$lex}: value ok 10251 - $vgbl[0][0]{$lex} = 123: no exception ok 10252 - $vgbl[0][0]{$lex} = 123: value ok 10253 - exists $vgbl[0][0]{$lex}: no exception ok 10254 - exists $vgbl[0][0]{$lex}: value ok 10255 - delete $vgbl[0][0]{$lex}: no exception ok 10256 - delete $vgbl[0][0]{$lex}: value ok 10257 - $vrlex->[0][0]{$lex}: no exception ok 10258 - $vrlex->[0][0]{$lex}: value ok 10259 - $vrlex->[0][0]{$lex} = 123: no exception ok 10260 - $vrlex->[0][0]{$lex} = 123: value ok 10261 - exists $vrlex->[0][0]{$lex}: no exception ok 10262 - exists $vrlex->[0][0]{$lex}: value ok 10263 - delete $vrlex->[0][0]{$lex}: no exception ok 10264 - delete $vrlex->[0][0]{$lex}: value ok 10265 - $vrgbl->[0][0]{$lex}: no exception ok 10266 - $vrgbl->[0][0]{$lex}: value ok 10267 - $vrgbl->[0][0]{$lex} = 123: no exception ok 10268 - $vrgbl->[0][0]{$lex} = 123: value ok 10269 - exists $vrgbl->[0][0]{$lex}: no exception ok 10270 - exists $vrgbl->[0][0]{$lex}: value ok 10271 - delete $vrgbl->[0][0]{$lex}: no exception ok 10272 - delete $vrgbl->[0][0]{$lex}: value ok 10273 - $vlex[$lex][0]{$lex}: no exception ok 10274 - $vlex[$lex][0]{$lex}: value ok 10275 - $vlex[$lex][0]{$lex} = 123: no exception ok 10276 - $vlex[$lex][0]{$lex} = 123: value ok 10277 - exists $vlex[$lex][0]{$lex}: no exception ok 10278 - exists $vlex[$lex][0]{$lex}: value ok 10279 - delete $vlex[$lex][0]{$lex}: no exception ok 10280 - delete $vlex[$lex][0]{$lex}: value ok 10281 - $vgbl[$lex][0]{$lex}: no exception ok 10282 - $vgbl[$lex][0]{$lex}: value ok 10283 - $vgbl[$lex][0]{$lex} = 123: no exception ok 10284 - $vgbl[$lex][0]{$lex} = 123: value ok 10285 - exists $vgbl[$lex][0]{$lex}: no exception ok 10286 - exists $vgbl[$lex][0]{$lex}: value ok 10287 - delete $vgbl[$lex][0]{$lex}: no exception ok 10288 - delete $vgbl[$lex][0]{$lex}: value ok 10289 - $vrlex->[$lex][0]{$lex}: no exception ok 10290 - $vrlex->[$lex][0]{$lex}: value ok 10291 - $vrlex->[$lex][0]{$lex} = 123: no exception ok 10292 - $vrlex->[$lex][0]{$lex} = 123: value ok 10293 - exists $vrlex->[$lex][0]{$lex}: no exception ok 10294 - exists $vrlex->[$lex][0]{$lex}: value ok 10295 - delete $vrlex->[$lex][0]{$lex}: no exception ok 10296 - delete $vrlex->[$lex][0]{$lex}: value ok 10297 - $vrgbl->[$lex][0]{$lex}: no exception ok 10298 - $vrgbl->[$lex][0]{$lex}: value ok 10299 - $vrgbl->[$lex][0]{$lex} = 123: no exception ok 10300 - $vrgbl->[$lex][0]{$lex} = 123: value ok 10301 - exists $vrgbl->[$lex][0]{$lex}: no exception ok 10302 - exists $vrgbl->[$lex][0]{$lex}: value ok 10303 - delete $vrgbl->[$lex][0]{$lex}: no exception ok 10304 - delete $vrgbl->[$lex][0]{$lex}: value ok 10305 - $vlex[$gbl][0]{$lex}: no exception ok 10306 - $vlex[$gbl][0]{$lex}: value ok 10307 - $vlex[$gbl][0]{$lex} = 123: no exception ok 10308 - $vlex[$gbl][0]{$lex} = 123: value ok 10309 - exists $vlex[$gbl][0]{$lex}: no exception ok 10310 - exists $vlex[$gbl][0]{$lex}: value ok 10311 - delete $vlex[$gbl][0]{$lex}: no exception ok 10312 - delete $vlex[$gbl][0]{$lex}: value ok 10313 - $vgbl[$gbl][0]{$lex}: no exception ok 10314 - $vgbl[$gbl][0]{$lex}: value ok 10315 - $vgbl[$gbl][0]{$lex} = 123: no exception ok 10316 - $vgbl[$gbl][0]{$lex} = 123: value ok 10317 - exists $vgbl[$gbl][0]{$lex}: no exception ok 10318 - exists $vgbl[$gbl][0]{$lex}: value ok 10319 - delete $vgbl[$gbl][0]{$lex}: no exception ok 10320 - delete $vgbl[$gbl][0]{$lex}: value ok 10321 - $vrlex->[$gbl][0]{$lex}: no exception ok 10322 - $vrlex->[$gbl][0]{$lex}: value ok 10323 - $vrlex->[$gbl][0]{$lex} = 123: no exception ok 10324 - $vrlex->[$gbl][0]{$lex} = 123: value ok 10325 - exists $vrlex->[$gbl][0]{$lex}: no exception ok 10326 - exists $vrlex->[$gbl][0]{$lex}: value ok 10327 - delete $vrlex->[$gbl][0]{$lex}: no exception ok 10328 - delete $vrlex->[$gbl][0]{$lex}: value ok 10329 - $vrgbl->[$gbl][0]{$lex}: no exception ok 10330 - $vrgbl->[$gbl][0]{$lex}: value ok 10331 - $vrgbl->[$gbl][0]{$lex} = 123: no exception ok 10332 - $vrgbl->[$gbl][0]{$lex} = 123: value ok 10333 - exists $vrgbl->[$gbl][0]{$lex}: no exception ok 10334 - exists $vrgbl->[$gbl][0]{$lex}: value ok 10335 - delete $vrgbl->[$gbl][0]{$lex}: no exception ok 10336 - delete $vrgbl->[$gbl][0]{$lex}: value ok 10337 - $vlex[$lex+1][0]{$lex}: no exception ok 10338 - $vlex[$lex+1][0]{$lex}: value ok 10339 - $vlex[$lex+1][0]{$lex} = 123: no exception ok 10340 - $vlex[$lex+1][0]{$lex} = 123: value ok 10341 - exists $vlex[$lex+1][0]{$lex}: no exception ok 10342 - exists $vlex[$lex+1][0]{$lex}: value ok 10343 - delete $vlex[$lex+1][0]{$lex}: no exception ok 10344 - delete $vlex[$lex+1][0]{$lex}: value ok 10345 - $vgbl[$lex+1][0]{$lex}: no exception ok 10346 - $vgbl[$lex+1][0]{$lex}: value ok 10347 - $vgbl[$lex+1][0]{$lex} = 123: no exception ok 10348 - $vgbl[$lex+1][0]{$lex} = 123: value ok 10349 - exists $vgbl[$lex+1][0]{$lex}: no exception ok 10350 - exists $vgbl[$lex+1][0]{$lex}: value ok 10351 - delete $vgbl[$lex+1][0]{$lex}: no exception ok 10352 - delete $vgbl[$lex+1][0]{$lex}: value ok 10353 - $vrlex->[$lex+1][0]{$lex}: no exception ok 10354 - $vrlex->[$lex+1][0]{$lex}: value ok 10355 - $vrlex->[$lex+1][0]{$lex} = 123: no exception ok 10356 - $vrlex->[$lex+1][0]{$lex} = 123: value ok 10357 - exists $vrlex->[$lex+1][0]{$lex}: no exception ok 10358 - exists $vrlex->[$lex+1][0]{$lex}: value ok 10359 - delete $vrlex->[$lex+1][0]{$lex}: no exception ok 10360 - delete $vrlex->[$lex+1][0]{$lex}: value ok 10361 - $vrgbl->[$lex+1][0]{$lex}: no exception ok 10362 - $vrgbl->[$lex+1][0]{$lex}: value ok 10363 - $vrgbl->[$lex+1][0]{$lex} = 123: no exception ok 10364 - $vrgbl->[$lex+1][0]{$lex} = 123: value ok 10365 - exists $vrgbl->[$lex+1][0]{$lex}: no exception ok 10366 - exists $vrgbl->[$lex+1][0]{$lex}: value ok 10367 - delete $vrgbl->[$lex+1][0]{$lex}: no exception ok 10368 - delete $vrgbl->[$lex+1][0]{$lex}: value ok 10369 - $vlex{foo}[0]{$lex}: no exception ok 10370 - $vlex{foo}[0]{$lex}: value ok 10371 - $vlex{foo}[0]{$lex} = 123: no exception ok 10372 - $vlex{foo}[0]{$lex} = 123: value ok 10373 - exists $vlex{foo}[0]{$lex}: no exception ok 10374 - exists $vlex{foo}[0]{$lex}: value ok 10375 - delete $vlex{foo}[0]{$lex}: no exception ok 10376 - delete $vlex{foo}[0]{$lex}: value ok 10377 - $vgbl{foo}[0]{$lex}: no exception ok 10378 - $vgbl{foo}[0]{$lex}: value ok 10379 - $vgbl{foo}[0]{$lex} = 123: no exception ok 10380 - $vgbl{foo}[0]{$lex} = 123: value ok 10381 - exists $vgbl{foo}[0]{$lex}: no exception ok 10382 - exists $vgbl{foo}[0]{$lex}: value ok 10383 - delete $vgbl{foo}[0]{$lex}: no exception ok 10384 - delete $vgbl{foo}[0]{$lex}: value ok 10385 - $vrlex->{foo}[0]{$lex}: no exception ok 10386 - $vrlex->{foo}[0]{$lex}: value ok 10387 - $vrlex->{foo}[0]{$lex} = 123: no exception ok 10388 - $vrlex->{foo}[0]{$lex} = 123: value ok 10389 - exists $vrlex->{foo}[0]{$lex}: no exception ok 10390 - exists $vrlex->{foo}[0]{$lex}: value ok 10391 - delete $vrlex->{foo}[0]{$lex}: no exception ok 10392 - delete $vrlex->{foo}[0]{$lex}: value ok 10393 - $vrgbl->{foo}[0]{$lex}: no exception ok 10394 - $vrgbl->{foo}[0]{$lex}: value ok 10395 - $vrgbl->{foo}[0]{$lex} = 123: no exception ok 10396 - $vrgbl->{foo}[0]{$lex} = 123: value ok 10397 - exists $vrgbl->{foo}[0]{$lex}: no exception ok 10398 - exists $vrgbl->{foo}[0]{$lex}: value ok 10399 - delete $vrgbl->{foo}[0]{$lex}: no exception ok 10400 - delete $vrgbl->{foo}[0]{$lex}: value ok 10401 - $vlex{$lex}[0]{$lex}: no exception ok 10402 - $vlex{$lex}[0]{$lex}: value ok 10403 - $vlex{$lex}[0]{$lex} = 123: no exception ok 10404 - $vlex{$lex}[0]{$lex} = 123: value ok 10405 - exists $vlex{$lex}[0]{$lex}: no exception ok 10406 - exists $vlex{$lex}[0]{$lex}: value ok 10407 - delete $vlex{$lex}[0]{$lex}: no exception ok 10408 - delete $vlex{$lex}[0]{$lex}: value ok 10409 - $vgbl{$lex}[0]{$lex}: no exception ok 10410 - $vgbl{$lex}[0]{$lex}: value ok 10411 - $vgbl{$lex}[0]{$lex} = 123: no exception ok 10412 - $vgbl{$lex}[0]{$lex} = 123: value ok 10413 - exists $vgbl{$lex}[0]{$lex}: no exception ok 10414 - exists $vgbl{$lex}[0]{$lex}: value ok 10415 - delete $vgbl{$lex}[0]{$lex}: no exception ok 10416 - delete $vgbl{$lex}[0]{$lex}: value ok 10417 - $vrlex->{$lex}[0]{$lex}: no exception ok 10418 - $vrlex->{$lex}[0]{$lex}: value ok 10419 - $vrlex->{$lex}[0]{$lex} = 123: no exception ok 10420 - $vrlex->{$lex}[0]{$lex} = 123: value ok 10421 - exists $vrlex->{$lex}[0]{$lex}: no exception ok 10422 - exists $vrlex->{$lex}[0]{$lex}: value ok 10423 - delete $vrlex->{$lex}[0]{$lex}: no exception ok 10424 - delete $vrlex->{$lex}[0]{$lex}: value ok 10425 - $vrgbl->{$lex}[0]{$lex}: no exception ok 10426 - $vrgbl->{$lex}[0]{$lex}: value ok 10427 - $vrgbl->{$lex}[0]{$lex} = 123: no exception ok 10428 - $vrgbl->{$lex}[0]{$lex} = 123: value ok 10429 - exists $vrgbl->{$lex}[0]{$lex}: no exception ok 10430 - exists $vrgbl->{$lex}[0]{$lex}: value ok 10431 - delete $vrgbl->{$lex}[0]{$lex}: no exception ok 10432 - delete $vrgbl->{$lex}[0]{$lex}: value ok 10433 - $vlex{$gbl}[0]{$lex}: no exception ok 10434 - $vlex{$gbl}[0]{$lex}: value ok 10435 - $vlex{$gbl}[0]{$lex} = 123: no exception ok 10436 - $vlex{$gbl}[0]{$lex} = 123: value ok 10437 - exists $vlex{$gbl}[0]{$lex}: no exception ok 10438 - exists $vlex{$gbl}[0]{$lex}: value ok 10439 - delete $vlex{$gbl}[0]{$lex}: no exception ok 10440 - delete $vlex{$gbl}[0]{$lex}: value ok 10441 - $vgbl{$gbl}[0]{$lex}: no exception ok 10442 - $vgbl{$gbl}[0]{$lex}: value ok 10443 - $vgbl{$gbl}[0]{$lex} = 123: no exception ok 10444 - $vgbl{$gbl}[0]{$lex} = 123: value ok 10445 - exists $vgbl{$gbl}[0]{$lex}: no exception ok 10446 - exists $vgbl{$gbl}[0]{$lex}: value ok 10447 - delete $vgbl{$gbl}[0]{$lex}: no exception ok 10448 - delete $vgbl{$gbl}[0]{$lex}: value ok 10449 - $vrlex->{$gbl}[0]{$lex}: no exception ok 10450 - $vrlex->{$gbl}[0]{$lex}: value ok 10451 - $vrlex->{$gbl}[0]{$lex} = 123: no exception ok 10452 - $vrlex->{$gbl}[0]{$lex} = 123: value ok 10453 - exists $vrlex->{$gbl}[0]{$lex}: no exception ok 10454 - exists $vrlex->{$gbl}[0]{$lex}: value ok 10455 - delete $vrlex->{$gbl}[0]{$lex}: no exception ok 10456 - delete $vrlex->{$gbl}[0]{$lex}: value ok 10457 - $vrgbl->{$gbl}[0]{$lex}: no exception ok 10458 - $vrgbl->{$gbl}[0]{$lex}: value ok 10459 - $vrgbl->{$gbl}[0]{$lex} = 123: no exception ok 10460 - $vrgbl->{$gbl}[0]{$lex} = 123: value ok 10461 - exists $vrgbl->{$gbl}[0]{$lex}: no exception ok 10462 - exists $vrgbl->{$gbl}[0]{$lex}: value ok 10463 - delete $vrgbl->{$gbl}[0]{$lex}: no exception ok 10464 - delete $vrgbl->{$gbl}[0]{$lex}: value ok 10465 - $vlex{"x$lex"}[0]{$lex}: no exception ok 10466 - $vlex{"x$lex"}[0]{$lex}: value ok 10467 - $vlex{"x$lex"}[0]{$lex} = 123: no exception ok 10468 - $vlex{"x$lex"}[0]{$lex} = 123: value ok 10469 - exists $vlex{"x$lex"}[0]{$lex}: no exception ok 10470 - exists $vlex{"x$lex"}[0]{$lex}: value ok 10471 - delete $vlex{"x$lex"}[0]{$lex}: no exception ok 10472 - delete $vlex{"x$lex"}[0]{$lex}: value ok 10473 - $vgbl{"x$lex"}[0]{$lex}: no exception ok 10474 - $vgbl{"x$lex"}[0]{$lex}: value ok 10475 - $vgbl{"x$lex"}[0]{$lex} = 123: no exception ok 10476 - $vgbl{"x$lex"}[0]{$lex} = 123: value ok 10477 - exists $vgbl{"x$lex"}[0]{$lex}: no exception ok 10478 - exists $vgbl{"x$lex"}[0]{$lex}: value ok 10479 - delete $vgbl{"x$lex"}[0]{$lex}: no exception ok 10480 - delete $vgbl{"x$lex"}[0]{$lex}: value ok 10481 - $vrlex->{"x$lex"}[0]{$lex}: no exception ok 10482 - $vrlex->{"x$lex"}[0]{$lex}: value ok 10483 - $vrlex->{"x$lex"}[0]{$lex} = 123: no exception ok 10484 - $vrlex->{"x$lex"}[0]{$lex} = 123: value ok 10485 - exists $vrlex->{"x$lex"}[0]{$lex}: no exception ok 10486 - exists $vrlex->{"x$lex"}[0]{$lex}: value ok 10487 - delete $vrlex->{"x$lex"}[0]{$lex}: no exception ok 10488 - delete $vrlex->{"x$lex"}[0]{$lex}: value ok 10489 - $vrgbl->{"x$lex"}[0]{$lex}: no exception ok 10490 - $vrgbl->{"x$lex"}[0]{$lex}: value ok 10491 - $vrgbl->{"x$lex"}[0]{$lex} = 123: no exception ok 10492 - $vrgbl->{"x$lex"}[0]{$lex} = 123: value ok 10493 - exists $vrgbl->{"x$lex"}[0]{$lex}: no exception ok 10494 - exists $vrgbl->{"x$lex"}[0]{$lex}: value ok 10495 - delete $vrgbl->{"x$lex"}[0]{$lex}: no exception ok 10496 - delete $vrgbl->{"x$lex"}[0]{$lex}: value ok 10497 - $vlex[0][$lex]{$lex}: no exception ok 10498 - $vlex[0][$lex]{$lex}: value ok 10499 - $vlex[0][$lex]{$lex} = 123: no exception ok 10500 - $vlex[0][$lex]{$lex} = 123: value ok 10501 - exists $vlex[0][$lex]{$lex}: no exception ok 10502 - exists $vlex[0][$lex]{$lex}: value ok 10503 - delete $vlex[0][$lex]{$lex}: no exception ok 10504 - delete $vlex[0][$lex]{$lex}: value ok 10505 - $vgbl[0][$lex]{$lex}: no exception ok 10506 - $vgbl[0][$lex]{$lex}: value ok 10507 - $vgbl[0][$lex]{$lex} = 123: no exception ok 10508 - $vgbl[0][$lex]{$lex} = 123: value ok 10509 - exists $vgbl[0][$lex]{$lex}: no exception ok 10510 - exists $vgbl[0][$lex]{$lex}: value ok 10511 - delete $vgbl[0][$lex]{$lex}: no exception ok 10512 - delete $vgbl[0][$lex]{$lex}: value ok 10513 - $vrlex->[0][$lex]{$lex}: no exception ok 10514 - $vrlex->[0][$lex]{$lex}: value ok 10515 - $vrlex->[0][$lex]{$lex} = 123: no exception ok 10516 - $vrlex->[0][$lex]{$lex} = 123: value ok 10517 - exists $vrlex->[0][$lex]{$lex}: no exception ok 10518 - exists $vrlex->[0][$lex]{$lex}: value ok 10519 - delete $vrlex->[0][$lex]{$lex}: no exception ok 10520 - delete $vrlex->[0][$lex]{$lex}: value ok 10521 - $vrgbl->[0][$lex]{$lex}: no exception ok 10522 - $vrgbl->[0][$lex]{$lex}: value ok 10523 - $vrgbl->[0][$lex]{$lex} = 123: no exception ok 10524 - $vrgbl->[0][$lex]{$lex} = 123: value ok 10525 - exists $vrgbl->[0][$lex]{$lex}: no exception ok 10526 - exists $vrgbl->[0][$lex]{$lex}: value ok 10527 - delete $vrgbl->[0][$lex]{$lex}: no exception ok 10528 - delete $vrgbl->[0][$lex]{$lex}: value ok 10529 - $vlex[$lex][$lex]{$lex}: no exception ok 10530 - $vlex[$lex][$lex]{$lex}: value ok 10531 - $vlex[$lex][$lex]{$lex} = 123: no exception ok 10532 - $vlex[$lex][$lex]{$lex} = 123: value ok 10533 - exists $vlex[$lex][$lex]{$lex}: no exception ok 10534 - exists $vlex[$lex][$lex]{$lex}: value ok 10535 - delete $vlex[$lex][$lex]{$lex}: no exception ok 10536 - delete $vlex[$lex][$lex]{$lex}: value ok 10537 - $vgbl[$lex][$lex]{$lex}: no exception ok 10538 - $vgbl[$lex][$lex]{$lex}: value ok 10539 - $vgbl[$lex][$lex]{$lex} = 123: no exception ok 10540 - $vgbl[$lex][$lex]{$lex} = 123: value ok 10541 - exists $vgbl[$lex][$lex]{$lex}: no exception ok 10542 - exists $vgbl[$lex][$lex]{$lex}: value ok 10543 - delete $vgbl[$lex][$lex]{$lex}: no exception ok 10544 - delete $vgbl[$lex][$lex]{$lex}: value ok 10545 - $vrlex->[$lex][$lex]{$lex}: no exception ok 10546 - $vrlex->[$lex][$lex]{$lex}: value ok 10547 - $vrlex->[$lex][$lex]{$lex} = 123: no exception ok 10548 - $vrlex->[$lex][$lex]{$lex} = 123: value ok 10549 - exists $vrlex->[$lex][$lex]{$lex}: no exception ok 10550 - exists $vrlex->[$lex][$lex]{$lex}: value ok 10551 - delete $vrlex->[$lex][$lex]{$lex}: no exception ok 10552 - delete $vrlex->[$lex][$lex]{$lex}: value ok 10553 - $vrgbl->[$lex][$lex]{$lex}: no exception ok 10554 - $vrgbl->[$lex][$lex]{$lex}: value ok 10555 - $vrgbl->[$lex][$lex]{$lex} = 123: no exception ok 10556 - $vrgbl->[$lex][$lex]{$lex} = 123: value ok 10557 - exists $vrgbl->[$lex][$lex]{$lex}: no exception ok 10558 - exists $vrgbl->[$lex][$lex]{$lex}: value ok 10559 - delete $vrgbl->[$lex][$lex]{$lex}: no exception ok 10560 - delete $vrgbl->[$lex][$lex]{$lex}: value ok 10561 - $vlex[$gbl][$lex]{$lex}: no exception ok 10562 - $vlex[$gbl][$lex]{$lex}: value ok 10563 - $vlex[$gbl][$lex]{$lex} = 123: no exception ok 10564 - $vlex[$gbl][$lex]{$lex} = 123: value ok 10565 - exists $vlex[$gbl][$lex]{$lex}: no exception ok 10566 - exists $vlex[$gbl][$lex]{$lex}: value ok 10567 - delete $vlex[$gbl][$lex]{$lex}: no exception ok 10568 - delete $vlex[$gbl][$lex]{$lex}: value ok 10569 - $vgbl[$gbl][$lex]{$lex}: no exception ok 10570 - $vgbl[$gbl][$lex]{$lex}: value ok 10571 - $vgbl[$gbl][$lex]{$lex} = 123: no exception ok 10572 - $vgbl[$gbl][$lex]{$lex} = 123: value ok 10573 - exists $vgbl[$gbl][$lex]{$lex}: no exception ok 10574 - exists $vgbl[$gbl][$lex]{$lex}: value ok 10575 - delete $vgbl[$gbl][$lex]{$lex}: no exception ok 10576 - delete $vgbl[$gbl][$lex]{$lex}: value ok 10577 - $vrlex->[$gbl][$lex]{$lex}: no exception ok 10578 - $vrlex->[$gbl][$lex]{$lex}: value ok 10579 - $vrlex->[$gbl][$lex]{$lex} = 123: no exception ok 10580 - $vrlex->[$gbl][$lex]{$lex} = 123: value ok 10581 - exists $vrlex->[$gbl][$lex]{$lex}: no exception ok 10582 - exists $vrlex->[$gbl][$lex]{$lex}: value ok 10583 - delete $vrlex->[$gbl][$lex]{$lex}: no exception ok 10584 - delete $vrlex->[$gbl][$lex]{$lex}: value ok 10585 - $vrgbl->[$gbl][$lex]{$lex}: no exception ok 10586 - $vrgbl->[$gbl][$lex]{$lex}: value ok 10587 - $vrgbl->[$gbl][$lex]{$lex} = 123: no exception ok 10588 - $vrgbl->[$gbl][$lex]{$lex} = 123: value ok 10589 - exists $vrgbl->[$gbl][$lex]{$lex}: no exception ok 10590 - exists $vrgbl->[$gbl][$lex]{$lex}: value ok 10591 - delete $vrgbl->[$gbl][$lex]{$lex}: no exception ok 10592 - delete $vrgbl->[$gbl][$lex]{$lex}: value ok 10593 - $vlex[$lex+1][$lex]{$lex}: no exception ok 10594 - $vlex[$lex+1][$lex]{$lex}: value ok 10595 - $vlex[$lex+1][$lex]{$lex} = 123: no exception ok 10596 - $vlex[$lex+1][$lex]{$lex} = 123: value ok 10597 - exists $vlex[$lex+1][$lex]{$lex}: no exception ok 10598 - exists $vlex[$lex+1][$lex]{$lex}: value ok 10599 - delete $vlex[$lex+1][$lex]{$lex}: no exception ok 10600 - delete $vlex[$lex+1][$lex]{$lex}: value ok 10601 - $vgbl[$lex+1][$lex]{$lex}: no exception ok 10602 - $vgbl[$lex+1][$lex]{$lex}: value ok 10603 - $vgbl[$lex+1][$lex]{$lex} = 123: no exception ok 10604 - $vgbl[$lex+1][$lex]{$lex} = 123: value ok 10605 - exists $vgbl[$lex+1][$lex]{$lex}: no exception ok 10606 - exists $vgbl[$lex+1][$lex]{$lex}: value ok 10607 - delete $vgbl[$lex+1][$lex]{$lex}: no exception ok 10608 - delete $vgbl[$lex+1][$lex]{$lex}: value ok 10609 - $vrlex->[$lex+1][$lex]{$lex}: no exception ok 10610 - $vrlex->[$lex+1][$lex]{$lex}: value ok 10611 - $vrlex->[$lex+1][$lex]{$lex} = 123: no exception ok 10612 - $vrlex->[$lex+1][$lex]{$lex} = 123: value ok 10613 - exists $vrlex->[$lex+1][$lex]{$lex}: no exception ok 10614 - exists $vrlex->[$lex+1][$lex]{$lex}: value ok 10615 - delete $vrlex->[$lex+1][$lex]{$lex}: no exception ok 10616 - delete $vrlex->[$lex+1][$lex]{$lex}: value ok 10617 - $vrgbl->[$lex+1][$lex]{$lex}: no exception ok 10618 - $vrgbl->[$lex+1][$lex]{$lex}: value ok 10619 - $vrgbl->[$lex+1][$lex]{$lex} = 123: no exception ok 10620 - $vrgbl->[$lex+1][$lex]{$lex} = 123: value ok 10621 - exists $vrgbl->[$lex+1][$lex]{$lex}: no exception ok 10622 - exists $vrgbl->[$lex+1][$lex]{$lex}: value ok 10623 - delete $vrgbl->[$lex+1][$lex]{$lex}: no exception ok 10624 - delete $vrgbl->[$lex+1][$lex]{$lex}: value ok 10625 - $vlex{foo}[$lex]{$lex}: no exception ok 10626 - $vlex{foo}[$lex]{$lex}: value ok 10627 - $vlex{foo}[$lex]{$lex} = 123: no exception ok 10628 - $vlex{foo}[$lex]{$lex} = 123: value ok 10629 - exists $vlex{foo}[$lex]{$lex}: no exception ok 10630 - exists $vlex{foo}[$lex]{$lex}: value ok 10631 - delete $vlex{foo}[$lex]{$lex}: no exception ok 10632 - delete $vlex{foo}[$lex]{$lex}: value ok 10633 - $vgbl{foo}[$lex]{$lex}: no exception ok 10634 - $vgbl{foo}[$lex]{$lex}: value ok 10635 - $vgbl{foo}[$lex]{$lex} = 123: no exception ok 10636 - $vgbl{foo}[$lex]{$lex} = 123: value ok 10637 - exists $vgbl{foo}[$lex]{$lex}: no exception ok 10638 - exists $vgbl{foo}[$lex]{$lex}: value ok 10639 - delete $vgbl{foo}[$lex]{$lex}: no exception ok 10640 - delete $vgbl{foo}[$lex]{$lex}: value ok 10641 - $vrlex->{foo}[$lex]{$lex}: no exception ok 10642 - $vrlex->{foo}[$lex]{$lex}: value ok 10643 - $vrlex->{foo}[$lex]{$lex} = 123: no exception ok 10644 - $vrlex->{foo}[$lex]{$lex} = 123: value ok 10645 - exists $vrlex->{foo}[$lex]{$lex}: no exception ok 10646 - exists $vrlex->{foo}[$lex]{$lex}: value ok 10647 - delete $vrlex->{foo}[$lex]{$lex}: no exception ok 10648 - delete $vrlex->{foo}[$lex]{$lex}: value ok 10649 - $vrgbl->{foo}[$lex]{$lex}: no exception ok 10650 - $vrgbl->{foo}[$lex]{$lex}: value ok 10651 - $vrgbl->{foo}[$lex]{$lex} = 123: no exception ok 10652 - $vrgbl->{foo}[$lex]{$lex} = 123: value ok 10653 - exists $vrgbl->{foo}[$lex]{$lex}: no exception ok 10654 - exists $vrgbl->{foo}[$lex]{$lex}: value ok 10655 - delete $vrgbl->{foo}[$lex]{$lex}: no exception ok 10656 - delete $vrgbl->{foo}[$lex]{$lex}: value ok 10657 - $vlex{$lex}[$lex]{$lex}: no exception ok 10658 - $vlex{$lex}[$lex]{$lex}: value ok 10659 - $vlex{$lex}[$lex]{$lex} = 123: no exception ok 10660 - $vlex{$lex}[$lex]{$lex} = 123: value ok 10661 - exists $vlex{$lex}[$lex]{$lex}: no exception ok 10662 - exists $vlex{$lex}[$lex]{$lex}: value ok 10663 - delete $vlex{$lex}[$lex]{$lex}: no exception ok 10664 - delete $vlex{$lex}[$lex]{$lex}: value ok 10665 - $vgbl{$lex}[$lex]{$lex}: no exception ok 10666 - $vgbl{$lex}[$lex]{$lex}: value ok 10667 - $vgbl{$lex}[$lex]{$lex} = 123: no exception ok 10668 - $vgbl{$lex}[$lex]{$lex} = 123: value ok 10669 - exists $vgbl{$lex}[$lex]{$lex}: no exception ok 10670 - exists $vgbl{$lex}[$lex]{$lex}: value ok 10671 - delete $vgbl{$lex}[$lex]{$lex}: no exception ok 10672 - delete $vgbl{$lex}[$lex]{$lex}: value ok 10673 - $vrlex->{$lex}[$lex]{$lex}: no exception ok 10674 - $vrlex->{$lex}[$lex]{$lex}: value ok 10675 - $vrlex->{$lex}[$lex]{$lex} = 123: no exception ok 10676 - $vrlex->{$lex}[$lex]{$lex} = 123: value ok 10677 - exists $vrlex->{$lex}[$lex]{$lex}: no exception ok 10678 - exists $vrlex->{$lex}[$lex]{$lex}: value ok 10679 - delete $vrlex->{$lex}[$lex]{$lex}: no exception ok 10680 - delete $vrlex->{$lex}[$lex]{$lex}: value ok 10681 - $vrgbl->{$lex}[$lex]{$lex}: no exception ok 10682 - $vrgbl->{$lex}[$lex]{$lex}: value ok 10683 - $vrgbl->{$lex}[$lex]{$lex} = 123: no exception ok 10684 - $vrgbl->{$lex}[$lex]{$lex} = 123: value ok 10685 - exists $vrgbl->{$lex}[$lex]{$lex}: no exception ok 10686 - exists $vrgbl->{$lex}[$lex]{$lex}: value ok 10687 - delete $vrgbl->{$lex}[$lex]{$lex}: no exception ok 10688 - delete $vrgbl->{$lex}[$lex]{$lex}: value ok 10689 - $vlex{$gbl}[$lex]{$lex}: no exception ok 10690 - $vlex{$gbl}[$lex]{$lex}: value ok 10691 - $vlex{$gbl}[$lex]{$lex} = 123: no exception ok 10692 - $vlex{$gbl}[$lex]{$lex} = 123: value ok 10693 - exists $vlex{$gbl}[$lex]{$lex}: no exception ok 10694 - exists $vlex{$gbl}[$lex]{$lex}: value ok 10695 - delete $vlex{$gbl}[$lex]{$lex}: no exception ok 10696 - delete $vlex{$gbl}[$lex]{$lex}: value ok 10697 - $vgbl{$gbl}[$lex]{$lex}: no exception ok 10698 - $vgbl{$gbl}[$lex]{$lex}: value ok 10699 - $vgbl{$gbl}[$lex]{$lex} = 123: no exception ok 10700 - $vgbl{$gbl}[$lex]{$lex} = 123: value ok 10701 - exists $vgbl{$gbl}[$lex]{$lex}: no exception ok 10702 - exists $vgbl{$gbl}[$lex]{$lex}: value ok 10703 - delete $vgbl{$gbl}[$lex]{$lex}: no exception ok 10704 - delete $vgbl{$gbl}[$lex]{$lex}: value ok 10705 - $vrlex->{$gbl}[$lex]{$lex}: no exception ok 10706 - $vrlex->{$gbl}[$lex]{$lex}: value ok 10707 - $vrlex->{$gbl}[$lex]{$lex} = 123: no exception ok 10708 - $vrlex->{$gbl}[$lex]{$lex} = 123: value ok 10709 - exists $vrlex->{$gbl}[$lex]{$lex}: no exception ok 10710 - exists $vrlex->{$gbl}[$lex]{$lex}: value ok 10711 - delete $vrlex->{$gbl}[$lex]{$lex}: no exception ok 10712 - delete $vrlex->{$gbl}[$lex]{$lex}: value ok 10713 - $vrgbl->{$gbl}[$lex]{$lex}: no exception ok 10714 - $vrgbl->{$gbl}[$lex]{$lex}: value ok 10715 - $vrgbl->{$gbl}[$lex]{$lex} = 123: no exception ok 10716 - $vrgbl->{$gbl}[$lex]{$lex} = 123: value ok 10717 - exists $vrgbl->{$gbl}[$lex]{$lex}: no exception ok 10718 - exists $vrgbl->{$gbl}[$lex]{$lex}: value ok 10719 - delete $vrgbl->{$gbl}[$lex]{$lex}: no exception ok 10720 - delete $vrgbl->{$gbl}[$lex]{$lex}: value ok 10721 - $vlex{"x$lex"}[$lex]{$lex}: no exception ok 10722 - $vlex{"x$lex"}[$lex]{$lex}: value ok 10723 - $vlex{"x$lex"}[$lex]{$lex} = 123: no exception ok 10724 - $vlex{"x$lex"}[$lex]{$lex} = 123: value ok 10725 - exists $vlex{"x$lex"}[$lex]{$lex}: no exception ok 10726 - exists $vlex{"x$lex"}[$lex]{$lex}: value ok 10727 - delete $vlex{"x$lex"}[$lex]{$lex}: no exception ok 10728 - delete $vlex{"x$lex"}[$lex]{$lex}: value ok 10729 - $vgbl{"x$lex"}[$lex]{$lex}: no exception ok 10730 - $vgbl{"x$lex"}[$lex]{$lex}: value ok 10731 - $vgbl{"x$lex"}[$lex]{$lex} = 123: no exception ok 10732 - $vgbl{"x$lex"}[$lex]{$lex} = 123: value ok 10733 - exists $vgbl{"x$lex"}[$lex]{$lex}: no exception ok 10734 - exists $vgbl{"x$lex"}[$lex]{$lex}: value ok 10735 - delete $vgbl{"x$lex"}[$lex]{$lex}: no exception ok 10736 - delete $vgbl{"x$lex"}[$lex]{$lex}: value ok 10737 - $vrlex->{"x$lex"}[$lex]{$lex}: no exception ok 10738 - $vrlex->{"x$lex"}[$lex]{$lex}: value ok 10739 - $vrlex->{"x$lex"}[$lex]{$lex} = 123: no exception ok 10740 - $vrlex->{"x$lex"}[$lex]{$lex} = 123: value ok 10741 - exists $vrlex->{"x$lex"}[$lex]{$lex}: no exception ok 10742 - exists $vrlex->{"x$lex"}[$lex]{$lex}: value ok 10743 - delete $vrlex->{"x$lex"}[$lex]{$lex}: no exception ok 10744 - delete $vrlex->{"x$lex"}[$lex]{$lex}: value ok 10745 - $vrgbl->{"x$lex"}[$lex]{$lex}: no exception ok 10746 - $vrgbl->{"x$lex"}[$lex]{$lex}: value ok 10747 - $vrgbl->{"x$lex"}[$lex]{$lex} = 123: no exception ok 10748 - $vrgbl->{"x$lex"}[$lex]{$lex} = 123: value ok 10749 - exists $vrgbl->{"x$lex"}[$lex]{$lex}: no exception ok 10750 - exists $vrgbl->{"x$lex"}[$lex]{$lex}: value ok 10751 - delete $vrgbl->{"x$lex"}[$lex]{$lex}: no exception ok 10752 - delete $vrgbl->{"x$lex"}[$lex]{$lex}: value ok 10753 - $vlex[0][$gbl]{$lex}: no exception ok 10754 - $vlex[0][$gbl]{$lex}: value ok 10755 - $vlex[0][$gbl]{$lex} = 123: no exception ok 10756 - $vlex[0][$gbl]{$lex} = 123: value ok 10757 - exists $vlex[0][$gbl]{$lex}: no exception ok 10758 - exists $vlex[0][$gbl]{$lex}: value ok 10759 - delete $vlex[0][$gbl]{$lex}: no exception ok 10760 - delete $vlex[0][$gbl]{$lex}: value ok 10761 - $vgbl[0][$gbl]{$lex}: no exception ok 10762 - $vgbl[0][$gbl]{$lex}: value ok 10763 - $vgbl[0][$gbl]{$lex} = 123: no exception ok 10764 - $vgbl[0][$gbl]{$lex} = 123: value ok 10765 - exists $vgbl[0][$gbl]{$lex}: no exception ok 10766 - exists $vgbl[0][$gbl]{$lex}: value ok 10767 - delete $vgbl[0][$gbl]{$lex}: no exception ok 10768 - delete $vgbl[0][$gbl]{$lex}: value ok 10769 - $vrlex->[0][$gbl]{$lex}: no exception ok 10770 - $vrlex->[0][$gbl]{$lex}: value ok 10771 - $vrlex->[0][$gbl]{$lex} = 123: no exception ok 10772 - $vrlex->[0][$gbl]{$lex} = 123: value ok 10773 - exists $vrlex->[0][$gbl]{$lex}: no exception ok 10774 - exists $vrlex->[0][$gbl]{$lex}: value ok 10775 - delete $vrlex->[0][$gbl]{$lex}: no exception ok 10776 - delete $vrlex->[0][$gbl]{$lex}: value ok 10777 - $vrgbl->[0][$gbl]{$lex}: no exception ok 10778 - $vrgbl->[0][$gbl]{$lex}: value ok 10779 - $vrgbl->[0][$gbl]{$lex} = 123: no exception ok 10780 - $vrgbl->[0][$gbl]{$lex} = 123: value ok 10781 - exists $vrgbl->[0][$gbl]{$lex}: no exception ok 10782 - exists $vrgbl->[0][$gbl]{$lex}: value ok 10783 - delete $vrgbl->[0][$gbl]{$lex}: no exception ok 10784 - delete $vrgbl->[0][$gbl]{$lex}: value ok 10785 - $vlex[$lex][$gbl]{$lex}: no exception ok 10786 - $vlex[$lex][$gbl]{$lex}: value ok 10787 - $vlex[$lex][$gbl]{$lex} = 123: no exception ok 10788 - $vlex[$lex][$gbl]{$lex} = 123: value ok 10789 - exists $vlex[$lex][$gbl]{$lex}: no exception ok 10790 - exists $vlex[$lex][$gbl]{$lex}: value ok 10791 - delete $vlex[$lex][$gbl]{$lex}: no exception ok 10792 - delete $vlex[$lex][$gbl]{$lex}: value ok 10793 - $vgbl[$lex][$gbl]{$lex}: no exception ok 10794 - $vgbl[$lex][$gbl]{$lex}: value ok 10795 - $vgbl[$lex][$gbl]{$lex} = 123: no exception ok 10796 - $vgbl[$lex][$gbl]{$lex} = 123: value ok 10797 - exists $vgbl[$lex][$gbl]{$lex}: no exception ok 10798 - exists $vgbl[$lex][$gbl]{$lex}: value ok 10799 - delete $vgbl[$lex][$gbl]{$lex}: no exception ok 10800 - delete $vgbl[$lex][$gbl]{$lex}: value ok 10801 - $vrlex->[$lex][$gbl]{$lex}: no exception ok 10802 - $vrlex->[$lex][$gbl]{$lex}: value ok 10803 - $vrlex->[$lex][$gbl]{$lex} = 123: no exception ok 10804 - $vrlex->[$lex][$gbl]{$lex} = 123: value ok 10805 - exists $vrlex->[$lex][$gbl]{$lex}: no exception ok 10806 - exists $vrlex->[$lex][$gbl]{$lex}: value ok 10807 - delete $vrlex->[$lex][$gbl]{$lex}: no exception ok 10808 - delete $vrlex->[$lex][$gbl]{$lex}: value ok 10809 - $vrgbl->[$lex][$gbl]{$lex}: no exception ok 10810 - $vrgbl->[$lex][$gbl]{$lex}: value ok 10811 - $vrgbl->[$lex][$gbl]{$lex} = 123: no exception ok 10812 - $vrgbl->[$lex][$gbl]{$lex} = 123: value ok 10813 - exists $vrgbl->[$lex][$gbl]{$lex}: no exception ok 10814 - exists $vrgbl->[$lex][$gbl]{$lex}: value ok 10815 - delete $vrgbl->[$lex][$gbl]{$lex}: no exception ok 10816 - delete $vrgbl->[$lex][$gbl]{$lex}: value ok 10817 - $vlex[$gbl][$gbl]{$lex}: no exception ok 10818 - $vlex[$gbl][$gbl]{$lex}: value ok 10819 - $vlex[$gbl][$gbl]{$lex} = 123: no exception ok 10820 - $vlex[$gbl][$gbl]{$lex} = 123: value ok 10821 - exists $vlex[$gbl][$gbl]{$lex}: no exception ok 10822 - exists $vlex[$gbl][$gbl]{$lex}: value ok 10823 - delete $vlex[$gbl][$gbl]{$lex}: no exception ok 10824 - delete $vlex[$gbl][$gbl]{$lex}: value ok 10825 - $vgbl[$gbl][$gbl]{$lex}: no exception ok 10826 - $vgbl[$gbl][$gbl]{$lex}: value ok 10827 - $vgbl[$gbl][$gbl]{$lex} = 123: no exception ok 10828 - $vgbl[$gbl][$gbl]{$lex} = 123: value ok 10829 - exists $vgbl[$gbl][$gbl]{$lex}: no exception ok 10830 - exists $vgbl[$gbl][$gbl]{$lex}: value ok 10831 - delete $vgbl[$gbl][$gbl]{$lex}: no exception ok 10832 - delete $vgbl[$gbl][$gbl]{$lex}: value ok 10833 - $vrlex->[$gbl][$gbl]{$lex}: no exception ok 10834 - $vrlex->[$gbl][$gbl]{$lex}: value ok 10835 - $vrlex->[$gbl][$gbl]{$lex} = 123: no exception ok 10836 - $vrlex->[$gbl][$gbl]{$lex} = 123: value ok 10837 - exists $vrlex->[$gbl][$gbl]{$lex}: no exception ok 10838 - exists $vrlex->[$gbl][$gbl]{$lex}: value ok 10839 - delete $vrlex->[$gbl][$gbl]{$lex}: no exception ok 10840 - delete $vrlex->[$gbl][$gbl]{$lex}: value ok 10841 - $vrgbl->[$gbl][$gbl]{$lex}: no exception ok 10842 - $vrgbl->[$gbl][$gbl]{$lex}: value ok 10843 - $vrgbl->[$gbl][$gbl]{$lex} = 123: no exception ok 10844 - $vrgbl->[$gbl][$gbl]{$lex} = 123: value ok 10845 - exists $vrgbl->[$gbl][$gbl]{$lex}: no exception ok 10846 - exists $vrgbl->[$gbl][$gbl]{$lex}: value ok 10847 - delete $vrgbl->[$gbl][$gbl]{$lex}: no exception ok 10848 - delete $vrgbl->[$gbl][$gbl]{$lex}: value ok 10849 - $vlex[$lex+1][$gbl]{$lex}: no exception ok 10850 - $vlex[$lex+1][$gbl]{$lex}: value ok 10851 - $vlex[$lex+1][$gbl]{$lex} = 123: no exception ok 10852 - $vlex[$lex+1][$gbl]{$lex} = 123: value ok 10853 - exists $vlex[$lex+1][$gbl]{$lex}: no exception ok 10854 - exists $vlex[$lex+1][$gbl]{$lex}: value ok 10855 - delete $vlex[$lex+1][$gbl]{$lex}: no exception ok 10856 - delete $vlex[$lex+1][$gbl]{$lex}: value ok 10857 - $vgbl[$lex+1][$gbl]{$lex}: no exception ok 10858 - $vgbl[$lex+1][$gbl]{$lex}: value ok 10859 - $vgbl[$lex+1][$gbl]{$lex} = 123: no exception ok 10860 - $vgbl[$lex+1][$gbl]{$lex} = 123: value ok 10861 - exists $vgbl[$lex+1][$gbl]{$lex}: no exception ok 10862 - exists $vgbl[$lex+1][$gbl]{$lex}: value ok 10863 - delete $vgbl[$lex+1][$gbl]{$lex}: no exception ok 10864 - delete $vgbl[$lex+1][$gbl]{$lex}: value ok 10865 - $vrlex->[$lex+1][$gbl]{$lex}: no exception ok 10866 - $vrlex->[$lex+1][$gbl]{$lex}: value ok 10867 - $vrlex->[$lex+1][$gbl]{$lex} = 123: no exception ok 10868 - $vrlex->[$lex+1][$gbl]{$lex} = 123: value ok 10869 - exists $vrlex->[$lex+1][$gbl]{$lex}: no exception ok 10870 - exists $vrlex->[$lex+1][$gbl]{$lex}: value ok 10871 - delete $vrlex->[$lex+1][$gbl]{$lex}: no exception ok 10872 - delete $vrlex->[$lex+1][$gbl]{$lex}: value ok 10873 - $vrgbl->[$lex+1][$gbl]{$lex}: no exception ok 10874 - $vrgbl->[$lex+1][$gbl]{$lex}: value ok 10875 - $vrgbl->[$lex+1][$gbl]{$lex} = 123: no exception ok 10876 - $vrgbl->[$lex+1][$gbl]{$lex} = 123: value ok 10877 - exists $vrgbl->[$lex+1][$gbl]{$lex}: no exception ok 10878 - exists $vrgbl->[$lex+1][$gbl]{$lex}: value ok 10879 - delete $vrgbl->[$lex+1][$gbl]{$lex}: no exception ok 10880 - delete $vrgbl->[$lex+1][$gbl]{$lex}: value ok 10881 - $vlex{foo}[$gbl]{$lex}: no exception ok 10882 - $vlex{foo}[$gbl]{$lex}: value ok 10883 - $vlex{foo}[$gbl]{$lex} = 123: no exception ok 10884 - $vlex{foo}[$gbl]{$lex} = 123: value ok 10885 - exists $vlex{foo}[$gbl]{$lex}: no exception ok 10886 - exists $vlex{foo}[$gbl]{$lex}: value ok 10887 - delete $vlex{foo}[$gbl]{$lex}: no exception ok 10888 - delete $vlex{foo}[$gbl]{$lex}: value ok 10889 - $vgbl{foo}[$gbl]{$lex}: no exception ok 10890 - $vgbl{foo}[$gbl]{$lex}: value ok 10891 - $vgbl{foo}[$gbl]{$lex} = 123: no exception ok 10892 - $vgbl{foo}[$gbl]{$lex} = 123: value ok 10893 - exists $vgbl{foo}[$gbl]{$lex}: no exception ok 10894 - exists $vgbl{foo}[$gbl]{$lex}: value ok 10895 - delete $vgbl{foo}[$gbl]{$lex}: no exception ok 10896 - delete $vgbl{foo}[$gbl]{$lex}: value ok 10897 - $vrlex->{foo}[$gbl]{$lex}: no exception ok 10898 - $vrlex->{foo}[$gbl]{$lex}: value ok 10899 - $vrlex->{foo}[$gbl]{$lex} = 123: no exception ok 10900 - $vrlex->{foo}[$gbl]{$lex} = 123: value ok 10901 - exists $vrlex->{foo}[$gbl]{$lex}: no exception ok 10902 - exists $vrlex->{foo}[$gbl]{$lex}: value ok 10903 - delete $vrlex->{foo}[$gbl]{$lex}: no exception ok 10904 - delete $vrlex->{foo}[$gbl]{$lex}: value ok 10905 - $vrgbl->{foo}[$gbl]{$lex}: no exception ok 10906 - $vrgbl->{foo}[$gbl]{$lex}: value ok 10907 - $vrgbl->{foo}[$gbl]{$lex} = 123: no exception ok 10908 - $vrgbl->{foo}[$gbl]{$lex} = 123: value ok 10909 - exists $vrgbl->{foo}[$gbl]{$lex}: no exception ok 10910 - exists $vrgbl->{foo}[$gbl]{$lex}: value ok 10911 - delete $vrgbl->{foo}[$gbl]{$lex}: no exception ok 10912 - delete $vrgbl->{foo}[$gbl]{$lex}: value ok 10913 - $vlex{$lex}[$gbl]{$lex}: no exception ok 10914 - $vlex{$lex}[$gbl]{$lex}: value ok 10915 - $vlex{$lex}[$gbl]{$lex} = 123: no exception ok 10916 - $vlex{$lex}[$gbl]{$lex} = 123: value ok 10917 - exists $vlex{$lex}[$gbl]{$lex}: no exception ok 10918 - exists $vlex{$lex}[$gbl]{$lex}: value ok 10919 - delete $vlex{$lex}[$gbl]{$lex}: no exception ok 10920 - delete $vlex{$lex}[$gbl]{$lex}: value ok 10921 - $vgbl{$lex}[$gbl]{$lex}: no exception ok 10922 - $vgbl{$lex}[$gbl]{$lex}: value ok 10923 - $vgbl{$lex}[$gbl]{$lex} = 123: no exception ok 10924 - $vgbl{$lex}[$gbl]{$lex} = 123: value ok 10925 - exists $vgbl{$lex}[$gbl]{$lex}: no exception ok 10926 - exists $vgbl{$lex}[$gbl]{$lex}: value ok 10927 - delete $vgbl{$lex}[$gbl]{$lex}: no exception ok 10928 - delete $vgbl{$lex}[$gbl]{$lex}: value ok 10929 - $vrlex->{$lex}[$gbl]{$lex}: no exception ok 10930 - $vrlex->{$lex}[$gbl]{$lex}: value ok 10931 - $vrlex->{$lex}[$gbl]{$lex} = 123: no exception ok 10932 - $vrlex->{$lex}[$gbl]{$lex} = 123: value ok 10933 - exists $vrlex->{$lex}[$gbl]{$lex}: no exception ok 10934 - exists $vrlex->{$lex}[$gbl]{$lex}: value ok 10935 - delete $vrlex->{$lex}[$gbl]{$lex}: no exception ok 10936 - delete $vrlex->{$lex}[$gbl]{$lex}: value ok 10937 - $vrgbl->{$lex}[$gbl]{$lex}: no exception ok 10938 - $vrgbl->{$lex}[$gbl]{$lex}: value ok 10939 - $vrgbl->{$lex}[$gbl]{$lex} = 123: no exception ok 10940 - $vrgbl->{$lex}[$gbl]{$lex} = 123: value ok 10941 - exists $vrgbl->{$lex}[$gbl]{$lex}: no exception ok 10942 - exists $vrgbl->{$lex}[$gbl]{$lex}: value ok 10943 - delete $vrgbl->{$lex}[$gbl]{$lex}: no exception ok 10944 - delete $vrgbl->{$lex}[$gbl]{$lex}: value ok 10945 - $vlex{$gbl}[$gbl]{$lex}: no exception ok 10946 - $vlex{$gbl}[$gbl]{$lex}: value ok 10947 - $vlex{$gbl}[$gbl]{$lex} = 123: no exception ok 10948 - $vlex{$gbl}[$gbl]{$lex} = 123: value ok 10949 - exists $vlex{$gbl}[$gbl]{$lex}: no exception ok 10950 - exists $vlex{$gbl}[$gbl]{$lex}: value ok 10951 - delete $vlex{$gbl}[$gbl]{$lex}: no exception ok 10952 - delete $vlex{$gbl}[$gbl]{$lex}: value ok 10953 - $vgbl{$gbl}[$gbl]{$lex}: no exception ok 10954 - $vgbl{$gbl}[$gbl]{$lex}: value ok 10955 - $vgbl{$gbl}[$gbl]{$lex} = 123: no exception ok 10956 - $vgbl{$gbl}[$gbl]{$lex} = 123: value ok 10957 - exists $vgbl{$gbl}[$gbl]{$lex}: no exception ok 10958 - exists $vgbl{$gbl}[$gbl]{$lex}: value ok 10959 - delete $vgbl{$gbl}[$gbl]{$lex}: no exception ok 10960 - delete $vgbl{$gbl}[$gbl]{$lex}: value ok 10961 - $vrlex->{$gbl}[$gbl]{$lex}: no exception ok 10962 - $vrlex->{$gbl}[$gbl]{$lex}: value ok 10963 - $vrlex->{$gbl}[$gbl]{$lex} = 123: no exception ok 10964 - $vrlex->{$gbl}[$gbl]{$lex} = 123: value ok 10965 - exists $vrlex->{$gbl}[$gbl]{$lex}: no exception ok 10966 - exists $vrlex->{$gbl}[$gbl]{$lex}: value ok 10967 - delete $vrlex->{$gbl}[$gbl]{$lex}: no exception ok 10968 - delete $vrlex->{$gbl}[$gbl]{$lex}: value ok 10969 - $vrgbl->{$gbl}[$gbl]{$lex}: no exception ok 10970 - $vrgbl->{$gbl}[$gbl]{$lex}: value ok 10971 - $vrgbl->{$gbl}[$gbl]{$lex} = 123: no exception ok 10972 - $vrgbl->{$gbl}[$gbl]{$lex} = 123: value ok 10973 - exists $vrgbl->{$gbl}[$gbl]{$lex}: no exception ok 10974 - exists $vrgbl->{$gbl}[$gbl]{$lex}: value ok 10975 - delete $vrgbl->{$gbl}[$gbl]{$lex}: no exception ok 10976 - delete $vrgbl->{$gbl}[$gbl]{$lex}: value ok 10977 - $vlex{"x$lex"}[$gbl]{$lex}: no exception ok 10978 - $vlex{"x$lex"}[$gbl]{$lex}: value ok 10979 - $vlex{"x$lex"}[$gbl]{$lex} = 123: no exception ok 10980 - $vlex{"x$lex"}[$gbl]{$lex} = 123: value ok 10981 - exists $vlex{"x$lex"}[$gbl]{$lex}: no exception ok 10982 - exists $vlex{"x$lex"}[$gbl]{$lex}: value ok 10983 - delete $vlex{"x$lex"}[$gbl]{$lex}: no exception ok 10984 - delete $vlex{"x$lex"}[$gbl]{$lex}: value ok 10985 - $vgbl{"x$lex"}[$gbl]{$lex}: no exception ok 10986 - $vgbl{"x$lex"}[$gbl]{$lex}: value ok 10987 - $vgbl{"x$lex"}[$gbl]{$lex} = 123: no exception ok 10988 - $vgbl{"x$lex"}[$gbl]{$lex} = 123: value ok 10989 - exists $vgbl{"x$lex"}[$gbl]{$lex}: no exception ok 10990 - exists $vgbl{"x$lex"}[$gbl]{$lex}: value ok 10991 - delete $vgbl{"x$lex"}[$gbl]{$lex}: no exception ok 10992 - delete $vgbl{"x$lex"}[$gbl]{$lex}: value ok 10993 - $vrlex->{"x$lex"}[$gbl]{$lex}: no exception ok 10994 - $vrlex->{"x$lex"}[$gbl]{$lex}: value ok 10995 - $vrlex->{"x$lex"}[$gbl]{$lex} = 123: no exception ok 10996 - $vrlex->{"x$lex"}[$gbl]{$lex} = 123: value ok 10997 - exists $vrlex->{"x$lex"}[$gbl]{$lex}: no exception ok 10998 - exists $vrlex->{"x$lex"}[$gbl]{$lex}: value ok 10999 - delete $vrlex->{"x$lex"}[$gbl]{$lex}: no exception ok 11000 - delete $vrlex->{"x$lex"}[$gbl]{$lex}: value ok 11001 - $vrgbl->{"x$lex"}[$gbl]{$lex}: no exception ok 11002 - $vrgbl->{"x$lex"}[$gbl]{$lex}: value ok 11003 - $vrgbl->{"x$lex"}[$gbl]{$lex} = 123: no exception ok 11004 - $vrgbl->{"x$lex"}[$gbl]{$lex} = 123: value ok 11005 - exists $vrgbl->{"x$lex"}[$gbl]{$lex}: no exception ok 11006 - exists $vrgbl->{"x$lex"}[$gbl]{$lex}: value ok 11007 - delete $vrgbl->{"x$lex"}[$gbl]{$lex}: no exception ok 11008 - delete $vrgbl->{"x$lex"}[$gbl]{$lex}: value ok 11009 - $vlex[0][$lex+1]{$lex}: no exception ok 11010 - $vlex[0][$lex+1]{$lex}: value ok 11011 - $vlex[0][$lex+1]{$lex} = 123: no exception ok 11012 - $vlex[0][$lex+1]{$lex} = 123: value ok 11013 - exists $vlex[0][$lex+1]{$lex}: no exception ok 11014 - exists $vlex[0][$lex+1]{$lex}: value ok 11015 - delete $vlex[0][$lex+1]{$lex}: no exception ok 11016 - delete $vlex[0][$lex+1]{$lex}: value ok 11017 - $vgbl[0][$lex+1]{$lex}: no exception ok 11018 - $vgbl[0][$lex+1]{$lex}: value ok 11019 - $vgbl[0][$lex+1]{$lex} = 123: no exception ok 11020 - $vgbl[0][$lex+1]{$lex} = 123: value ok 11021 - exists $vgbl[0][$lex+1]{$lex}: no exception ok 11022 - exists $vgbl[0][$lex+1]{$lex}: value ok 11023 - delete $vgbl[0][$lex+1]{$lex}: no exception ok 11024 - delete $vgbl[0][$lex+1]{$lex}: value ok 11025 - $vrlex->[0][$lex+1]{$lex}: no exception ok 11026 - $vrlex->[0][$lex+1]{$lex}: value ok 11027 - $vrlex->[0][$lex+1]{$lex} = 123: no exception ok 11028 - $vrlex->[0][$lex+1]{$lex} = 123: value ok 11029 - exists $vrlex->[0][$lex+1]{$lex}: no exception ok 11030 - exists $vrlex->[0][$lex+1]{$lex}: value ok 11031 - delete $vrlex->[0][$lex+1]{$lex}: no exception ok 11032 - delete $vrlex->[0][$lex+1]{$lex}: value ok 11033 - $vrgbl->[0][$lex+1]{$lex}: no exception ok 11034 - $vrgbl->[0][$lex+1]{$lex}: value ok 11035 - $vrgbl->[0][$lex+1]{$lex} = 123: no exception ok 11036 - $vrgbl->[0][$lex+1]{$lex} = 123: value ok 11037 - exists $vrgbl->[0][$lex+1]{$lex}: no exception ok 11038 - exists $vrgbl->[0][$lex+1]{$lex}: value ok 11039 - delete $vrgbl->[0][$lex+1]{$lex}: no exception ok 11040 - delete $vrgbl->[0][$lex+1]{$lex}: value ok 11041 - $vlex[$lex][$lex+1]{$lex}: no exception ok 11042 - $vlex[$lex][$lex+1]{$lex}: value ok 11043 - $vlex[$lex][$lex+1]{$lex} = 123: no exception ok 11044 - $vlex[$lex][$lex+1]{$lex} = 123: value ok 11045 - exists $vlex[$lex][$lex+1]{$lex}: no exception ok 11046 - exists $vlex[$lex][$lex+1]{$lex}: value ok 11047 - delete $vlex[$lex][$lex+1]{$lex}: no exception ok 11048 - delete $vlex[$lex][$lex+1]{$lex}: value ok 11049 - $vgbl[$lex][$lex+1]{$lex}: no exception ok 11050 - $vgbl[$lex][$lex+1]{$lex}: value ok 11051 - $vgbl[$lex][$lex+1]{$lex} = 123: no exception ok 11052 - $vgbl[$lex][$lex+1]{$lex} = 123: value ok 11053 - exists $vgbl[$lex][$lex+1]{$lex}: no exception ok 11054 - exists $vgbl[$lex][$lex+1]{$lex}: value ok 11055 - delete $vgbl[$lex][$lex+1]{$lex}: no exception ok 11056 - delete $vgbl[$lex][$lex+1]{$lex}: value ok 11057 - $vrlex->[$lex][$lex+1]{$lex}: no exception ok 11058 - $vrlex->[$lex][$lex+1]{$lex}: value ok 11059 - $vrlex->[$lex][$lex+1]{$lex} = 123: no exception ok 11060 - $vrlex->[$lex][$lex+1]{$lex} = 123: value ok 11061 - exists $vrlex->[$lex][$lex+1]{$lex}: no exception ok 11062 - exists $vrlex->[$lex][$lex+1]{$lex}: value ok 11063 - delete $vrlex->[$lex][$lex+1]{$lex}: no exception ok 11064 - delete $vrlex->[$lex][$lex+1]{$lex}: value ok 11065 - $vrgbl->[$lex][$lex+1]{$lex}: no exception ok 11066 - $vrgbl->[$lex][$lex+1]{$lex}: value ok 11067 - $vrgbl->[$lex][$lex+1]{$lex} = 123: no exception ok 11068 - $vrgbl->[$lex][$lex+1]{$lex} = 123: value ok 11069 - exists $vrgbl->[$lex][$lex+1]{$lex}: no exception ok 11070 - exists $vrgbl->[$lex][$lex+1]{$lex}: value ok 11071 - delete $vrgbl->[$lex][$lex+1]{$lex}: no exception ok 11072 - delete $vrgbl->[$lex][$lex+1]{$lex}: value ok 11073 - $vlex[$gbl][$lex+1]{$lex}: no exception ok 11074 - $vlex[$gbl][$lex+1]{$lex}: value ok 11075 - $vlex[$gbl][$lex+1]{$lex} = 123: no exception ok 11076 - $vlex[$gbl][$lex+1]{$lex} = 123: value ok 11077 - exists $vlex[$gbl][$lex+1]{$lex}: no exception ok 11078 - exists $vlex[$gbl][$lex+1]{$lex}: value ok 11079 - delete $vlex[$gbl][$lex+1]{$lex}: no exception ok 11080 - delete $vlex[$gbl][$lex+1]{$lex}: value ok 11081 - $vgbl[$gbl][$lex+1]{$lex}: no exception ok 11082 - $vgbl[$gbl][$lex+1]{$lex}: value ok 11083 - $vgbl[$gbl][$lex+1]{$lex} = 123: no exception ok 11084 - $vgbl[$gbl][$lex+1]{$lex} = 123: value ok 11085 - exists $vgbl[$gbl][$lex+1]{$lex}: no exception ok 11086 - exists $vgbl[$gbl][$lex+1]{$lex}: value ok 11087 - delete $vgbl[$gbl][$lex+1]{$lex}: no exception ok 11088 - delete $vgbl[$gbl][$lex+1]{$lex}: value ok 11089 - $vrlex->[$gbl][$lex+1]{$lex}: no exception ok 11090 - $vrlex->[$gbl][$lex+1]{$lex}: value ok 11091 - $vrlex->[$gbl][$lex+1]{$lex} = 123: no exception ok 11092 - $vrlex->[$gbl][$lex+1]{$lex} = 123: value ok 11093 - exists $vrlex->[$gbl][$lex+1]{$lex}: no exception ok 11094 - exists $vrlex->[$gbl][$lex+1]{$lex}: value ok 11095 - delete $vrlex->[$gbl][$lex+1]{$lex}: no exception ok 11096 - delete $vrlex->[$gbl][$lex+1]{$lex}: value ok 11097 - $vrgbl->[$gbl][$lex+1]{$lex}: no exception ok 11098 - $vrgbl->[$gbl][$lex+1]{$lex}: value ok 11099 - $vrgbl->[$gbl][$lex+1]{$lex} = 123: no exception ok 11100 - $vrgbl->[$gbl][$lex+1]{$lex} = 123: value ok 11101 - exists $vrgbl->[$gbl][$lex+1]{$lex}: no exception ok 11102 - exists $vrgbl->[$gbl][$lex+1]{$lex}: value ok 11103 - delete $vrgbl->[$gbl][$lex+1]{$lex}: no exception ok 11104 - delete $vrgbl->[$gbl][$lex+1]{$lex}: value ok 11105 - $vlex[$lex+1][$lex+1]{$lex}: no exception ok 11106 - $vlex[$lex+1][$lex+1]{$lex}: value ok 11107 - $vlex[$lex+1][$lex+1]{$lex} = 123: no exception ok 11108 - $vlex[$lex+1][$lex+1]{$lex} = 123: value ok 11109 - exists $vlex[$lex+1][$lex+1]{$lex}: no exception ok 11110 - exists $vlex[$lex+1][$lex+1]{$lex}: value ok 11111 - delete $vlex[$lex+1][$lex+1]{$lex}: no exception ok 11112 - delete $vlex[$lex+1][$lex+1]{$lex}: value ok 11113 - $vgbl[$lex+1][$lex+1]{$lex}: no exception ok 11114 - $vgbl[$lex+1][$lex+1]{$lex}: value ok 11115 - $vgbl[$lex+1][$lex+1]{$lex} = 123: no exception ok 11116 - $vgbl[$lex+1][$lex+1]{$lex} = 123: value ok 11117 - exists $vgbl[$lex+1][$lex+1]{$lex}: no exception ok 11118 - exists $vgbl[$lex+1][$lex+1]{$lex}: value ok 11119 - delete $vgbl[$lex+1][$lex+1]{$lex}: no exception ok 11120 - delete $vgbl[$lex+1][$lex+1]{$lex}: value ok 11121 - $vrlex->[$lex+1][$lex+1]{$lex}: no exception ok 11122 - $vrlex->[$lex+1][$lex+1]{$lex}: value ok 11123 - $vrlex->[$lex+1][$lex+1]{$lex} = 123: no exception ok 11124 - $vrlex->[$lex+1][$lex+1]{$lex} = 123: value ok 11125 - exists $vrlex->[$lex+1][$lex+1]{$lex}: no exception ok 11126 - exists $vrlex->[$lex+1][$lex+1]{$lex}: value ok 11127 - delete $vrlex->[$lex+1][$lex+1]{$lex}: no exception ok 11128 - delete $vrlex->[$lex+1][$lex+1]{$lex}: value ok 11129 - $vrgbl->[$lex+1][$lex+1]{$lex}: no exception ok 11130 - $vrgbl->[$lex+1][$lex+1]{$lex}: value ok 11131 - $vrgbl->[$lex+1][$lex+1]{$lex} = 123: no exception ok 11132 - $vrgbl->[$lex+1][$lex+1]{$lex} = 123: value ok 11133 - exists $vrgbl->[$lex+1][$lex+1]{$lex}: no exception ok 11134 - exists $vrgbl->[$lex+1][$lex+1]{$lex}: value ok 11135 - delete $vrgbl->[$lex+1][$lex+1]{$lex}: no exception ok 11136 - delete $vrgbl->[$lex+1][$lex+1]{$lex}: value ok 11137 - $vlex{foo}[$lex+1]{$lex}: no exception ok 11138 - $vlex{foo}[$lex+1]{$lex}: value ok 11139 - $vlex{foo}[$lex+1]{$lex} = 123: no exception ok 11140 - $vlex{foo}[$lex+1]{$lex} = 123: value ok 11141 - exists $vlex{foo}[$lex+1]{$lex}: no exception ok 11142 - exists $vlex{foo}[$lex+1]{$lex}: value ok 11143 - delete $vlex{foo}[$lex+1]{$lex}: no exception ok 11144 - delete $vlex{foo}[$lex+1]{$lex}: value ok 11145 - $vgbl{foo}[$lex+1]{$lex}: no exception ok 11146 - $vgbl{foo}[$lex+1]{$lex}: value ok 11147 - $vgbl{foo}[$lex+1]{$lex} = 123: no exception ok 11148 - $vgbl{foo}[$lex+1]{$lex} = 123: value ok 11149 - exists $vgbl{foo}[$lex+1]{$lex}: no exception ok 11150 - exists $vgbl{foo}[$lex+1]{$lex}: value ok 11151 - delete $vgbl{foo}[$lex+1]{$lex}: no exception ok 11152 - delete $vgbl{foo}[$lex+1]{$lex}: value ok 11153 - $vrlex->{foo}[$lex+1]{$lex}: no exception ok 11154 - $vrlex->{foo}[$lex+1]{$lex}: value ok 11155 - $vrlex->{foo}[$lex+1]{$lex} = 123: no exception ok 11156 - $vrlex->{foo}[$lex+1]{$lex} = 123: value ok 11157 - exists $vrlex->{foo}[$lex+1]{$lex}: no exception ok 11158 - exists $vrlex->{foo}[$lex+1]{$lex}: value ok 11159 - delete $vrlex->{foo}[$lex+1]{$lex}: no exception ok 11160 - delete $vrlex->{foo}[$lex+1]{$lex}: value ok 11161 - $vrgbl->{foo}[$lex+1]{$lex}: no exception ok 11162 - $vrgbl->{foo}[$lex+1]{$lex}: value ok 11163 - $vrgbl->{foo}[$lex+1]{$lex} = 123: no exception ok 11164 - $vrgbl->{foo}[$lex+1]{$lex} = 123: value ok 11165 - exists $vrgbl->{foo}[$lex+1]{$lex}: no exception ok 11166 - exists $vrgbl->{foo}[$lex+1]{$lex}: value ok 11167 - delete $vrgbl->{foo}[$lex+1]{$lex}: no exception ok 11168 - delete $vrgbl->{foo}[$lex+1]{$lex}: value ok 11169 - $vlex{$lex}[$lex+1]{$lex}: no exception ok 11170 - $vlex{$lex}[$lex+1]{$lex}: value ok 11171 - $vlex{$lex}[$lex+1]{$lex} = 123: no exception ok 11172 - $vlex{$lex}[$lex+1]{$lex} = 123: value ok 11173 - exists $vlex{$lex}[$lex+1]{$lex}: no exception ok 11174 - exists $vlex{$lex}[$lex+1]{$lex}: value ok 11175 - delete $vlex{$lex}[$lex+1]{$lex}: no exception ok 11176 - delete $vlex{$lex}[$lex+1]{$lex}: value ok 11177 - $vgbl{$lex}[$lex+1]{$lex}: no exception ok 11178 - $vgbl{$lex}[$lex+1]{$lex}: value ok 11179 - $vgbl{$lex}[$lex+1]{$lex} = 123: no exception ok 11180 - $vgbl{$lex}[$lex+1]{$lex} = 123: value ok 11181 - exists $vgbl{$lex}[$lex+1]{$lex}: no exception ok 11182 - exists $vgbl{$lex}[$lex+1]{$lex}: value ok 11183 - delete $vgbl{$lex}[$lex+1]{$lex}: no exception ok 11184 - delete $vgbl{$lex}[$lex+1]{$lex}: value ok 11185 - $vrlex->{$lex}[$lex+1]{$lex}: no exception ok 11186 - $vrlex->{$lex}[$lex+1]{$lex}: value ok 11187 - $vrlex->{$lex}[$lex+1]{$lex} = 123: no exception ok 11188 - $vrlex->{$lex}[$lex+1]{$lex} = 123: value ok 11189 - exists $vrlex->{$lex}[$lex+1]{$lex}: no exception ok 11190 - exists $vrlex->{$lex}[$lex+1]{$lex}: value ok 11191 - delete $vrlex->{$lex}[$lex+1]{$lex}: no exception ok 11192 - delete $vrlex->{$lex}[$lex+1]{$lex}: value ok 11193 - $vrgbl->{$lex}[$lex+1]{$lex}: no exception ok 11194 - $vrgbl->{$lex}[$lex+1]{$lex}: value ok 11195 - $vrgbl->{$lex}[$lex+1]{$lex} = 123: no exception ok 11196 - $vrgbl->{$lex}[$lex+1]{$lex} = 123: value ok 11197 - exists $vrgbl->{$lex}[$lex+1]{$lex}: no exception ok 11198 - exists $vrgbl->{$lex}[$lex+1]{$lex}: value ok 11199 - delete $vrgbl->{$lex}[$lex+1]{$lex}: no exception ok 11200 - delete $vrgbl->{$lex}[$lex+1]{$lex}: value ok 11201 - $vlex{$gbl}[$lex+1]{$lex}: no exception ok 11202 - $vlex{$gbl}[$lex+1]{$lex}: value ok 11203 - $vlex{$gbl}[$lex+1]{$lex} = 123: no exception ok 11204 - $vlex{$gbl}[$lex+1]{$lex} = 123: value ok 11205 - exists $vlex{$gbl}[$lex+1]{$lex}: no exception ok 11206 - exists $vlex{$gbl}[$lex+1]{$lex}: value ok 11207 - delete $vlex{$gbl}[$lex+1]{$lex}: no exception ok 11208 - delete $vlex{$gbl}[$lex+1]{$lex}: value ok 11209 - $vgbl{$gbl}[$lex+1]{$lex}: no exception ok 11210 - $vgbl{$gbl}[$lex+1]{$lex}: value ok 11211 - $vgbl{$gbl}[$lex+1]{$lex} = 123: no exception ok 11212 - $vgbl{$gbl}[$lex+1]{$lex} = 123: value ok 11213 - exists $vgbl{$gbl}[$lex+1]{$lex}: no exception ok 11214 - exists $vgbl{$gbl}[$lex+1]{$lex}: value ok 11215 - delete $vgbl{$gbl}[$lex+1]{$lex}: no exception ok 11216 - delete $vgbl{$gbl}[$lex+1]{$lex}: value ok 11217 - $vrlex->{$gbl}[$lex+1]{$lex}: no exception ok 11218 - $vrlex->{$gbl}[$lex+1]{$lex}: value ok 11219 - $vrlex->{$gbl}[$lex+1]{$lex} = 123: no exception ok 11220 - $vrlex->{$gbl}[$lex+1]{$lex} = 123: value ok 11221 - exists $vrlex->{$gbl}[$lex+1]{$lex}: no exception ok 11222 - exists $vrlex->{$gbl}[$lex+1]{$lex}: value ok 11223 - delete $vrlex->{$gbl}[$lex+1]{$lex}: no exception ok 11224 - delete $vrlex->{$gbl}[$lex+1]{$lex}: value ok 11225 - $vrgbl->{$gbl}[$lex+1]{$lex}: no exception ok 11226 - $vrgbl->{$gbl}[$lex+1]{$lex}: value ok 11227 - $vrgbl->{$gbl}[$lex+1]{$lex} = 123: no exception ok 11228 - $vrgbl->{$gbl}[$lex+1]{$lex} = 123: value ok 11229 - exists $vrgbl->{$gbl}[$lex+1]{$lex}: no exception ok 11230 - exists $vrgbl->{$gbl}[$lex+1]{$lex}: value ok 11231 - delete $vrgbl->{$gbl}[$lex+1]{$lex}: no exception ok 11232 - delete $vrgbl->{$gbl}[$lex+1]{$lex}: value ok 11233 - $vlex{"x$lex"}[$lex+1]{$lex}: no exception ok 11234 - $vlex{"x$lex"}[$lex+1]{$lex}: value ok 11235 - $vlex{"x$lex"}[$lex+1]{$lex} = 123: no exception ok 11236 - $vlex{"x$lex"}[$lex+1]{$lex} = 123: value ok 11237 - exists $vlex{"x$lex"}[$lex+1]{$lex}: no exception ok 11238 - exists $vlex{"x$lex"}[$lex+1]{$lex}: value ok 11239 - delete $vlex{"x$lex"}[$lex+1]{$lex}: no exception ok 11240 - delete $vlex{"x$lex"}[$lex+1]{$lex}: value ok 11241 - $vgbl{"x$lex"}[$lex+1]{$lex}: no exception ok 11242 - $vgbl{"x$lex"}[$lex+1]{$lex}: value ok 11243 - $vgbl{"x$lex"}[$lex+1]{$lex} = 123: no exception ok 11244 - $vgbl{"x$lex"}[$lex+1]{$lex} = 123: value ok 11245 - exists $vgbl{"x$lex"}[$lex+1]{$lex}: no exception ok 11246 - exists $vgbl{"x$lex"}[$lex+1]{$lex}: value ok 11247 - delete $vgbl{"x$lex"}[$lex+1]{$lex}: no exception ok 11248 - delete $vgbl{"x$lex"}[$lex+1]{$lex}: value ok 11249 - $vrlex->{"x$lex"}[$lex+1]{$lex}: no exception ok 11250 - $vrlex->{"x$lex"}[$lex+1]{$lex}: value ok 11251 - $vrlex->{"x$lex"}[$lex+1]{$lex} = 123: no exception ok 11252 - $vrlex->{"x$lex"}[$lex+1]{$lex} = 123: value ok 11253 - exists $vrlex->{"x$lex"}[$lex+1]{$lex}: no exception ok 11254 - exists $vrlex->{"x$lex"}[$lex+1]{$lex}: value ok 11255 - delete $vrlex->{"x$lex"}[$lex+1]{$lex}: no exception ok 11256 - delete $vrlex->{"x$lex"}[$lex+1]{$lex}: value ok 11257 - $vrgbl->{"x$lex"}[$lex+1]{$lex}: no exception ok 11258 - $vrgbl->{"x$lex"}[$lex+1]{$lex}: value ok 11259 - $vrgbl->{"x$lex"}[$lex+1]{$lex} = 123: no exception ok 11260 - $vrgbl->{"x$lex"}[$lex+1]{$lex} = 123: value ok 11261 - exists $vrgbl->{"x$lex"}[$lex+1]{$lex}: no exception ok 11262 - exists $vrgbl->{"x$lex"}[$lex+1]{$lex}: value ok 11263 - delete $vrgbl->{"x$lex"}[$lex+1]{$lex}: no exception ok 11264 - delete $vrgbl->{"x$lex"}[$lex+1]{$lex}: value ok 11265 - $vlex[0]{foo}{$lex}: no exception ok 11266 - $vlex[0]{foo}{$lex}: value ok 11267 - $vlex[0]{foo}{$lex} = 123: no exception ok 11268 - $vlex[0]{foo}{$lex} = 123: value ok 11269 - exists $vlex[0]{foo}{$lex}: no exception ok 11270 - exists $vlex[0]{foo}{$lex}: value ok 11271 - delete $vlex[0]{foo}{$lex}: no exception ok 11272 - delete $vlex[0]{foo}{$lex}: value ok 11273 - $vgbl[0]{foo}{$lex}: no exception ok 11274 - $vgbl[0]{foo}{$lex}: value ok 11275 - $vgbl[0]{foo}{$lex} = 123: no exception ok 11276 - $vgbl[0]{foo}{$lex} = 123: value ok 11277 - exists $vgbl[0]{foo}{$lex}: no exception ok 11278 - exists $vgbl[0]{foo}{$lex}: value ok 11279 - delete $vgbl[0]{foo}{$lex}: no exception ok 11280 - delete $vgbl[0]{foo}{$lex}: value ok 11281 - $vrlex->[0]{foo}{$lex}: no exception ok 11282 - $vrlex->[0]{foo}{$lex}: value ok 11283 - $vrlex->[0]{foo}{$lex} = 123: no exception ok 11284 - $vrlex->[0]{foo}{$lex} = 123: value ok 11285 - exists $vrlex->[0]{foo}{$lex}: no exception ok 11286 - exists $vrlex->[0]{foo}{$lex}: value ok 11287 - delete $vrlex->[0]{foo}{$lex}: no exception ok 11288 - delete $vrlex->[0]{foo}{$lex}: value ok 11289 - $vrgbl->[0]{foo}{$lex}: no exception ok 11290 - $vrgbl->[0]{foo}{$lex}: value ok 11291 - $vrgbl->[0]{foo}{$lex} = 123: no exception ok 11292 - $vrgbl->[0]{foo}{$lex} = 123: value ok 11293 - exists $vrgbl->[0]{foo}{$lex}: no exception ok 11294 - exists $vrgbl->[0]{foo}{$lex}: value ok 11295 - delete $vrgbl->[0]{foo}{$lex}: no exception ok 11296 - delete $vrgbl->[0]{foo}{$lex}: value ok 11297 - $vlex[$lex]{foo}{$lex}: no exception ok 11298 - $vlex[$lex]{foo}{$lex}: value ok 11299 - $vlex[$lex]{foo}{$lex} = 123: no exception ok 11300 - $vlex[$lex]{foo}{$lex} = 123: value ok 11301 - exists $vlex[$lex]{foo}{$lex}: no exception ok 11302 - exists $vlex[$lex]{foo}{$lex}: value ok 11303 - delete $vlex[$lex]{foo}{$lex}: no exception ok 11304 - delete $vlex[$lex]{foo}{$lex}: value ok 11305 - $vgbl[$lex]{foo}{$lex}: no exception ok 11306 - $vgbl[$lex]{foo}{$lex}: value ok 11307 - $vgbl[$lex]{foo}{$lex} = 123: no exception ok 11308 - $vgbl[$lex]{foo}{$lex} = 123: value ok 11309 - exists $vgbl[$lex]{foo}{$lex}: no exception ok 11310 - exists $vgbl[$lex]{foo}{$lex}: value ok 11311 - delete $vgbl[$lex]{foo}{$lex}: no exception ok 11312 - delete $vgbl[$lex]{foo}{$lex}: value ok 11313 - $vrlex->[$lex]{foo}{$lex}: no exception ok 11314 - $vrlex->[$lex]{foo}{$lex}: value ok 11315 - $vrlex->[$lex]{foo}{$lex} = 123: no exception ok 11316 - $vrlex->[$lex]{foo}{$lex} = 123: value ok 11317 - exists $vrlex->[$lex]{foo}{$lex}: no exception ok 11318 - exists $vrlex->[$lex]{foo}{$lex}: value ok 11319 - delete $vrlex->[$lex]{foo}{$lex}: no exception ok 11320 - delete $vrlex->[$lex]{foo}{$lex}: value ok 11321 - $vrgbl->[$lex]{foo}{$lex}: no exception ok 11322 - $vrgbl->[$lex]{foo}{$lex}: value ok 11323 - $vrgbl->[$lex]{foo}{$lex} = 123: no exception ok 11324 - $vrgbl->[$lex]{foo}{$lex} = 123: value ok 11325 - exists $vrgbl->[$lex]{foo}{$lex}: no exception ok 11326 - exists $vrgbl->[$lex]{foo}{$lex}: value ok 11327 - delete $vrgbl->[$lex]{foo}{$lex}: no exception ok 11328 - delete $vrgbl->[$lex]{foo}{$lex}: value ok 11329 - $vlex[$gbl]{foo}{$lex}: no exception ok 11330 - $vlex[$gbl]{foo}{$lex}: value ok 11331 - $vlex[$gbl]{foo}{$lex} = 123: no exception ok 11332 - $vlex[$gbl]{foo}{$lex} = 123: value ok 11333 - exists $vlex[$gbl]{foo}{$lex}: no exception ok 11334 - exists $vlex[$gbl]{foo}{$lex}: value ok 11335 - delete $vlex[$gbl]{foo}{$lex}: no exception ok 11336 - delete $vlex[$gbl]{foo}{$lex}: value ok 11337 - $vgbl[$gbl]{foo}{$lex}: no exception ok 11338 - $vgbl[$gbl]{foo}{$lex}: value ok 11339 - $vgbl[$gbl]{foo}{$lex} = 123: no exception ok 11340 - $vgbl[$gbl]{foo}{$lex} = 123: value ok 11341 - exists $vgbl[$gbl]{foo}{$lex}: no exception ok 11342 - exists $vgbl[$gbl]{foo}{$lex}: value ok 11343 - delete $vgbl[$gbl]{foo}{$lex}: no exception ok 11344 - delete $vgbl[$gbl]{foo}{$lex}: value ok 11345 - $vrlex->[$gbl]{foo}{$lex}: no exception ok 11346 - $vrlex->[$gbl]{foo}{$lex}: value ok 11347 - $vrlex->[$gbl]{foo}{$lex} = 123: no exception ok 11348 - $vrlex->[$gbl]{foo}{$lex} = 123: value ok 11349 - exists $vrlex->[$gbl]{foo}{$lex}: no exception ok 11350 - exists $vrlex->[$gbl]{foo}{$lex}: value ok 11351 - delete $vrlex->[$gbl]{foo}{$lex}: no exception ok 11352 - delete $vrlex->[$gbl]{foo}{$lex}: value ok 11353 - $vrgbl->[$gbl]{foo}{$lex}: no exception ok 11354 - $vrgbl->[$gbl]{foo}{$lex}: value ok 11355 - $vrgbl->[$gbl]{foo}{$lex} = 123: no exception ok 11356 - $vrgbl->[$gbl]{foo}{$lex} = 123: value ok 11357 - exists $vrgbl->[$gbl]{foo}{$lex}: no exception ok 11358 - exists $vrgbl->[$gbl]{foo}{$lex}: value ok 11359 - delete $vrgbl->[$gbl]{foo}{$lex}: no exception ok 11360 - delete $vrgbl->[$gbl]{foo}{$lex}: value ok 11361 - $vlex[$lex+1]{foo}{$lex}: no exception ok 11362 - $vlex[$lex+1]{foo}{$lex}: value ok 11363 - $vlex[$lex+1]{foo}{$lex} = 123: no exception ok 11364 - $vlex[$lex+1]{foo}{$lex} = 123: value ok 11365 - exists $vlex[$lex+1]{foo}{$lex}: no exception ok 11366 - exists $vlex[$lex+1]{foo}{$lex}: value ok 11367 - delete $vlex[$lex+1]{foo}{$lex}: no exception ok 11368 - delete $vlex[$lex+1]{foo}{$lex}: value ok 11369 - $vgbl[$lex+1]{foo}{$lex}: no exception ok 11370 - $vgbl[$lex+1]{foo}{$lex}: value ok 11371 - $vgbl[$lex+1]{foo}{$lex} = 123: no exception ok 11372 - $vgbl[$lex+1]{foo}{$lex} = 123: value ok 11373 - exists $vgbl[$lex+1]{foo}{$lex}: no exception ok 11374 - exists $vgbl[$lex+1]{foo}{$lex}: value ok 11375 - delete $vgbl[$lex+1]{foo}{$lex}: no exception ok 11376 - delete $vgbl[$lex+1]{foo}{$lex}: value ok 11377 - $vrlex->[$lex+1]{foo}{$lex}: no exception ok 11378 - $vrlex->[$lex+1]{foo}{$lex}: value ok 11379 - $vrlex->[$lex+1]{foo}{$lex} = 123: no exception ok 11380 - $vrlex->[$lex+1]{foo}{$lex} = 123: value ok 11381 - exists $vrlex->[$lex+1]{foo}{$lex}: no exception ok 11382 - exists $vrlex->[$lex+1]{foo}{$lex}: value ok 11383 - delete $vrlex->[$lex+1]{foo}{$lex}: no exception ok 11384 - delete $vrlex->[$lex+1]{foo}{$lex}: value ok 11385 - $vrgbl->[$lex+1]{foo}{$lex}: no exception ok 11386 - $vrgbl->[$lex+1]{foo}{$lex}: value ok 11387 - $vrgbl->[$lex+1]{foo}{$lex} = 123: no exception ok 11388 - $vrgbl->[$lex+1]{foo}{$lex} = 123: value ok 11389 - exists $vrgbl->[$lex+1]{foo}{$lex}: no exception ok 11390 - exists $vrgbl->[$lex+1]{foo}{$lex}: value ok 11391 - delete $vrgbl->[$lex+1]{foo}{$lex}: no exception ok 11392 - delete $vrgbl->[$lex+1]{foo}{$lex}: value ok 11393 - $vlex{foo}{foo}{$lex}: no exception ok 11394 - $vlex{foo}{foo}{$lex}: value ok 11395 - $vlex{foo}{foo}{$lex} = 123: no exception ok 11396 - $vlex{foo}{foo}{$lex} = 123: value ok 11397 - exists $vlex{foo}{foo}{$lex}: no exception ok 11398 - exists $vlex{foo}{foo}{$lex}: value ok 11399 - delete $vlex{foo}{foo}{$lex}: no exception ok 11400 - delete $vlex{foo}{foo}{$lex}: value ok 11401 - $vgbl{foo}{foo}{$lex}: no exception ok 11402 - $vgbl{foo}{foo}{$lex}: value ok 11403 - $vgbl{foo}{foo}{$lex} = 123: no exception ok 11404 - $vgbl{foo}{foo}{$lex} = 123: value ok 11405 - exists $vgbl{foo}{foo}{$lex}: no exception ok 11406 - exists $vgbl{foo}{foo}{$lex}: value ok 11407 - delete $vgbl{foo}{foo}{$lex}: no exception ok 11408 - delete $vgbl{foo}{foo}{$lex}: value ok 11409 - $vrlex->{foo}{foo}{$lex}: no exception ok 11410 - $vrlex->{foo}{foo}{$lex}: value ok 11411 - $vrlex->{foo}{foo}{$lex} = 123: no exception ok 11412 - $vrlex->{foo}{foo}{$lex} = 123: value ok 11413 - exists $vrlex->{foo}{foo}{$lex}: no exception ok 11414 - exists $vrlex->{foo}{foo}{$lex}: value ok 11415 - delete $vrlex->{foo}{foo}{$lex}: no exception ok 11416 - delete $vrlex->{foo}{foo}{$lex}: value ok 11417 - $vrgbl->{foo}{foo}{$lex}: no exception ok 11418 - $vrgbl->{foo}{foo}{$lex}: value ok 11419 - $vrgbl->{foo}{foo}{$lex} = 123: no exception ok 11420 - $vrgbl->{foo}{foo}{$lex} = 123: value ok 11421 - exists $vrgbl->{foo}{foo}{$lex}: no exception ok 11422 - exists $vrgbl->{foo}{foo}{$lex}: value ok 11423 - delete $vrgbl->{foo}{foo}{$lex}: no exception ok 11424 - delete $vrgbl->{foo}{foo}{$lex}: value ok 11425 - $vlex{$lex}{foo}{$lex}: no exception ok 11426 - $vlex{$lex}{foo}{$lex}: value ok 11427 - $vlex{$lex}{foo}{$lex} = 123: no exception ok 11428 - $vlex{$lex}{foo}{$lex} = 123: value ok 11429 - exists $vlex{$lex}{foo}{$lex}: no exception ok 11430 - exists $vlex{$lex}{foo}{$lex}: value ok 11431 - delete $vlex{$lex}{foo}{$lex}: no exception ok 11432 - delete $vlex{$lex}{foo}{$lex}: value ok 11433 - $vgbl{$lex}{foo}{$lex}: no exception ok 11434 - $vgbl{$lex}{foo}{$lex}: value ok 11435 - $vgbl{$lex}{foo}{$lex} = 123: no exception ok 11436 - $vgbl{$lex}{foo}{$lex} = 123: value ok 11437 - exists $vgbl{$lex}{foo}{$lex}: no exception ok 11438 - exists $vgbl{$lex}{foo}{$lex}: value ok 11439 - delete $vgbl{$lex}{foo}{$lex}: no exception ok 11440 - delete $vgbl{$lex}{foo}{$lex}: value ok 11441 - $vrlex->{$lex}{foo}{$lex}: no exception ok 11442 - $vrlex->{$lex}{foo}{$lex}: value ok 11443 - $vrlex->{$lex}{foo}{$lex} = 123: no exception ok 11444 - $vrlex->{$lex}{foo}{$lex} = 123: value ok 11445 - exists $vrlex->{$lex}{foo}{$lex}: no exception ok 11446 - exists $vrlex->{$lex}{foo}{$lex}: value ok 11447 - delete $vrlex->{$lex}{foo}{$lex}: no exception ok 11448 - delete $vrlex->{$lex}{foo}{$lex}: value ok 11449 - $vrgbl->{$lex}{foo}{$lex}: no exception ok 11450 - $vrgbl->{$lex}{foo}{$lex}: value ok 11451 - $vrgbl->{$lex}{foo}{$lex} = 123: no exception ok 11452 - $vrgbl->{$lex}{foo}{$lex} = 123: value ok 11453 - exists $vrgbl->{$lex}{foo}{$lex}: no exception ok 11454 - exists $vrgbl->{$lex}{foo}{$lex}: value ok 11455 - delete $vrgbl->{$lex}{foo}{$lex}: no exception ok 11456 - delete $vrgbl->{$lex}{foo}{$lex}: value ok 11457 - $vlex{$gbl}{foo}{$lex}: no exception ok 11458 - $vlex{$gbl}{foo}{$lex}: value ok 11459 - $vlex{$gbl}{foo}{$lex} = 123: no exception ok 11460 - $vlex{$gbl}{foo}{$lex} = 123: value ok 11461 - exists $vlex{$gbl}{foo}{$lex}: no exception ok 11462 - exists $vlex{$gbl}{foo}{$lex}: value ok 11463 - delete $vlex{$gbl}{foo}{$lex}: no exception ok 11464 - delete $vlex{$gbl}{foo}{$lex}: value ok 11465 - $vgbl{$gbl}{foo}{$lex}: no exception ok 11466 - $vgbl{$gbl}{foo}{$lex}: value ok 11467 - $vgbl{$gbl}{foo}{$lex} = 123: no exception ok 11468 - $vgbl{$gbl}{foo}{$lex} = 123: value ok 11469 - exists $vgbl{$gbl}{foo}{$lex}: no exception ok 11470 - exists $vgbl{$gbl}{foo}{$lex}: value ok 11471 - delete $vgbl{$gbl}{foo}{$lex}: no exception ok 11472 - delete $vgbl{$gbl}{foo}{$lex}: value ok 11473 - $vrlex->{$gbl}{foo}{$lex}: no exception ok 11474 - $vrlex->{$gbl}{foo}{$lex}: value ok 11475 - $vrlex->{$gbl}{foo}{$lex} = 123: no exception ok 11476 - $vrlex->{$gbl}{foo}{$lex} = 123: value ok 11477 - exists $vrlex->{$gbl}{foo}{$lex}: no exception ok 11478 - exists $vrlex->{$gbl}{foo}{$lex}: value ok 11479 - delete $vrlex->{$gbl}{foo}{$lex}: no exception ok 11480 - delete $vrlex->{$gbl}{foo}{$lex}: value ok 11481 - $vrgbl->{$gbl}{foo}{$lex}: no exception ok 11482 - $vrgbl->{$gbl}{foo}{$lex}: value ok 11483 - $vrgbl->{$gbl}{foo}{$lex} = 123: no exception ok 11484 - $vrgbl->{$gbl}{foo}{$lex} = 123: value ok 11485 - exists $vrgbl->{$gbl}{foo}{$lex}: no exception ok 11486 - exists $vrgbl->{$gbl}{foo}{$lex}: value ok 11487 - delete $vrgbl->{$gbl}{foo}{$lex}: no exception ok 11488 - delete $vrgbl->{$gbl}{foo}{$lex}: value ok 11489 - $vlex{"x$lex"}{foo}{$lex}: no exception ok 11490 - $vlex{"x$lex"}{foo}{$lex}: value ok 11491 - $vlex{"x$lex"}{foo}{$lex} = 123: no exception ok 11492 - $vlex{"x$lex"}{foo}{$lex} = 123: value ok 11493 - exists $vlex{"x$lex"}{foo}{$lex}: no exception ok 11494 - exists $vlex{"x$lex"}{foo}{$lex}: value ok 11495 - delete $vlex{"x$lex"}{foo}{$lex}: no exception ok 11496 - delete $vlex{"x$lex"}{foo}{$lex}: value ok 11497 - $vgbl{"x$lex"}{foo}{$lex}: no exception ok 11498 - $vgbl{"x$lex"}{foo}{$lex}: value ok 11499 - $vgbl{"x$lex"}{foo}{$lex} = 123: no exception ok 11500 - $vgbl{"x$lex"}{foo}{$lex} = 123: value ok 11501 - exists $vgbl{"x$lex"}{foo}{$lex}: no exception ok 11502 - exists $vgbl{"x$lex"}{foo}{$lex}: value ok 11503 - delete $vgbl{"x$lex"}{foo}{$lex}: no exception ok 11504 - delete $vgbl{"x$lex"}{foo}{$lex}: value ok 11505 - $vrlex->{"x$lex"}{foo}{$lex}: no exception ok 11506 - $vrlex->{"x$lex"}{foo}{$lex}: value ok 11507 - $vrlex->{"x$lex"}{foo}{$lex} = 123: no exception ok 11508 - $vrlex->{"x$lex"}{foo}{$lex} = 123: value ok 11509 - exists $vrlex->{"x$lex"}{foo}{$lex}: no exception ok 11510 - exists $vrlex->{"x$lex"}{foo}{$lex}: value ok 11511 - delete $vrlex->{"x$lex"}{foo}{$lex}: no exception ok 11512 - delete $vrlex->{"x$lex"}{foo}{$lex}: value ok 11513 - $vrgbl->{"x$lex"}{foo}{$lex}: no exception ok 11514 - $vrgbl->{"x$lex"}{foo}{$lex}: value ok 11515 - $vrgbl->{"x$lex"}{foo}{$lex} = 123: no exception ok 11516 - $vrgbl->{"x$lex"}{foo}{$lex} = 123: value ok 11517 - exists $vrgbl->{"x$lex"}{foo}{$lex}: no exception ok 11518 - exists $vrgbl->{"x$lex"}{foo}{$lex}: value ok 11519 - delete $vrgbl->{"x$lex"}{foo}{$lex}: no exception ok 11520 - delete $vrgbl->{"x$lex"}{foo}{$lex}: value ok 11521 - $vlex[0]{$lex}{$lex}: no exception ok 11522 - $vlex[0]{$lex}{$lex}: value ok 11523 - $vlex[0]{$lex}{$lex} = 123: no exception ok 11524 - $vlex[0]{$lex}{$lex} = 123: value ok 11525 - exists $vlex[0]{$lex}{$lex}: no exception ok 11526 - exists $vlex[0]{$lex}{$lex}: value ok 11527 - delete $vlex[0]{$lex}{$lex}: no exception ok 11528 - delete $vlex[0]{$lex}{$lex}: value ok 11529 - $vgbl[0]{$lex}{$lex}: no exception ok 11530 - $vgbl[0]{$lex}{$lex}: value ok 11531 - $vgbl[0]{$lex}{$lex} = 123: no exception ok 11532 - $vgbl[0]{$lex}{$lex} = 123: value ok 11533 - exists $vgbl[0]{$lex}{$lex}: no exception ok 11534 - exists $vgbl[0]{$lex}{$lex}: value ok 11535 - delete $vgbl[0]{$lex}{$lex}: no exception ok 11536 - delete $vgbl[0]{$lex}{$lex}: value ok 11537 - $vrlex->[0]{$lex}{$lex}: no exception ok 11538 - $vrlex->[0]{$lex}{$lex}: value ok 11539 - $vrlex->[0]{$lex}{$lex} = 123: no exception ok 11540 - $vrlex->[0]{$lex}{$lex} = 123: value ok 11541 - exists $vrlex->[0]{$lex}{$lex}: no exception ok 11542 - exists $vrlex->[0]{$lex}{$lex}: value ok 11543 - delete $vrlex->[0]{$lex}{$lex}: no exception ok 11544 - delete $vrlex->[0]{$lex}{$lex}: value ok 11545 - $vrgbl->[0]{$lex}{$lex}: no exception ok 11546 - $vrgbl->[0]{$lex}{$lex}: value ok 11547 - $vrgbl->[0]{$lex}{$lex} = 123: no exception ok 11548 - $vrgbl->[0]{$lex}{$lex} = 123: value ok 11549 - exists $vrgbl->[0]{$lex}{$lex}: no exception ok 11550 - exists $vrgbl->[0]{$lex}{$lex}: value ok 11551 - delete $vrgbl->[0]{$lex}{$lex}: no exception ok 11552 - delete $vrgbl->[0]{$lex}{$lex}: value ok 11553 - $vlex[$lex]{$lex}{$lex}: no exception ok 11554 - $vlex[$lex]{$lex}{$lex}: value ok 11555 - $vlex[$lex]{$lex}{$lex} = 123: no exception ok 11556 - $vlex[$lex]{$lex}{$lex} = 123: value ok 11557 - exists $vlex[$lex]{$lex}{$lex}: no exception ok 11558 - exists $vlex[$lex]{$lex}{$lex}: value ok 11559 - delete $vlex[$lex]{$lex}{$lex}: no exception ok 11560 - delete $vlex[$lex]{$lex}{$lex}: value ok 11561 - $vgbl[$lex]{$lex}{$lex}: no exception ok 11562 - $vgbl[$lex]{$lex}{$lex}: value ok 11563 - $vgbl[$lex]{$lex}{$lex} = 123: no exception ok 11564 - $vgbl[$lex]{$lex}{$lex} = 123: value ok 11565 - exists $vgbl[$lex]{$lex}{$lex}: no exception ok 11566 - exists $vgbl[$lex]{$lex}{$lex}: value ok 11567 - delete $vgbl[$lex]{$lex}{$lex}: no exception ok 11568 - delete $vgbl[$lex]{$lex}{$lex}: value ok 11569 - $vrlex->[$lex]{$lex}{$lex}: no exception ok 11570 - $vrlex->[$lex]{$lex}{$lex}: value ok 11571 - $vrlex->[$lex]{$lex}{$lex} = 123: no exception ok 11572 - $vrlex->[$lex]{$lex}{$lex} = 123: value ok 11573 - exists $vrlex->[$lex]{$lex}{$lex}: no exception ok 11574 - exists $vrlex->[$lex]{$lex}{$lex}: value ok 11575 - delete $vrlex->[$lex]{$lex}{$lex}: no exception ok 11576 - delete $vrlex->[$lex]{$lex}{$lex}: value ok 11577 - $vrgbl->[$lex]{$lex}{$lex}: no exception ok 11578 - $vrgbl->[$lex]{$lex}{$lex}: value ok 11579 - $vrgbl->[$lex]{$lex}{$lex} = 123: no exception ok 11580 - $vrgbl->[$lex]{$lex}{$lex} = 123: value ok 11581 - exists $vrgbl->[$lex]{$lex}{$lex}: no exception ok 11582 - exists $vrgbl->[$lex]{$lex}{$lex}: value ok 11583 - delete $vrgbl->[$lex]{$lex}{$lex}: no exception ok 11584 - delete $vrgbl->[$lex]{$lex}{$lex}: value ok 11585 - $vlex[$gbl]{$lex}{$lex}: no exception ok 11586 - $vlex[$gbl]{$lex}{$lex}: value ok 11587 - $vlex[$gbl]{$lex}{$lex} = 123: no exception ok 11588 - $vlex[$gbl]{$lex}{$lex} = 123: value ok 11589 - exists $vlex[$gbl]{$lex}{$lex}: no exception ok 11590 - exists $vlex[$gbl]{$lex}{$lex}: value ok 11591 - delete $vlex[$gbl]{$lex}{$lex}: no exception ok 11592 - delete $vlex[$gbl]{$lex}{$lex}: value ok 11593 - $vgbl[$gbl]{$lex}{$lex}: no exception ok 11594 - $vgbl[$gbl]{$lex}{$lex}: value ok 11595 - $vgbl[$gbl]{$lex}{$lex} = 123: no exception ok 11596 - $vgbl[$gbl]{$lex}{$lex} = 123: value ok 11597 - exists $vgbl[$gbl]{$lex}{$lex}: no exception ok 11598 - exists $vgbl[$gbl]{$lex}{$lex}: value ok 11599 - delete $vgbl[$gbl]{$lex}{$lex}: no exception ok 11600 - delete $vgbl[$gbl]{$lex}{$lex}: value ok 11601 - $vrlex->[$gbl]{$lex}{$lex}: no exception ok 11602 - $vrlex->[$gbl]{$lex}{$lex}: value ok 11603 - $vrlex->[$gbl]{$lex}{$lex} = 123: no exception ok 11604 - $vrlex->[$gbl]{$lex}{$lex} = 123: value ok 11605 - exists $vrlex->[$gbl]{$lex}{$lex}: no exception ok 11606 - exists $vrlex->[$gbl]{$lex}{$lex}: value ok 11607 - delete $vrlex->[$gbl]{$lex}{$lex}: no exception ok 11608 - delete $vrlex->[$gbl]{$lex}{$lex}: value ok 11609 - $vrgbl->[$gbl]{$lex}{$lex}: no exception ok 11610 - $vrgbl->[$gbl]{$lex}{$lex}: value ok 11611 - $vrgbl->[$gbl]{$lex}{$lex} = 123: no exception ok 11612 - $vrgbl->[$gbl]{$lex}{$lex} = 123: value ok 11613 - exists $vrgbl->[$gbl]{$lex}{$lex}: no exception ok 11614 - exists $vrgbl->[$gbl]{$lex}{$lex}: value ok 11615 - delete $vrgbl->[$gbl]{$lex}{$lex}: no exception ok 11616 - delete $vrgbl->[$gbl]{$lex}{$lex}: value ok 11617 - $vlex[$lex+1]{$lex}{$lex}: no exception ok 11618 - $vlex[$lex+1]{$lex}{$lex}: value ok 11619 - $vlex[$lex+1]{$lex}{$lex} = 123: no exception ok 11620 - $vlex[$lex+1]{$lex}{$lex} = 123: value ok 11621 - exists $vlex[$lex+1]{$lex}{$lex}: no exception ok 11622 - exists $vlex[$lex+1]{$lex}{$lex}: value ok 11623 - delete $vlex[$lex+1]{$lex}{$lex}: no exception ok 11624 - delete $vlex[$lex+1]{$lex}{$lex}: value ok 11625 - $vgbl[$lex+1]{$lex}{$lex}: no exception ok 11626 - $vgbl[$lex+1]{$lex}{$lex}: value ok 11627 - $vgbl[$lex+1]{$lex}{$lex} = 123: no exception ok 11628 - $vgbl[$lex+1]{$lex}{$lex} = 123: value ok 11629 - exists $vgbl[$lex+1]{$lex}{$lex}: no exception ok 11630 - exists $vgbl[$lex+1]{$lex}{$lex}: value ok 11631 - delete $vgbl[$lex+1]{$lex}{$lex}: no exception ok 11632 - delete $vgbl[$lex+1]{$lex}{$lex}: value ok 11633 - $vrlex->[$lex+1]{$lex}{$lex}: no exception ok 11634 - $vrlex->[$lex+1]{$lex}{$lex}: value ok 11635 - $vrlex->[$lex+1]{$lex}{$lex} = 123: no exception ok 11636 - $vrlex->[$lex+1]{$lex}{$lex} = 123: value ok 11637 - exists $vrlex->[$lex+1]{$lex}{$lex}: no exception ok 11638 - exists $vrlex->[$lex+1]{$lex}{$lex}: value ok 11639 - delete $vrlex->[$lex+1]{$lex}{$lex}: no exception ok 11640 - delete $vrlex->[$lex+1]{$lex}{$lex}: value ok 11641 - $vrgbl->[$lex+1]{$lex}{$lex}: no exception ok 11642 - $vrgbl->[$lex+1]{$lex}{$lex}: value ok 11643 - $vrgbl->[$lex+1]{$lex}{$lex} = 123: no exception ok 11644 - $vrgbl->[$lex+1]{$lex}{$lex} = 123: value ok 11645 - exists $vrgbl->[$lex+1]{$lex}{$lex}: no exception ok 11646 - exists $vrgbl->[$lex+1]{$lex}{$lex}: value ok 11647 - delete $vrgbl->[$lex+1]{$lex}{$lex}: no exception ok 11648 - delete $vrgbl->[$lex+1]{$lex}{$lex}: value ok 11649 - $vlex{foo}{$lex}{$lex}: no exception ok 11650 - $vlex{foo}{$lex}{$lex}: value ok 11651 - $vlex{foo}{$lex}{$lex} = 123: no exception ok 11652 - $vlex{foo}{$lex}{$lex} = 123: value ok 11653 - exists $vlex{foo}{$lex}{$lex}: no exception ok 11654 - exists $vlex{foo}{$lex}{$lex}: value ok 11655 - delete $vlex{foo}{$lex}{$lex}: no exception ok 11656 - delete $vlex{foo}{$lex}{$lex}: value ok 11657 - $vgbl{foo}{$lex}{$lex}: no exception ok 11658 - $vgbl{foo}{$lex}{$lex}: value ok 11659 - $vgbl{foo}{$lex}{$lex} = 123: no exception ok 11660 - $vgbl{foo}{$lex}{$lex} = 123: value ok 11661 - exists $vgbl{foo}{$lex}{$lex}: no exception ok 11662 - exists $vgbl{foo}{$lex}{$lex}: value ok 11663 - delete $vgbl{foo}{$lex}{$lex}: no exception ok 11664 - delete $vgbl{foo}{$lex}{$lex}: value ok 11665 - $vrlex->{foo}{$lex}{$lex}: no exception ok 11666 - $vrlex->{foo}{$lex}{$lex}: value ok 11667 - $vrlex->{foo}{$lex}{$lex} = 123: no exception ok 11668 - $vrlex->{foo}{$lex}{$lex} = 123: value ok 11669 - exists $vrlex->{foo}{$lex}{$lex}: no exception ok 11670 - exists $vrlex->{foo}{$lex}{$lex}: value ok 11671 - delete $vrlex->{foo}{$lex}{$lex}: no exception ok 11672 - delete $vrlex->{foo}{$lex}{$lex}: value ok 11673 - $vrgbl->{foo}{$lex}{$lex}: no exception ok 11674 - $vrgbl->{foo}{$lex}{$lex}: value ok 11675 - $vrgbl->{foo}{$lex}{$lex} = 123: no exception ok 11676 - $vrgbl->{foo}{$lex}{$lex} = 123: value ok 11677 - exists $vrgbl->{foo}{$lex}{$lex}: no exception ok 11678 - exists $vrgbl->{foo}{$lex}{$lex}: value ok 11679 - delete $vrgbl->{foo}{$lex}{$lex}: no exception ok 11680 - delete $vrgbl->{foo}{$lex}{$lex}: value ok 11681 - $vlex{$lex}{$lex}{$lex}: no exception ok 11682 - $vlex{$lex}{$lex}{$lex}: value ok 11683 - $vlex{$lex}{$lex}{$lex} = 123: no exception ok 11684 - $vlex{$lex}{$lex}{$lex} = 123: value ok 11685 - exists $vlex{$lex}{$lex}{$lex}: no exception ok 11686 - exists $vlex{$lex}{$lex}{$lex}: value ok 11687 - delete $vlex{$lex}{$lex}{$lex}: no exception ok 11688 - delete $vlex{$lex}{$lex}{$lex}: value ok 11689 - $vgbl{$lex}{$lex}{$lex}: no exception ok 11690 - $vgbl{$lex}{$lex}{$lex}: value ok 11691 - $vgbl{$lex}{$lex}{$lex} = 123: no exception ok 11692 - $vgbl{$lex}{$lex}{$lex} = 123: value ok 11693 - exists $vgbl{$lex}{$lex}{$lex}: no exception ok 11694 - exists $vgbl{$lex}{$lex}{$lex}: value ok 11695 - delete $vgbl{$lex}{$lex}{$lex}: no exception ok 11696 - delete $vgbl{$lex}{$lex}{$lex}: value ok 11697 - $vrlex->{$lex}{$lex}{$lex}: no exception ok 11698 - $vrlex->{$lex}{$lex}{$lex}: value ok 11699 - $vrlex->{$lex}{$lex}{$lex} = 123: no exception ok 11700 - $vrlex->{$lex}{$lex}{$lex} = 123: value ok 11701 - exists $vrlex->{$lex}{$lex}{$lex}: no exception ok 11702 - exists $vrlex->{$lex}{$lex}{$lex}: value ok 11703 - delete $vrlex->{$lex}{$lex}{$lex}: no exception ok 11704 - delete $vrlex->{$lex}{$lex}{$lex}: value ok 11705 - $vrgbl->{$lex}{$lex}{$lex}: no exception ok 11706 - $vrgbl->{$lex}{$lex}{$lex}: value ok 11707 - $vrgbl->{$lex}{$lex}{$lex} = 123: no exception ok 11708 - $vrgbl->{$lex}{$lex}{$lex} = 123: value ok 11709 - exists $vrgbl->{$lex}{$lex}{$lex}: no exception ok 11710 - exists $vrgbl->{$lex}{$lex}{$lex}: value ok 11711 - delete $vrgbl->{$lex}{$lex}{$lex}: no exception ok 11712 - delete $vrgbl->{$lex}{$lex}{$lex}: value ok 11713 - $vlex{$gbl}{$lex}{$lex}: no exception ok 11714 - $vlex{$gbl}{$lex}{$lex}: value ok 11715 - $vlex{$gbl}{$lex}{$lex} = 123: no exception ok 11716 - $vlex{$gbl}{$lex}{$lex} = 123: value ok 11717 - exists $vlex{$gbl}{$lex}{$lex}: no exception ok 11718 - exists $vlex{$gbl}{$lex}{$lex}: value ok 11719 - delete $vlex{$gbl}{$lex}{$lex}: no exception ok 11720 - delete $vlex{$gbl}{$lex}{$lex}: value ok 11721 - $vgbl{$gbl}{$lex}{$lex}: no exception ok 11722 - $vgbl{$gbl}{$lex}{$lex}: value ok 11723 - $vgbl{$gbl}{$lex}{$lex} = 123: no exception ok 11724 - $vgbl{$gbl}{$lex}{$lex} = 123: value ok 11725 - exists $vgbl{$gbl}{$lex}{$lex}: no exception ok 11726 - exists $vgbl{$gbl}{$lex}{$lex}: value ok 11727 - delete $vgbl{$gbl}{$lex}{$lex}: no exception ok 11728 - delete $vgbl{$gbl}{$lex}{$lex}: value ok 11729 - $vrlex->{$gbl}{$lex}{$lex}: no exception ok 11730 - $vrlex->{$gbl}{$lex}{$lex}: value ok 11731 - $vrlex->{$gbl}{$lex}{$lex} = 123: no exception ok 11732 - $vrlex->{$gbl}{$lex}{$lex} = 123: value ok 11733 - exists $vrlex->{$gbl}{$lex}{$lex}: no exception ok 11734 - exists $vrlex->{$gbl}{$lex}{$lex}: value ok 11735 - delete $vrlex->{$gbl}{$lex}{$lex}: no exception ok 11736 - delete $vrlex->{$gbl}{$lex}{$lex}: value ok 11737 - $vrgbl->{$gbl}{$lex}{$lex}: no exception ok 11738 - $vrgbl->{$gbl}{$lex}{$lex}: value ok 11739 - $vrgbl->{$gbl}{$lex}{$lex} = 123: no exception ok 11740 - $vrgbl->{$gbl}{$lex}{$lex} = 123: value ok 11741 - exists $vrgbl->{$gbl}{$lex}{$lex}: no exception ok 11742 - exists $vrgbl->{$gbl}{$lex}{$lex}: value ok 11743 - delete $vrgbl->{$gbl}{$lex}{$lex}: no exception ok 11744 - delete $vrgbl->{$gbl}{$lex}{$lex}: value ok 11745 - $vlex{"x$lex"}{$lex}{$lex}: no exception ok 11746 - $vlex{"x$lex"}{$lex}{$lex}: value ok 11747 - $vlex{"x$lex"}{$lex}{$lex} = 123: no exception ok 11748 - $vlex{"x$lex"}{$lex}{$lex} = 123: value ok 11749 - exists $vlex{"x$lex"}{$lex}{$lex}: no exception ok 11750 - exists $vlex{"x$lex"}{$lex}{$lex}: value ok 11751 - delete $vlex{"x$lex"}{$lex}{$lex}: no exception ok 11752 - delete $vlex{"x$lex"}{$lex}{$lex}: value ok 11753 - $vgbl{"x$lex"}{$lex}{$lex}: no exception ok 11754 - $vgbl{"x$lex"}{$lex}{$lex}: value ok 11755 - $vgbl{"x$lex"}{$lex}{$lex} = 123: no exception ok 11756 - $vgbl{"x$lex"}{$lex}{$lex} = 123: value ok 11757 - exists $vgbl{"x$lex"}{$lex}{$lex}: no exception ok 11758 - exists $vgbl{"x$lex"}{$lex}{$lex}: value ok 11759 - delete $vgbl{"x$lex"}{$lex}{$lex}: no exception ok 11760 - delete $vgbl{"x$lex"}{$lex}{$lex}: value ok 11761 - $vrlex->{"x$lex"}{$lex}{$lex}: no exception ok 11762 - $vrlex->{"x$lex"}{$lex}{$lex}: value ok 11763 - $vrlex->{"x$lex"}{$lex}{$lex} = 123: no exception ok 11764 - $vrlex->{"x$lex"}{$lex}{$lex} = 123: value ok 11765 - exists $vrlex->{"x$lex"}{$lex}{$lex}: no exception ok 11766 - exists $vrlex->{"x$lex"}{$lex}{$lex}: value ok 11767 - delete $vrlex->{"x$lex"}{$lex}{$lex}: no exception ok 11768 - delete $vrlex->{"x$lex"}{$lex}{$lex}: value ok 11769 - $vrgbl->{"x$lex"}{$lex}{$lex}: no exception ok 11770 - $vrgbl->{"x$lex"}{$lex}{$lex}: value ok 11771 - $vrgbl->{"x$lex"}{$lex}{$lex} = 123: no exception ok 11772 - $vrgbl->{"x$lex"}{$lex}{$lex} = 123: value ok 11773 - exists $vrgbl->{"x$lex"}{$lex}{$lex}: no exception ok 11774 - exists $vrgbl->{"x$lex"}{$lex}{$lex}: value ok 11775 - delete $vrgbl->{"x$lex"}{$lex}{$lex}: no exception ok 11776 - delete $vrgbl->{"x$lex"}{$lex}{$lex}: value ok 11777 - $vlex[0]{$gbl}{$lex}: no exception ok 11778 - $vlex[0]{$gbl}{$lex}: value ok 11779 - $vlex[0]{$gbl}{$lex} = 123: no exception ok 11780 - $vlex[0]{$gbl}{$lex} = 123: value ok 11781 - exists $vlex[0]{$gbl}{$lex}: no exception ok 11782 - exists $vlex[0]{$gbl}{$lex}: value ok 11783 - delete $vlex[0]{$gbl}{$lex}: no exception ok 11784 - delete $vlex[0]{$gbl}{$lex}: value ok 11785 - $vgbl[0]{$gbl}{$lex}: no exception ok 11786 - $vgbl[0]{$gbl}{$lex}: value ok 11787 - $vgbl[0]{$gbl}{$lex} = 123: no exception ok 11788 - $vgbl[0]{$gbl}{$lex} = 123: value ok 11789 - exists $vgbl[0]{$gbl}{$lex}: no exception ok 11790 - exists $vgbl[0]{$gbl}{$lex}: value ok 11791 - delete $vgbl[0]{$gbl}{$lex}: no exception ok 11792 - delete $vgbl[0]{$gbl}{$lex}: value ok 11793 - $vrlex->[0]{$gbl}{$lex}: no exception ok 11794 - $vrlex->[0]{$gbl}{$lex}: value ok 11795 - $vrlex->[0]{$gbl}{$lex} = 123: no exception ok 11796 - $vrlex->[0]{$gbl}{$lex} = 123: value ok 11797 - exists $vrlex->[0]{$gbl}{$lex}: no exception ok 11798 - exists $vrlex->[0]{$gbl}{$lex}: value ok 11799 - delete $vrlex->[0]{$gbl}{$lex}: no exception ok 11800 - delete $vrlex->[0]{$gbl}{$lex}: value ok 11801 - $vrgbl->[0]{$gbl}{$lex}: no exception ok 11802 - $vrgbl->[0]{$gbl}{$lex}: value ok 11803 - $vrgbl->[0]{$gbl}{$lex} = 123: no exception ok 11804 - $vrgbl->[0]{$gbl}{$lex} = 123: value ok 11805 - exists $vrgbl->[0]{$gbl}{$lex}: no exception ok 11806 - exists $vrgbl->[0]{$gbl}{$lex}: value ok 11807 - delete $vrgbl->[0]{$gbl}{$lex}: no exception ok 11808 - delete $vrgbl->[0]{$gbl}{$lex}: value ok 11809 - $vlex[$lex]{$gbl}{$lex}: no exception ok 11810 - $vlex[$lex]{$gbl}{$lex}: value ok 11811 - $vlex[$lex]{$gbl}{$lex} = 123: no exception ok 11812 - $vlex[$lex]{$gbl}{$lex} = 123: value ok 11813 - exists $vlex[$lex]{$gbl}{$lex}: no exception ok 11814 - exists $vlex[$lex]{$gbl}{$lex}: value ok 11815 - delete $vlex[$lex]{$gbl}{$lex}: no exception ok 11816 - delete $vlex[$lex]{$gbl}{$lex}: value ok 11817 - $vgbl[$lex]{$gbl}{$lex}: no exception ok 11818 - $vgbl[$lex]{$gbl}{$lex}: value ok 11819 - $vgbl[$lex]{$gbl}{$lex} = 123: no exception ok 11820 - $vgbl[$lex]{$gbl}{$lex} = 123: value ok 11821 - exists $vgbl[$lex]{$gbl}{$lex}: no exception ok 11822 - exists $vgbl[$lex]{$gbl}{$lex}: value ok 11823 - delete $vgbl[$lex]{$gbl}{$lex}: no exception ok 11824 - delete $vgbl[$lex]{$gbl}{$lex}: value ok 11825 - $vrlex->[$lex]{$gbl}{$lex}: no exception ok 11826 - $vrlex->[$lex]{$gbl}{$lex}: value ok 11827 - $vrlex->[$lex]{$gbl}{$lex} = 123: no exception ok 11828 - $vrlex->[$lex]{$gbl}{$lex} = 123: value ok 11829 - exists $vrlex->[$lex]{$gbl}{$lex}: no exception ok 11830 - exists $vrlex->[$lex]{$gbl}{$lex}: value ok 11831 - delete $vrlex->[$lex]{$gbl}{$lex}: no exception ok 11832 - delete $vrlex->[$lex]{$gbl}{$lex}: value ok 11833 - $vrgbl->[$lex]{$gbl}{$lex}: no exception ok 11834 - $vrgbl->[$lex]{$gbl}{$lex}: value ok 11835 - $vrgbl->[$lex]{$gbl}{$lex} = 123: no exception ok 11836 - $vrgbl->[$lex]{$gbl}{$lex} = 123: value ok 11837 - exists $vrgbl->[$lex]{$gbl}{$lex}: no exception ok 11838 - exists $vrgbl->[$lex]{$gbl}{$lex}: value ok 11839 - delete $vrgbl->[$lex]{$gbl}{$lex}: no exception ok 11840 - delete $vrgbl->[$lex]{$gbl}{$lex}: value ok 11841 - $vlex[$gbl]{$gbl}{$lex}: no exception ok 11842 - $vlex[$gbl]{$gbl}{$lex}: value ok 11843 - $vlex[$gbl]{$gbl}{$lex} = 123: no exception ok 11844 - $vlex[$gbl]{$gbl}{$lex} = 123: value ok 11845 - exists $vlex[$gbl]{$gbl}{$lex}: no exception ok 11846 - exists $vlex[$gbl]{$gbl}{$lex}: value ok 11847 - delete $vlex[$gbl]{$gbl}{$lex}: no exception ok 11848 - delete $vlex[$gbl]{$gbl}{$lex}: value ok 11849 - $vgbl[$gbl]{$gbl}{$lex}: no exception ok 11850 - $vgbl[$gbl]{$gbl}{$lex}: value ok 11851 - $vgbl[$gbl]{$gbl}{$lex} = 123: no exception ok 11852 - $vgbl[$gbl]{$gbl}{$lex} = 123: value ok 11853 - exists $vgbl[$gbl]{$gbl}{$lex}: no exception ok 11854 - exists $vgbl[$gbl]{$gbl}{$lex}: value ok 11855 - delete $vgbl[$gbl]{$gbl}{$lex}: no exception ok 11856 - delete $vgbl[$gbl]{$gbl}{$lex}: value ok 11857 - $vrlex->[$gbl]{$gbl}{$lex}: no exception ok 11858 - $vrlex->[$gbl]{$gbl}{$lex}: value ok 11859 - $vrlex->[$gbl]{$gbl}{$lex} = 123: no exception ok 11860 - $vrlex->[$gbl]{$gbl}{$lex} = 123: value ok 11861 - exists $vrlex->[$gbl]{$gbl}{$lex}: no exception ok 11862 - exists $vrlex->[$gbl]{$gbl}{$lex}: value ok 11863 - delete $vrlex->[$gbl]{$gbl}{$lex}: no exception ok 11864 - delete $vrlex->[$gbl]{$gbl}{$lex}: value ok 11865 - $vrgbl->[$gbl]{$gbl}{$lex}: no exception ok 11866 - $vrgbl->[$gbl]{$gbl}{$lex}: value ok 11867 - $vrgbl->[$gbl]{$gbl}{$lex} = 123: no exception ok 11868 - $vrgbl->[$gbl]{$gbl}{$lex} = 123: value ok 11869 - exists $vrgbl->[$gbl]{$gbl}{$lex}: no exception ok 11870 - exists $vrgbl->[$gbl]{$gbl}{$lex}: value ok 11871 - delete $vrgbl->[$gbl]{$gbl}{$lex}: no exception ok 11872 - delete $vrgbl->[$gbl]{$gbl}{$lex}: value ok 11873 - $vlex[$lex+1]{$gbl}{$lex}: no exception ok 11874 - $vlex[$lex+1]{$gbl}{$lex}: value ok 11875 - $vlex[$lex+1]{$gbl}{$lex} = 123: no exception ok 11876 - $vlex[$lex+1]{$gbl}{$lex} = 123: value ok 11877 - exists $vlex[$lex+1]{$gbl}{$lex}: no exception ok 11878 - exists $vlex[$lex+1]{$gbl}{$lex}: value ok 11879 - delete $vlex[$lex+1]{$gbl}{$lex}: no exception ok 11880 - delete $vlex[$lex+1]{$gbl}{$lex}: value ok 11881 - $vgbl[$lex+1]{$gbl}{$lex}: no exception ok 11882 - $vgbl[$lex+1]{$gbl}{$lex}: value ok 11883 - $vgbl[$lex+1]{$gbl}{$lex} = 123: no exception ok 11884 - $vgbl[$lex+1]{$gbl}{$lex} = 123: value ok 11885 - exists $vgbl[$lex+1]{$gbl}{$lex}: no exception ok 11886 - exists $vgbl[$lex+1]{$gbl}{$lex}: value ok 11887 - delete $vgbl[$lex+1]{$gbl}{$lex}: no exception ok 11888 - delete $vgbl[$lex+1]{$gbl}{$lex}: value ok 11889 - $vrlex->[$lex+1]{$gbl}{$lex}: no exception ok 11890 - $vrlex->[$lex+1]{$gbl}{$lex}: value ok 11891 - $vrlex->[$lex+1]{$gbl}{$lex} = 123: no exception ok 11892 - $vrlex->[$lex+1]{$gbl}{$lex} = 123: value ok 11893 - exists $vrlex->[$lex+1]{$gbl}{$lex}: no exception ok 11894 - exists $vrlex->[$lex+1]{$gbl}{$lex}: value ok 11895 - delete $vrlex->[$lex+1]{$gbl}{$lex}: no exception ok 11896 - delete $vrlex->[$lex+1]{$gbl}{$lex}: value ok 11897 - $vrgbl->[$lex+1]{$gbl}{$lex}: no exception ok 11898 - $vrgbl->[$lex+1]{$gbl}{$lex}: value ok 11899 - $vrgbl->[$lex+1]{$gbl}{$lex} = 123: no exception ok 11900 - $vrgbl->[$lex+1]{$gbl}{$lex} = 123: value ok 11901 - exists $vrgbl->[$lex+1]{$gbl}{$lex}: no exception ok 11902 - exists $vrgbl->[$lex+1]{$gbl}{$lex}: value ok 11903 - delete $vrgbl->[$lex+1]{$gbl}{$lex}: no exception ok 11904 - delete $vrgbl->[$lex+1]{$gbl}{$lex}: value ok 11905 - $vlex{foo}{$gbl}{$lex}: no exception ok 11906 - $vlex{foo}{$gbl}{$lex}: value ok 11907 - $vlex{foo}{$gbl}{$lex} = 123: no exception ok 11908 - $vlex{foo}{$gbl}{$lex} = 123: value ok 11909 - exists $vlex{foo}{$gbl}{$lex}: no exception ok 11910 - exists $vlex{foo}{$gbl}{$lex}: value ok 11911 - delete $vlex{foo}{$gbl}{$lex}: no exception ok 11912 - delete $vlex{foo}{$gbl}{$lex}: value ok 11913 - $vgbl{foo}{$gbl}{$lex}: no exception ok 11914 - $vgbl{foo}{$gbl}{$lex}: value ok 11915 - $vgbl{foo}{$gbl}{$lex} = 123: no exception ok 11916 - $vgbl{foo}{$gbl}{$lex} = 123: value ok 11917 - exists $vgbl{foo}{$gbl}{$lex}: no exception ok 11918 - exists $vgbl{foo}{$gbl}{$lex}: value ok 11919 - delete $vgbl{foo}{$gbl}{$lex}: no exception ok 11920 - delete $vgbl{foo}{$gbl}{$lex}: value ok 11921 - $vrlex->{foo}{$gbl}{$lex}: no exception ok 11922 - $vrlex->{foo}{$gbl}{$lex}: value ok 11923 - $vrlex->{foo}{$gbl}{$lex} = 123: no exception ok 11924 - $vrlex->{foo}{$gbl}{$lex} = 123: value ok 11925 - exists $vrlex->{foo}{$gbl}{$lex}: no exception ok 11926 - exists $vrlex->{foo}{$gbl}{$lex}: value ok 11927 - delete $vrlex->{foo}{$gbl}{$lex}: no exception ok 11928 - delete $vrlex->{foo}{$gbl}{$lex}: value ok 11929 - $vrgbl->{foo}{$gbl}{$lex}: no exception ok 11930 - $vrgbl->{foo}{$gbl}{$lex}: value ok 11931 - $vrgbl->{foo}{$gbl}{$lex} = 123: no exception ok 11932 - $vrgbl->{foo}{$gbl}{$lex} = 123: value ok 11933 - exists $vrgbl->{foo}{$gbl}{$lex}: no exception ok 11934 - exists $vrgbl->{foo}{$gbl}{$lex}: value ok 11935 - delete $vrgbl->{foo}{$gbl}{$lex}: no exception ok 11936 - delete $vrgbl->{foo}{$gbl}{$lex}: value ok 11937 - $vlex{$lex}{$gbl}{$lex}: no exception ok 11938 - $vlex{$lex}{$gbl}{$lex}: value ok 11939 - $vlex{$lex}{$gbl}{$lex} = 123: no exception ok 11940 - $vlex{$lex}{$gbl}{$lex} = 123: value ok 11941 - exists $vlex{$lex}{$gbl}{$lex}: no exception ok 11942 - exists $vlex{$lex}{$gbl}{$lex}: value ok 11943 - delete $vlex{$lex}{$gbl}{$lex}: no exception ok 11944 - delete $vlex{$lex}{$gbl}{$lex}: value ok 11945 - $vgbl{$lex}{$gbl}{$lex}: no exception ok 11946 - $vgbl{$lex}{$gbl}{$lex}: value ok 11947 - $vgbl{$lex}{$gbl}{$lex} = 123: no exception ok 11948 - $vgbl{$lex}{$gbl}{$lex} = 123: value ok 11949 - exists $vgbl{$lex}{$gbl}{$lex}: no exception ok 11950 - exists $vgbl{$lex}{$gbl}{$lex}: value ok 11951 - delete $vgbl{$lex}{$gbl}{$lex}: no exception ok 11952 - delete $vgbl{$lex}{$gbl}{$lex}: value ok 11953 - $vrlex->{$lex}{$gbl}{$lex}: no exception ok 11954 - $vrlex->{$lex}{$gbl}{$lex}: value ok 11955 - $vrlex->{$lex}{$gbl}{$lex} = 123: no exception ok 11956 - $vrlex->{$lex}{$gbl}{$lex} = 123: value ok 11957 - exists $vrlex->{$lex}{$gbl}{$lex}: no exception ok 11958 - exists $vrlex->{$lex}{$gbl}{$lex}: value ok 11959 - delete $vrlex->{$lex}{$gbl}{$lex}: no exception ok 11960 - delete $vrlex->{$lex}{$gbl}{$lex}: value ok 11961 - $vrgbl->{$lex}{$gbl}{$lex}: no exception ok 11962 - $vrgbl->{$lex}{$gbl}{$lex}: value ok 11963 - $vrgbl->{$lex}{$gbl}{$lex} = 123: no exception ok 11964 - $vrgbl->{$lex}{$gbl}{$lex} = 123: value ok 11965 - exists $vrgbl->{$lex}{$gbl}{$lex}: no exception ok 11966 - exists $vrgbl->{$lex}{$gbl}{$lex}: value ok 11967 - delete $vrgbl->{$lex}{$gbl}{$lex}: no exception ok 11968 - delete $vrgbl->{$lex}{$gbl}{$lex}: value ok 11969 - $vlex{$gbl}{$gbl}{$lex}: no exception ok 11970 - $vlex{$gbl}{$gbl}{$lex}: value ok 11971 - $vlex{$gbl}{$gbl}{$lex} = 123: no exception ok 11972 - $vlex{$gbl}{$gbl}{$lex} = 123: value ok 11973 - exists $vlex{$gbl}{$gbl}{$lex}: no exception ok 11974 - exists $vlex{$gbl}{$gbl}{$lex}: value ok 11975 - delete $vlex{$gbl}{$gbl}{$lex}: no exception ok 11976 - delete $vlex{$gbl}{$gbl}{$lex}: value ok 11977 - $vgbl{$gbl}{$gbl}{$lex}: no exception ok 11978 - $vgbl{$gbl}{$gbl}{$lex}: value ok 11979 - $vgbl{$gbl}{$gbl}{$lex} = 123: no exception ok 11980 - $vgbl{$gbl}{$gbl}{$lex} = 123: value ok 11981 - exists $vgbl{$gbl}{$gbl}{$lex}: no exception ok 11982 - exists $vgbl{$gbl}{$gbl}{$lex}: value ok 11983 - delete $vgbl{$gbl}{$gbl}{$lex}: no exception ok 11984 - delete $vgbl{$gbl}{$gbl}{$lex}: value ok 11985 - $vrlex->{$gbl}{$gbl}{$lex}: no exception ok 11986 - $vrlex->{$gbl}{$gbl}{$lex}: value ok 11987 - $vrlex->{$gbl}{$gbl}{$lex} = 123: no exception ok 11988 - $vrlex->{$gbl}{$gbl}{$lex} = 123: value ok 11989 - exists $vrlex->{$gbl}{$gbl}{$lex}: no exception ok 11990 - exists $vrlex->{$gbl}{$gbl}{$lex}: value ok 11991 - delete $vrlex->{$gbl}{$gbl}{$lex}: no exception ok 11992 - delete $vrlex->{$gbl}{$gbl}{$lex}: value ok 11993 - $vrgbl->{$gbl}{$gbl}{$lex}: no exception ok 11994 - $vrgbl->{$gbl}{$gbl}{$lex}: value ok 11995 - $vrgbl->{$gbl}{$gbl}{$lex} = 123: no exception ok 11996 - $vrgbl->{$gbl}{$gbl}{$lex} = 123: value ok 11997 - exists $vrgbl->{$gbl}{$gbl}{$lex}: no exception ok 11998 - exists $vrgbl->{$gbl}{$gbl}{$lex}: value ok 11999 - delete $vrgbl->{$gbl}{$gbl}{$lex}: no exception ok 12000 - delete $vrgbl->{$gbl}{$gbl}{$lex}: value ok 12001 - $vlex{"x$lex"}{$gbl}{$lex}: no exception ok 12002 - $vlex{"x$lex"}{$gbl}{$lex}: value ok 12003 - $vlex{"x$lex"}{$gbl}{$lex} = 123: no exception ok 12004 - $vlex{"x$lex"}{$gbl}{$lex} = 123: value ok 12005 - exists $vlex{"x$lex"}{$gbl}{$lex}: no exception ok 12006 - exists $vlex{"x$lex"}{$gbl}{$lex}: value ok 12007 - delete $vlex{"x$lex"}{$gbl}{$lex}: no exception ok 12008 - delete $vlex{"x$lex"}{$gbl}{$lex}: value ok 12009 - $vgbl{"x$lex"}{$gbl}{$lex}: no exception ok 12010 - $vgbl{"x$lex"}{$gbl}{$lex}: value ok 12011 - $vgbl{"x$lex"}{$gbl}{$lex} = 123: no exception ok 12012 - $vgbl{"x$lex"}{$gbl}{$lex} = 123: value ok 12013 - exists $vgbl{"x$lex"}{$gbl}{$lex}: no exception ok 12014 - exists $vgbl{"x$lex"}{$gbl}{$lex}: value ok 12015 - delete $vgbl{"x$lex"}{$gbl}{$lex}: no exception ok 12016 - delete $vgbl{"x$lex"}{$gbl}{$lex}: value ok 12017 - $vrlex->{"x$lex"}{$gbl}{$lex}: no exception ok 12018 - $vrlex->{"x$lex"}{$gbl}{$lex}: value ok 12019 - $vrlex->{"x$lex"}{$gbl}{$lex} = 123: no exception ok 12020 - $vrlex->{"x$lex"}{$gbl}{$lex} = 123: value ok 12021 - exists $vrlex->{"x$lex"}{$gbl}{$lex}: no exception ok 12022 - exists $vrlex->{"x$lex"}{$gbl}{$lex}: value ok 12023 - delete $vrlex->{"x$lex"}{$gbl}{$lex}: no exception ok 12024 - delete $vrlex->{"x$lex"}{$gbl}{$lex}: value ok 12025 - $vrgbl->{"x$lex"}{$gbl}{$lex}: no exception ok 12026 - $vrgbl->{"x$lex"}{$gbl}{$lex}: value ok 12027 - $vrgbl->{"x$lex"}{$gbl}{$lex} = 123: no exception ok 12028 - $vrgbl->{"x$lex"}{$gbl}{$lex} = 123: value ok 12029 - exists $vrgbl->{"x$lex"}{$gbl}{$lex}: no exception ok 12030 - exists $vrgbl->{"x$lex"}{$gbl}{$lex}: value ok 12031 - delete $vrgbl->{"x$lex"}{$gbl}{$lex}: no exception ok 12032 - delete $vrgbl->{"x$lex"}{$gbl}{$lex}: value ok 12033 - $vlex[0]{"x$lex"}{$lex}: no exception ok 12034 - $vlex[0]{"x$lex"}{$lex}: value ok 12035 - $vlex[0]{"x$lex"}{$lex} = 123: no exception ok 12036 - $vlex[0]{"x$lex"}{$lex} = 123: value ok 12037 - exists $vlex[0]{"x$lex"}{$lex}: no exception ok 12038 - exists $vlex[0]{"x$lex"}{$lex}: value ok 12039 - delete $vlex[0]{"x$lex"}{$lex}: no exception ok 12040 - delete $vlex[0]{"x$lex"}{$lex}: value ok 12041 - $vgbl[0]{"x$lex"}{$lex}: no exception ok 12042 - $vgbl[0]{"x$lex"}{$lex}: value ok 12043 - $vgbl[0]{"x$lex"}{$lex} = 123: no exception ok 12044 - $vgbl[0]{"x$lex"}{$lex} = 123: value ok 12045 - exists $vgbl[0]{"x$lex"}{$lex}: no exception ok 12046 - exists $vgbl[0]{"x$lex"}{$lex}: value ok 12047 - delete $vgbl[0]{"x$lex"}{$lex}: no exception ok 12048 - delete $vgbl[0]{"x$lex"}{$lex}: value ok 12049 - $vrlex->[0]{"x$lex"}{$lex}: no exception ok 12050 - $vrlex->[0]{"x$lex"}{$lex}: value ok 12051 - $vrlex->[0]{"x$lex"}{$lex} = 123: no exception ok 12052 - $vrlex->[0]{"x$lex"}{$lex} = 123: value ok 12053 - exists $vrlex->[0]{"x$lex"}{$lex}: no exception ok 12054 - exists $vrlex->[0]{"x$lex"}{$lex}: value ok 12055 - delete $vrlex->[0]{"x$lex"}{$lex}: no exception ok 12056 - delete $vrlex->[0]{"x$lex"}{$lex}: value ok 12057 - $vrgbl->[0]{"x$lex"}{$lex}: no exception ok 12058 - $vrgbl->[0]{"x$lex"}{$lex}: value ok 12059 - $vrgbl->[0]{"x$lex"}{$lex} = 123: no exception ok 12060 - $vrgbl->[0]{"x$lex"}{$lex} = 123: value ok 12061 - exists $vrgbl->[0]{"x$lex"}{$lex}: no exception ok 12062 - exists $vrgbl->[0]{"x$lex"}{$lex}: value ok 12063 - delete $vrgbl->[0]{"x$lex"}{$lex}: no exception ok 12064 - delete $vrgbl->[0]{"x$lex"}{$lex}: value ok 12065 - $vlex[$lex]{"x$lex"}{$lex}: no exception ok 12066 - $vlex[$lex]{"x$lex"}{$lex}: value ok 12067 - $vlex[$lex]{"x$lex"}{$lex} = 123: no exception ok 12068 - $vlex[$lex]{"x$lex"}{$lex} = 123: value ok 12069 - exists $vlex[$lex]{"x$lex"}{$lex}: no exception ok 12070 - exists $vlex[$lex]{"x$lex"}{$lex}: value ok 12071 - delete $vlex[$lex]{"x$lex"}{$lex}: no exception ok 12072 - delete $vlex[$lex]{"x$lex"}{$lex}: value ok 12073 - $vgbl[$lex]{"x$lex"}{$lex}: no exception ok 12074 - $vgbl[$lex]{"x$lex"}{$lex}: value ok 12075 - $vgbl[$lex]{"x$lex"}{$lex} = 123: no exception ok 12076 - $vgbl[$lex]{"x$lex"}{$lex} = 123: value ok 12077 - exists $vgbl[$lex]{"x$lex"}{$lex}: no exception ok 12078 - exists $vgbl[$lex]{"x$lex"}{$lex}: value ok 12079 - delete $vgbl[$lex]{"x$lex"}{$lex}: no exception ok 12080 - delete $vgbl[$lex]{"x$lex"}{$lex}: value ok 12081 - $vrlex->[$lex]{"x$lex"}{$lex}: no exception ok 12082 - $vrlex->[$lex]{"x$lex"}{$lex}: value ok 12083 - $vrlex->[$lex]{"x$lex"}{$lex} = 123: no exception ok 12084 - $vrlex->[$lex]{"x$lex"}{$lex} = 123: value ok 12085 - exists $vrlex->[$lex]{"x$lex"}{$lex}: no exception ok 12086 - exists $vrlex->[$lex]{"x$lex"}{$lex}: value ok 12087 - delete $vrlex->[$lex]{"x$lex"}{$lex}: no exception ok 12088 - delete $vrlex->[$lex]{"x$lex"}{$lex}: value ok 12089 - $vrgbl->[$lex]{"x$lex"}{$lex}: no exception ok 12090 - $vrgbl->[$lex]{"x$lex"}{$lex}: value ok 12091 - $vrgbl->[$lex]{"x$lex"}{$lex} = 123: no exception ok 12092 - $vrgbl->[$lex]{"x$lex"}{$lex} = 123: value ok 12093 - exists $vrgbl->[$lex]{"x$lex"}{$lex}: no exception ok 12094 - exists $vrgbl->[$lex]{"x$lex"}{$lex}: value ok 12095 - delete $vrgbl->[$lex]{"x$lex"}{$lex}: no exception ok 12096 - delete $vrgbl->[$lex]{"x$lex"}{$lex}: value ok 12097 - $vlex[$gbl]{"x$lex"}{$lex}: no exception ok 12098 - $vlex[$gbl]{"x$lex"}{$lex}: value ok 12099 - $vlex[$gbl]{"x$lex"}{$lex} = 123: no exception ok 12100 - $vlex[$gbl]{"x$lex"}{$lex} = 123: value ok 12101 - exists $vlex[$gbl]{"x$lex"}{$lex}: no exception ok 12102 - exists $vlex[$gbl]{"x$lex"}{$lex}: value ok 12103 - delete $vlex[$gbl]{"x$lex"}{$lex}: no exception ok 12104 - delete $vlex[$gbl]{"x$lex"}{$lex}: value ok 12105 - $vgbl[$gbl]{"x$lex"}{$lex}: no exception ok 12106 - $vgbl[$gbl]{"x$lex"}{$lex}: value ok 12107 - $vgbl[$gbl]{"x$lex"}{$lex} = 123: no exception ok 12108 - $vgbl[$gbl]{"x$lex"}{$lex} = 123: value ok 12109 - exists $vgbl[$gbl]{"x$lex"}{$lex}: no exception ok 12110 - exists $vgbl[$gbl]{"x$lex"}{$lex}: value ok 12111 - delete $vgbl[$gbl]{"x$lex"}{$lex}: no exception ok 12112 - delete $vgbl[$gbl]{"x$lex"}{$lex}: value ok 12113 - $vrlex->[$gbl]{"x$lex"}{$lex}: no exception ok 12114 - $vrlex->[$gbl]{"x$lex"}{$lex}: value ok 12115 - $vrlex->[$gbl]{"x$lex"}{$lex} = 123: no exception ok 12116 - $vrlex->[$gbl]{"x$lex"}{$lex} = 123: value ok 12117 - exists $vrlex->[$gbl]{"x$lex"}{$lex}: no exception ok 12118 - exists $vrlex->[$gbl]{"x$lex"}{$lex}: value ok 12119 - delete $vrlex->[$gbl]{"x$lex"}{$lex}: no exception ok 12120 - delete $vrlex->[$gbl]{"x$lex"}{$lex}: value ok 12121 - $vrgbl->[$gbl]{"x$lex"}{$lex}: no exception ok 12122 - $vrgbl->[$gbl]{"x$lex"}{$lex}: value ok 12123 - $vrgbl->[$gbl]{"x$lex"}{$lex} = 123: no exception ok 12124 - $vrgbl->[$gbl]{"x$lex"}{$lex} = 123: value ok 12125 - exists $vrgbl->[$gbl]{"x$lex"}{$lex}: no exception ok 12126 - exists $vrgbl->[$gbl]{"x$lex"}{$lex}: value ok 12127 - delete $vrgbl->[$gbl]{"x$lex"}{$lex}: no exception ok 12128 - delete $vrgbl->[$gbl]{"x$lex"}{$lex}: value ok 12129 - $vlex[$lex+1]{"x$lex"}{$lex}: no exception ok 12130 - $vlex[$lex+1]{"x$lex"}{$lex}: value ok 12131 - $vlex[$lex+1]{"x$lex"}{$lex} = 123: no exception ok 12132 - $vlex[$lex+1]{"x$lex"}{$lex} = 123: value ok 12133 - exists $vlex[$lex+1]{"x$lex"}{$lex}: no exception ok 12134 - exists $vlex[$lex+1]{"x$lex"}{$lex}: value ok 12135 - delete $vlex[$lex+1]{"x$lex"}{$lex}: no exception ok 12136 - delete $vlex[$lex+1]{"x$lex"}{$lex}: value ok 12137 - $vgbl[$lex+1]{"x$lex"}{$lex}: no exception ok 12138 - $vgbl[$lex+1]{"x$lex"}{$lex}: value ok 12139 - $vgbl[$lex+1]{"x$lex"}{$lex} = 123: no exception ok 12140 - $vgbl[$lex+1]{"x$lex"}{$lex} = 123: value ok 12141 - exists $vgbl[$lex+1]{"x$lex"}{$lex}: no exception ok 12142 - exists $vgbl[$lex+1]{"x$lex"}{$lex}: value ok 12143 - delete $vgbl[$lex+1]{"x$lex"}{$lex}: no exception ok 12144 - delete $vgbl[$lex+1]{"x$lex"}{$lex}: value ok 12145 - $vrlex->[$lex+1]{"x$lex"}{$lex}: no exception ok 12146 - $vrlex->[$lex+1]{"x$lex"}{$lex}: value ok 12147 - $vrlex->[$lex+1]{"x$lex"}{$lex} = 123: no exception ok 12148 - $vrlex->[$lex+1]{"x$lex"}{$lex} = 123: value ok 12149 - exists $vrlex->[$lex+1]{"x$lex"}{$lex}: no exception ok 12150 - exists $vrlex->[$lex+1]{"x$lex"}{$lex}: value ok 12151 - delete $vrlex->[$lex+1]{"x$lex"}{$lex}: no exception ok 12152 - delete $vrlex->[$lex+1]{"x$lex"}{$lex}: value ok 12153 - $vrgbl->[$lex+1]{"x$lex"}{$lex}: no exception ok 12154 - $vrgbl->[$lex+1]{"x$lex"}{$lex}: value ok 12155 - $vrgbl->[$lex+1]{"x$lex"}{$lex} = 123: no exception ok 12156 - $vrgbl->[$lex+1]{"x$lex"}{$lex} = 123: value ok 12157 - exists $vrgbl->[$lex+1]{"x$lex"}{$lex}: no exception ok 12158 - exists $vrgbl->[$lex+1]{"x$lex"}{$lex}: value ok 12159 - delete $vrgbl->[$lex+1]{"x$lex"}{$lex}: no exception ok 12160 - delete $vrgbl->[$lex+1]{"x$lex"}{$lex}: value ok 12161 - $vlex{foo}{"x$lex"}{$lex}: no exception ok 12162 - $vlex{foo}{"x$lex"}{$lex}: value ok 12163 - $vlex{foo}{"x$lex"}{$lex} = 123: no exception ok 12164 - $vlex{foo}{"x$lex"}{$lex} = 123: value ok 12165 - exists $vlex{foo}{"x$lex"}{$lex}: no exception ok 12166 - exists $vlex{foo}{"x$lex"}{$lex}: value ok 12167 - delete $vlex{foo}{"x$lex"}{$lex}: no exception ok 12168 - delete $vlex{foo}{"x$lex"}{$lex}: value ok 12169 - $vgbl{foo}{"x$lex"}{$lex}: no exception ok 12170 - $vgbl{foo}{"x$lex"}{$lex}: value ok 12171 - $vgbl{foo}{"x$lex"}{$lex} = 123: no exception ok 12172 - $vgbl{foo}{"x$lex"}{$lex} = 123: value ok 12173 - exists $vgbl{foo}{"x$lex"}{$lex}: no exception ok 12174 - exists $vgbl{foo}{"x$lex"}{$lex}: value ok 12175 - delete $vgbl{foo}{"x$lex"}{$lex}: no exception ok 12176 - delete $vgbl{foo}{"x$lex"}{$lex}: value ok 12177 - $vrlex->{foo}{"x$lex"}{$lex}: no exception ok 12178 - $vrlex->{foo}{"x$lex"}{$lex}: value ok 12179 - $vrlex->{foo}{"x$lex"}{$lex} = 123: no exception ok 12180 - $vrlex->{foo}{"x$lex"}{$lex} = 123: value ok 12181 - exists $vrlex->{foo}{"x$lex"}{$lex}: no exception ok 12182 - exists $vrlex->{foo}{"x$lex"}{$lex}: value ok 12183 - delete $vrlex->{foo}{"x$lex"}{$lex}: no exception ok 12184 - delete $vrlex->{foo}{"x$lex"}{$lex}: value ok 12185 - $vrgbl->{foo}{"x$lex"}{$lex}: no exception ok 12186 - $vrgbl->{foo}{"x$lex"}{$lex}: value ok 12187 - $vrgbl->{foo}{"x$lex"}{$lex} = 123: no exception ok 12188 - $vrgbl->{foo}{"x$lex"}{$lex} = 123: value ok 12189 - exists $vrgbl->{foo}{"x$lex"}{$lex}: no exception ok 12190 - exists $vrgbl->{foo}{"x$lex"}{$lex}: value ok 12191 - delete $vrgbl->{foo}{"x$lex"}{$lex}: no exception ok 12192 - delete $vrgbl->{foo}{"x$lex"}{$lex}: value ok 12193 - $vlex{$lex}{"x$lex"}{$lex}: no exception ok 12194 - $vlex{$lex}{"x$lex"}{$lex}: value ok 12195 - $vlex{$lex}{"x$lex"}{$lex} = 123: no exception ok 12196 - $vlex{$lex}{"x$lex"}{$lex} = 123: value ok 12197 - exists $vlex{$lex}{"x$lex"}{$lex}: no exception ok 12198 - exists $vlex{$lex}{"x$lex"}{$lex}: value ok 12199 - delete $vlex{$lex}{"x$lex"}{$lex}: no exception ok 12200 - delete $vlex{$lex}{"x$lex"}{$lex}: value ok 12201 - $vgbl{$lex}{"x$lex"}{$lex}: no exception ok 12202 - $vgbl{$lex}{"x$lex"}{$lex}: value ok 12203 - $vgbl{$lex}{"x$lex"}{$lex} = 123: no exception ok 12204 - $vgbl{$lex}{"x$lex"}{$lex} = 123: value ok 12205 - exists $vgbl{$lex}{"x$lex"}{$lex}: no exception ok 12206 - exists $vgbl{$lex}{"x$lex"}{$lex}: value ok 12207 - delete $vgbl{$lex}{"x$lex"}{$lex}: no exception ok 12208 - delete $vgbl{$lex}{"x$lex"}{$lex}: value ok 12209 - $vrlex->{$lex}{"x$lex"}{$lex}: no exception ok 12210 - $vrlex->{$lex}{"x$lex"}{$lex}: value ok 12211 - $vrlex->{$lex}{"x$lex"}{$lex} = 123: no exception ok 12212 - $vrlex->{$lex}{"x$lex"}{$lex} = 123: value ok 12213 - exists $vrlex->{$lex}{"x$lex"}{$lex}: no exception ok 12214 - exists $vrlex->{$lex}{"x$lex"}{$lex}: value ok 12215 - delete $vrlex->{$lex}{"x$lex"}{$lex}: no exception ok 12216 - delete $vrlex->{$lex}{"x$lex"}{$lex}: value ok 12217 - $vrgbl->{$lex}{"x$lex"}{$lex}: no exception ok 12218 - $vrgbl->{$lex}{"x$lex"}{$lex}: value ok 12219 - $vrgbl->{$lex}{"x$lex"}{$lex} = 123: no exception ok 12220 - $vrgbl->{$lex}{"x$lex"}{$lex} = 123: value ok 12221 - exists $vrgbl->{$lex}{"x$lex"}{$lex}: no exception ok 12222 - exists $vrgbl->{$lex}{"x$lex"}{$lex}: value ok 12223 - delete $vrgbl->{$lex}{"x$lex"}{$lex}: no exception ok 12224 - delete $vrgbl->{$lex}{"x$lex"}{$lex}: value ok 12225 - $vlex{$gbl}{"x$lex"}{$lex}: no exception ok 12226 - $vlex{$gbl}{"x$lex"}{$lex}: value ok 12227 - $vlex{$gbl}{"x$lex"}{$lex} = 123: no exception ok 12228 - $vlex{$gbl}{"x$lex"}{$lex} = 123: value ok 12229 - exists $vlex{$gbl}{"x$lex"}{$lex}: no exception ok 12230 - exists $vlex{$gbl}{"x$lex"}{$lex}: value ok 12231 - delete $vlex{$gbl}{"x$lex"}{$lex}: no exception ok 12232 - delete $vlex{$gbl}{"x$lex"}{$lex}: value ok 12233 - $vgbl{$gbl}{"x$lex"}{$lex}: no exception ok 12234 - $vgbl{$gbl}{"x$lex"}{$lex}: value ok 12235 - $vgbl{$gbl}{"x$lex"}{$lex} = 123: no exception ok 12236 - $vgbl{$gbl}{"x$lex"}{$lex} = 123: value ok 12237 - exists $vgbl{$gbl}{"x$lex"}{$lex}: no exception ok 12238 - exists $vgbl{$gbl}{"x$lex"}{$lex}: value ok 12239 - delete $vgbl{$gbl}{"x$lex"}{$lex}: no exception ok 12240 - delete $vgbl{$gbl}{"x$lex"}{$lex}: value ok 12241 - $vrlex->{$gbl}{"x$lex"}{$lex}: no exception ok 12242 - $vrlex->{$gbl}{"x$lex"}{$lex}: value ok 12243 - $vrlex->{$gbl}{"x$lex"}{$lex} = 123: no exception ok 12244 - $vrlex->{$gbl}{"x$lex"}{$lex} = 123: value ok 12245 - exists $vrlex->{$gbl}{"x$lex"}{$lex}: no exception ok 12246 - exists $vrlex->{$gbl}{"x$lex"}{$lex}: value ok 12247 - delete $vrlex->{$gbl}{"x$lex"}{$lex}: no exception ok 12248 - delete $vrlex->{$gbl}{"x$lex"}{$lex}: value ok 12249 - $vrgbl->{$gbl}{"x$lex"}{$lex}: no exception ok 12250 - $vrgbl->{$gbl}{"x$lex"}{$lex}: value ok 12251 - $vrgbl->{$gbl}{"x$lex"}{$lex} = 123: no exception ok 12252 - $vrgbl->{$gbl}{"x$lex"}{$lex} = 123: value ok 12253 - exists $vrgbl->{$gbl}{"x$lex"}{$lex}: no exception ok 12254 - exists $vrgbl->{$gbl}{"x$lex"}{$lex}: value ok 12255 - delete $vrgbl->{$gbl}{"x$lex"}{$lex}: no exception ok 12256 - delete $vrgbl->{$gbl}{"x$lex"}{$lex}: value ok 12257 - $vlex{"x$lex"}{"x$lex"}{$lex}: no exception ok 12258 - $vlex{"x$lex"}{"x$lex"}{$lex}: value ok 12259 - $vlex{"x$lex"}{"x$lex"}{$lex} = 123: no exception ok 12260 - $vlex{"x$lex"}{"x$lex"}{$lex} = 123: value ok 12261 - exists $vlex{"x$lex"}{"x$lex"}{$lex}: no exception ok 12262 - exists $vlex{"x$lex"}{"x$lex"}{$lex}: value ok 12263 - delete $vlex{"x$lex"}{"x$lex"}{$lex}: no exception ok 12264 - delete $vlex{"x$lex"}{"x$lex"}{$lex}: value ok 12265 - $vgbl{"x$lex"}{"x$lex"}{$lex}: no exception ok 12266 - $vgbl{"x$lex"}{"x$lex"}{$lex}: value ok 12267 - $vgbl{"x$lex"}{"x$lex"}{$lex} = 123: no exception ok 12268 - $vgbl{"x$lex"}{"x$lex"}{$lex} = 123: value ok 12269 - exists $vgbl{"x$lex"}{"x$lex"}{$lex}: no exception ok 12270 - exists $vgbl{"x$lex"}{"x$lex"}{$lex}: value ok 12271 - delete $vgbl{"x$lex"}{"x$lex"}{$lex}: no exception ok 12272 - delete $vgbl{"x$lex"}{"x$lex"}{$lex}: value ok 12273 - $vrlex->{"x$lex"}{"x$lex"}{$lex}: no exception ok 12274 - $vrlex->{"x$lex"}{"x$lex"}{$lex}: value ok 12275 - $vrlex->{"x$lex"}{"x$lex"}{$lex} = 123: no exception ok 12276 - $vrlex->{"x$lex"}{"x$lex"}{$lex} = 123: value ok 12277 - exists $vrlex->{"x$lex"}{"x$lex"}{$lex}: no exception ok 12278 - exists $vrlex->{"x$lex"}{"x$lex"}{$lex}: value ok 12279 - delete $vrlex->{"x$lex"}{"x$lex"}{$lex}: no exception ok 12280 - delete $vrlex->{"x$lex"}{"x$lex"}{$lex}: value ok 12281 - $vrgbl->{"x$lex"}{"x$lex"}{$lex}: no exception ok 12282 - $vrgbl->{"x$lex"}{"x$lex"}{$lex}: value ok 12283 - $vrgbl->{"x$lex"}{"x$lex"}{$lex} = 123: no exception ok 12284 - $vrgbl->{"x$lex"}{"x$lex"}{$lex} = 123: value ok 12285 - exists $vrgbl->{"x$lex"}{"x$lex"}{$lex}: no exception ok 12286 - exists $vrgbl->{"x$lex"}{"x$lex"}{$lex}: value ok 12287 - delete $vrgbl->{"x$lex"}{"x$lex"}{$lex}: no exception ok 12288 - delete $vrgbl->{"x$lex"}{"x$lex"}{$lex}: value ok 12289 - $vlex[0][0]{$gbl}: no exception ok 12290 - $vlex[0][0]{$gbl}: value ok 12291 - $vlex[0][0]{$gbl} = 123: no exception ok 12292 - $vlex[0][0]{$gbl} = 123: value ok 12293 - exists $vlex[0][0]{$gbl}: no exception ok 12294 - exists $vlex[0][0]{$gbl}: value ok 12295 - delete $vlex[0][0]{$gbl}: no exception ok 12296 - delete $vlex[0][0]{$gbl}: value ok 12297 - $vgbl[0][0]{$gbl}: no exception ok 12298 - $vgbl[0][0]{$gbl}: value ok 12299 - $vgbl[0][0]{$gbl} = 123: no exception ok 12300 - $vgbl[0][0]{$gbl} = 123: value ok 12301 - exists $vgbl[0][0]{$gbl}: no exception ok 12302 - exists $vgbl[0][0]{$gbl}: value ok 12303 - delete $vgbl[0][0]{$gbl}: no exception ok 12304 - delete $vgbl[0][0]{$gbl}: value ok 12305 - $vrlex->[0][0]{$gbl}: no exception ok 12306 - $vrlex->[0][0]{$gbl}: value ok 12307 - $vrlex->[0][0]{$gbl} = 123: no exception ok 12308 - $vrlex->[0][0]{$gbl} = 123: value ok 12309 - exists $vrlex->[0][0]{$gbl}: no exception ok 12310 - exists $vrlex->[0][0]{$gbl}: value ok 12311 - delete $vrlex->[0][0]{$gbl}: no exception ok 12312 - delete $vrlex->[0][0]{$gbl}: value ok 12313 - $vrgbl->[0][0]{$gbl}: no exception ok 12314 - $vrgbl->[0][0]{$gbl}: value ok 12315 - $vrgbl->[0][0]{$gbl} = 123: no exception ok 12316 - $vrgbl->[0][0]{$gbl} = 123: value ok 12317 - exists $vrgbl->[0][0]{$gbl}: no exception ok 12318 - exists $vrgbl->[0][0]{$gbl}: value ok 12319 - delete $vrgbl->[0][0]{$gbl}: no exception ok 12320 - delete $vrgbl->[0][0]{$gbl}: value ok 12321 - $vlex[$lex][0]{$gbl}: no exception ok 12322 - $vlex[$lex][0]{$gbl}: value ok 12323 - $vlex[$lex][0]{$gbl} = 123: no exception ok 12324 - $vlex[$lex][0]{$gbl} = 123: value ok 12325 - exists $vlex[$lex][0]{$gbl}: no exception ok 12326 - exists $vlex[$lex][0]{$gbl}: value ok 12327 - delete $vlex[$lex][0]{$gbl}: no exception ok 12328 - delete $vlex[$lex][0]{$gbl}: value ok 12329 - $vgbl[$lex][0]{$gbl}: no exception ok 12330 - $vgbl[$lex][0]{$gbl}: value ok 12331 - $vgbl[$lex][0]{$gbl} = 123: no exception ok 12332 - $vgbl[$lex][0]{$gbl} = 123: value ok 12333 - exists $vgbl[$lex][0]{$gbl}: no exception ok 12334 - exists $vgbl[$lex][0]{$gbl}: value ok 12335 - delete $vgbl[$lex][0]{$gbl}: no exception ok 12336 - delete $vgbl[$lex][0]{$gbl}: value ok 12337 - $vrlex->[$lex][0]{$gbl}: no exception ok 12338 - $vrlex->[$lex][0]{$gbl}: value ok 12339 - $vrlex->[$lex][0]{$gbl} = 123: no exception ok 12340 - $vrlex->[$lex][0]{$gbl} = 123: value ok 12341 - exists $vrlex->[$lex][0]{$gbl}: no exception ok 12342 - exists $vrlex->[$lex][0]{$gbl}: value ok 12343 - delete $vrlex->[$lex][0]{$gbl}: no exception ok 12344 - delete $vrlex->[$lex][0]{$gbl}: value ok 12345 - $vrgbl->[$lex][0]{$gbl}: no exception ok 12346 - $vrgbl->[$lex][0]{$gbl}: value ok 12347 - $vrgbl->[$lex][0]{$gbl} = 123: no exception ok 12348 - $vrgbl->[$lex][0]{$gbl} = 123: value ok 12349 - exists $vrgbl->[$lex][0]{$gbl}: no exception ok 12350 - exists $vrgbl->[$lex][0]{$gbl}: value ok 12351 - delete $vrgbl->[$lex][0]{$gbl}: no exception ok 12352 - delete $vrgbl->[$lex][0]{$gbl}: value ok 12353 - $vlex[$gbl][0]{$gbl}: no exception ok 12354 - $vlex[$gbl][0]{$gbl}: value ok 12355 - $vlex[$gbl][0]{$gbl} = 123: no exception ok 12356 - $vlex[$gbl][0]{$gbl} = 123: value ok 12357 - exists $vlex[$gbl][0]{$gbl}: no exception ok 12358 - exists $vlex[$gbl][0]{$gbl}: value ok 12359 - delete $vlex[$gbl][0]{$gbl}: no exception ok 12360 - delete $vlex[$gbl][0]{$gbl}: value ok 12361 - $vgbl[$gbl][0]{$gbl}: no exception ok 12362 - $vgbl[$gbl][0]{$gbl}: value ok 12363 - $vgbl[$gbl][0]{$gbl} = 123: no exception ok 12364 - $vgbl[$gbl][0]{$gbl} = 123: value ok 12365 - exists $vgbl[$gbl][0]{$gbl}: no exception ok 12366 - exists $vgbl[$gbl][0]{$gbl}: value ok 12367 - delete $vgbl[$gbl][0]{$gbl}: no exception ok 12368 - delete $vgbl[$gbl][0]{$gbl}: value ok 12369 - $vrlex->[$gbl][0]{$gbl}: no exception ok 12370 - $vrlex->[$gbl][0]{$gbl}: value ok 12371 - $vrlex->[$gbl][0]{$gbl} = 123: no exception ok 12372 - $vrlex->[$gbl][0]{$gbl} = 123: value ok 12373 - exists $vrlex->[$gbl][0]{$gbl}: no exception ok 12374 - exists $vrlex->[$gbl][0]{$gbl}: value ok 12375 - delete $vrlex->[$gbl][0]{$gbl}: no exception ok 12376 - delete $vrlex->[$gbl][0]{$gbl}: value ok 12377 - $vrgbl->[$gbl][0]{$gbl}: no exception ok 12378 - $vrgbl->[$gbl][0]{$gbl}: value ok 12379 - $vrgbl->[$gbl][0]{$gbl} = 123: no exception ok 12380 - $vrgbl->[$gbl][0]{$gbl} = 123: value ok 12381 - exists $vrgbl->[$gbl][0]{$gbl}: no exception ok 12382 - exists $vrgbl->[$gbl][0]{$gbl}: value ok 12383 - delete $vrgbl->[$gbl][0]{$gbl}: no exception ok 12384 - delete $vrgbl->[$gbl][0]{$gbl}: value ok 12385 - $vlex[$lex+1][0]{$gbl}: no exception ok 12386 - $vlex[$lex+1][0]{$gbl}: value ok 12387 - $vlex[$lex+1][0]{$gbl} = 123: no exception ok 12388 - $vlex[$lex+1][0]{$gbl} = 123: value ok 12389 - exists $vlex[$lex+1][0]{$gbl}: no exception ok 12390 - exists $vlex[$lex+1][0]{$gbl}: value ok 12391 - delete $vlex[$lex+1][0]{$gbl}: no exception ok 12392 - delete $vlex[$lex+1][0]{$gbl}: value ok 12393 - $vgbl[$lex+1][0]{$gbl}: no exception ok 12394 - $vgbl[$lex+1][0]{$gbl}: value ok 12395 - $vgbl[$lex+1][0]{$gbl} = 123: no exception ok 12396 - $vgbl[$lex+1][0]{$gbl} = 123: value ok 12397 - exists $vgbl[$lex+1][0]{$gbl}: no exception ok 12398 - exists $vgbl[$lex+1][0]{$gbl}: value ok 12399 - delete $vgbl[$lex+1][0]{$gbl}: no exception ok 12400 - delete $vgbl[$lex+1][0]{$gbl}: value ok 12401 - $vrlex->[$lex+1][0]{$gbl}: no exception ok 12402 - $vrlex->[$lex+1][0]{$gbl}: value ok 12403 - $vrlex->[$lex+1][0]{$gbl} = 123: no exception ok 12404 - $vrlex->[$lex+1][0]{$gbl} = 123: value ok 12405 - exists $vrlex->[$lex+1][0]{$gbl}: no exception ok 12406 - exists $vrlex->[$lex+1][0]{$gbl}: value ok 12407 - delete $vrlex->[$lex+1][0]{$gbl}: no exception ok 12408 - delete $vrlex->[$lex+1][0]{$gbl}: value ok 12409 - $vrgbl->[$lex+1][0]{$gbl}: no exception ok 12410 - $vrgbl->[$lex+1][0]{$gbl}: value ok 12411 - $vrgbl->[$lex+1][0]{$gbl} = 123: no exception ok 12412 - $vrgbl->[$lex+1][0]{$gbl} = 123: value ok 12413 - exists $vrgbl->[$lex+1][0]{$gbl}: no exception ok 12414 - exists $vrgbl->[$lex+1][0]{$gbl}: value ok 12415 - delete $vrgbl->[$lex+1][0]{$gbl}: no exception ok 12416 - delete $vrgbl->[$lex+1][0]{$gbl}: value ok 12417 - $vlex{foo}[0]{$gbl}: no exception ok 12418 - $vlex{foo}[0]{$gbl}: value ok 12419 - $vlex{foo}[0]{$gbl} = 123: no exception ok 12420 - $vlex{foo}[0]{$gbl} = 123: value ok 12421 - exists $vlex{foo}[0]{$gbl}: no exception ok 12422 - exists $vlex{foo}[0]{$gbl}: value ok 12423 - delete $vlex{foo}[0]{$gbl}: no exception ok 12424 - delete $vlex{foo}[0]{$gbl}: value ok 12425 - $vgbl{foo}[0]{$gbl}: no exception ok 12426 - $vgbl{foo}[0]{$gbl}: value ok 12427 - $vgbl{foo}[0]{$gbl} = 123: no exception ok 12428 - $vgbl{foo}[0]{$gbl} = 123: value ok 12429 - exists $vgbl{foo}[0]{$gbl}: no exception ok 12430 - exists $vgbl{foo}[0]{$gbl}: value ok 12431 - delete $vgbl{foo}[0]{$gbl}: no exception ok 12432 - delete $vgbl{foo}[0]{$gbl}: value ok 12433 - $vrlex->{foo}[0]{$gbl}: no exception ok 12434 - $vrlex->{foo}[0]{$gbl}: value ok 12435 - $vrlex->{foo}[0]{$gbl} = 123: no exception ok 12436 - $vrlex->{foo}[0]{$gbl} = 123: value ok 12437 - exists $vrlex->{foo}[0]{$gbl}: no exception ok 12438 - exists $vrlex->{foo}[0]{$gbl}: value ok 12439 - delete $vrlex->{foo}[0]{$gbl}: no exception ok 12440 - delete $vrlex->{foo}[0]{$gbl}: value ok 12441 - $vrgbl->{foo}[0]{$gbl}: no exception ok 12442 - $vrgbl->{foo}[0]{$gbl}: value ok 12443 - $vrgbl->{foo}[0]{$gbl} = 123: no exception ok 12444 - $vrgbl->{foo}[0]{$gbl} = 123: value ok 12445 - exists $vrgbl->{foo}[0]{$gbl}: no exception ok 12446 - exists $vrgbl->{foo}[0]{$gbl}: value ok 12447 - delete $vrgbl->{foo}[0]{$gbl}: no exception ok 12448 - delete $vrgbl->{foo}[0]{$gbl}: value ok 12449 - $vlex{$lex}[0]{$gbl}: no exception ok 12450 - $vlex{$lex}[0]{$gbl}: value ok 12451 - $vlex{$lex}[0]{$gbl} = 123: no exception ok 12452 - $vlex{$lex}[0]{$gbl} = 123: value ok 12453 - exists $vlex{$lex}[0]{$gbl}: no exception ok 12454 - exists $vlex{$lex}[0]{$gbl}: value ok 12455 - delete $vlex{$lex}[0]{$gbl}: no exception ok 12456 - delete $vlex{$lex}[0]{$gbl}: value ok 12457 - $vgbl{$lex}[0]{$gbl}: no exception ok 12458 - $vgbl{$lex}[0]{$gbl}: value ok 12459 - $vgbl{$lex}[0]{$gbl} = 123: no exception ok 12460 - $vgbl{$lex}[0]{$gbl} = 123: value ok 12461 - exists $vgbl{$lex}[0]{$gbl}: no exception ok 12462 - exists $vgbl{$lex}[0]{$gbl}: value ok 12463 - delete $vgbl{$lex}[0]{$gbl}: no exception ok 12464 - delete $vgbl{$lex}[0]{$gbl}: value ok 12465 - $vrlex->{$lex}[0]{$gbl}: no exception ok 12466 - $vrlex->{$lex}[0]{$gbl}: value ok 12467 - $vrlex->{$lex}[0]{$gbl} = 123: no exception ok 12468 - $vrlex->{$lex}[0]{$gbl} = 123: value ok 12469 - exists $vrlex->{$lex}[0]{$gbl}: no exception ok 12470 - exists $vrlex->{$lex}[0]{$gbl}: value ok 12471 - delete $vrlex->{$lex}[0]{$gbl}: no exception ok 12472 - delete $vrlex->{$lex}[0]{$gbl}: value ok 12473 - $vrgbl->{$lex}[0]{$gbl}: no exception ok 12474 - $vrgbl->{$lex}[0]{$gbl}: value ok 12475 - $vrgbl->{$lex}[0]{$gbl} = 123: no exception ok 12476 - $vrgbl->{$lex}[0]{$gbl} = 123: value ok 12477 - exists $vrgbl->{$lex}[0]{$gbl}: no exception ok 12478 - exists $vrgbl->{$lex}[0]{$gbl}: value ok 12479 - delete $vrgbl->{$lex}[0]{$gbl}: no exception ok 12480 - delete $vrgbl->{$lex}[0]{$gbl}: value ok 12481 - $vlex{$gbl}[0]{$gbl}: no exception ok 12482 - $vlex{$gbl}[0]{$gbl}: value ok 12483 - $vlex{$gbl}[0]{$gbl} = 123: no exception ok 12484 - $vlex{$gbl}[0]{$gbl} = 123: value ok 12485 - exists $vlex{$gbl}[0]{$gbl}: no exception ok 12486 - exists $vlex{$gbl}[0]{$gbl}: value ok 12487 - delete $vlex{$gbl}[0]{$gbl}: no exception ok 12488 - delete $vlex{$gbl}[0]{$gbl}: value ok 12489 - $vgbl{$gbl}[0]{$gbl}: no exception ok 12490 - $vgbl{$gbl}[0]{$gbl}: value ok 12491 - $vgbl{$gbl}[0]{$gbl} = 123: no exception ok 12492 - $vgbl{$gbl}[0]{$gbl} = 123: value ok 12493 - exists $vgbl{$gbl}[0]{$gbl}: no exception ok 12494 - exists $vgbl{$gbl}[0]{$gbl}: value ok 12495 - delete $vgbl{$gbl}[0]{$gbl}: no exception ok 12496 - delete $vgbl{$gbl}[0]{$gbl}: value ok 12497 - $vrlex->{$gbl}[0]{$gbl}: no exception ok 12498 - $vrlex->{$gbl}[0]{$gbl}: value ok 12499 - $vrlex->{$gbl}[0]{$gbl} = 123: no exception ok 12500 - $vrlex->{$gbl}[0]{$gbl} = 123: value ok 12501 - exists $vrlex->{$gbl}[0]{$gbl}: no exception ok 12502 - exists $vrlex->{$gbl}[0]{$gbl}: value ok 12503 - delete $vrlex->{$gbl}[0]{$gbl}: no exception ok 12504 - delete $vrlex->{$gbl}[0]{$gbl}: value ok 12505 - $vrgbl->{$gbl}[0]{$gbl}: no exception ok 12506 - $vrgbl->{$gbl}[0]{$gbl}: value ok 12507 - $vrgbl->{$gbl}[0]{$gbl} = 123: no exception ok 12508 - $vrgbl->{$gbl}[0]{$gbl} = 123: value ok 12509 - exists $vrgbl->{$gbl}[0]{$gbl}: no exception ok 12510 - exists $vrgbl->{$gbl}[0]{$gbl}: value ok 12511 - delete $vrgbl->{$gbl}[0]{$gbl}: no exception ok 12512 - delete $vrgbl->{$gbl}[0]{$gbl}: value ok 12513 - $vlex{"x$lex"}[0]{$gbl}: no exception ok 12514 - $vlex{"x$lex"}[0]{$gbl}: value ok 12515 - $vlex{"x$lex"}[0]{$gbl} = 123: no exception ok 12516 - $vlex{"x$lex"}[0]{$gbl} = 123: value ok 12517 - exists $vlex{"x$lex"}[0]{$gbl}: no exception ok 12518 - exists $vlex{"x$lex"}[0]{$gbl}: value ok 12519 - delete $vlex{"x$lex"}[0]{$gbl}: no exception ok 12520 - delete $vlex{"x$lex"}[0]{$gbl}: value ok 12521 - $vgbl{"x$lex"}[0]{$gbl}: no exception ok 12522 - $vgbl{"x$lex"}[0]{$gbl}: value ok 12523 - $vgbl{"x$lex"}[0]{$gbl} = 123: no exception ok 12524 - $vgbl{"x$lex"}[0]{$gbl} = 123: value ok 12525 - exists $vgbl{"x$lex"}[0]{$gbl}: no exception ok 12526 - exists $vgbl{"x$lex"}[0]{$gbl}: value ok 12527 - delete $vgbl{"x$lex"}[0]{$gbl}: no exception ok 12528 - delete $vgbl{"x$lex"}[0]{$gbl}: value ok 12529 - $vrlex->{"x$lex"}[0]{$gbl}: no exception ok 12530 - $vrlex->{"x$lex"}[0]{$gbl}: value ok 12531 - $vrlex->{"x$lex"}[0]{$gbl} = 123: no exception ok 12532 - $vrlex->{"x$lex"}[0]{$gbl} = 123: value ok 12533 - exists $vrlex->{"x$lex"}[0]{$gbl}: no exception ok 12534 - exists $vrlex->{"x$lex"}[0]{$gbl}: value ok 12535 - delete $vrlex->{"x$lex"}[0]{$gbl}: no exception ok 12536 - delete $vrlex->{"x$lex"}[0]{$gbl}: value ok 12537 - $vrgbl->{"x$lex"}[0]{$gbl}: no exception ok 12538 - $vrgbl->{"x$lex"}[0]{$gbl}: value ok 12539 - $vrgbl->{"x$lex"}[0]{$gbl} = 123: no exception ok 12540 - $vrgbl->{"x$lex"}[0]{$gbl} = 123: value ok 12541 - exists $vrgbl->{"x$lex"}[0]{$gbl}: no exception ok 12542 - exists $vrgbl->{"x$lex"}[0]{$gbl}: value ok 12543 - delete $vrgbl->{"x$lex"}[0]{$gbl}: no exception ok 12544 - delete $vrgbl->{"x$lex"}[0]{$gbl}: value ok 12545 - $vlex[0][$lex]{$gbl}: no exception ok 12546 - $vlex[0][$lex]{$gbl}: value ok 12547 - $vlex[0][$lex]{$gbl} = 123: no exception ok 12548 - $vlex[0][$lex]{$gbl} = 123: value ok 12549 - exists $vlex[0][$lex]{$gbl}: no exception ok 12550 - exists $vlex[0][$lex]{$gbl}: value ok 12551 - delete $vlex[0][$lex]{$gbl}: no exception ok 12552 - delete $vlex[0][$lex]{$gbl}: value ok 12553 - $vgbl[0][$lex]{$gbl}: no exception ok 12554 - $vgbl[0][$lex]{$gbl}: value ok 12555 - $vgbl[0][$lex]{$gbl} = 123: no exception ok 12556 - $vgbl[0][$lex]{$gbl} = 123: value ok 12557 - exists $vgbl[0][$lex]{$gbl}: no exception ok 12558 - exists $vgbl[0][$lex]{$gbl}: value ok 12559 - delete $vgbl[0][$lex]{$gbl}: no exception ok 12560 - delete $vgbl[0][$lex]{$gbl}: value ok 12561 - $vrlex->[0][$lex]{$gbl}: no exception ok 12562 - $vrlex->[0][$lex]{$gbl}: value ok 12563 - $vrlex->[0][$lex]{$gbl} = 123: no exception ok 12564 - $vrlex->[0][$lex]{$gbl} = 123: value ok 12565 - exists $vrlex->[0][$lex]{$gbl}: no exception ok 12566 - exists $vrlex->[0][$lex]{$gbl}: value ok 12567 - delete $vrlex->[0][$lex]{$gbl}: no exception ok 12568 - delete $vrlex->[0][$lex]{$gbl}: value ok 12569 - $vrgbl->[0][$lex]{$gbl}: no exception ok 12570 - $vrgbl->[0][$lex]{$gbl}: value ok 12571 - $vrgbl->[0][$lex]{$gbl} = 123: no exception ok 12572 - $vrgbl->[0][$lex]{$gbl} = 123: value ok 12573 - exists $vrgbl->[0][$lex]{$gbl}: no exception ok 12574 - exists $vrgbl->[0][$lex]{$gbl}: value ok 12575 - delete $vrgbl->[0][$lex]{$gbl}: no exception ok 12576 - delete $vrgbl->[0][$lex]{$gbl}: value ok 12577 - $vlex[$lex][$lex]{$gbl}: no exception ok 12578 - $vlex[$lex][$lex]{$gbl}: value ok 12579 - $vlex[$lex][$lex]{$gbl} = 123: no exception ok 12580 - $vlex[$lex][$lex]{$gbl} = 123: value ok 12581 - exists $vlex[$lex][$lex]{$gbl}: no exception ok 12582 - exists $vlex[$lex][$lex]{$gbl}: value ok 12583 - delete $vlex[$lex][$lex]{$gbl}: no exception ok 12584 - delete $vlex[$lex][$lex]{$gbl}: value ok 12585 - $vgbl[$lex][$lex]{$gbl}: no exception ok 12586 - $vgbl[$lex][$lex]{$gbl}: value ok 12587 - $vgbl[$lex][$lex]{$gbl} = 123: no exception ok 12588 - $vgbl[$lex][$lex]{$gbl} = 123: value ok 12589 - exists $vgbl[$lex][$lex]{$gbl}: no exception ok 12590 - exists $vgbl[$lex][$lex]{$gbl}: value ok 12591 - delete $vgbl[$lex][$lex]{$gbl}: no exception ok 12592 - delete $vgbl[$lex][$lex]{$gbl}: value ok 12593 - $vrlex->[$lex][$lex]{$gbl}: no exception ok 12594 - $vrlex->[$lex][$lex]{$gbl}: value ok 12595 - $vrlex->[$lex][$lex]{$gbl} = 123: no exception ok 12596 - $vrlex->[$lex][$lex]{$gbl} = 123: value ok 12597 - exists $vrlex->[$lex][$lex]{$gbl}: no exception ok 12598 - exists $vrlex->[$lex][$lex]{$gbl}: value ok 12599 - delete $vrlex->[$lex][$lex]{$gbl}: no exception ok 12600 - delete $vrlex->[$lex][$lex]{$gbl}: value ok 12601 - $vrgbl->[$lex][$lex]{$gbl}: no exception ok 12602 - $vrgbl->[$lex][$lex]{$gbl}: value ok 12603 - $vrgbl->[$lex][$lex]{$gbl} = 123: no exception ok 12604 - $vrgbl->[$lex][$lex]{$gbl} = 123: value ok 12605 - exists $vrgbl->[$lex][$lex]{$gbl}: no exception ok 12606 - exists $vrgbl->[$lex][$lex]{$gbl}: value ok 12607 - delete $vrgbl->[$lex][$lex]{$gbl}: no exception ok 12608 - delete $vrgbl->[$lex][$lex]{$gbl}: value ok 12609 - $vlex[$gbl][$lex]{$gbl}: no exception ok 12610 - $vlex[$gbl][$lex]{$gbl}: value ok 12611 - $vlex[$gbl][$lex]{$gbl} = 123: no exception ok 12612 - $vlex[$gbl][$lex]{$gbl} = 123: value ok 12613 - exists $vlex[$gbl][$lex]{$gbl}: no exception ok 12614 - exists $vlex[$gbl][$lex]{$gbl}: value ok 12615 - delete $vlex[$gbl][$lex]{$gbl}: no exception ok 12616 - delete $vlex[$gbl][$lex]{$gbl}: value ok 12617 - $vgbl[$gbl][$lex]{$gbl}: no exception ok 12618 - $vgbl[$gbl][$lex]{$gbl}: value ok 12619 - $vgbl[$gbl][$lex]{$gbl} = 123: no exception ok 12620 - $vgbl[$gbl][$lex]{$gbl} = 123: value ok 12621 - exists $vgbl[$gbl][$lex]{$gbl}: no exception ok 12622 - exists $vgbl[$gbl][$lex]{$gbl}: value ok 12623 - delete $vgbl[$gbl][$lex]{$gbl}: no exception ok 12624 - delete $vgbl[$gbl][$lex]{$gbl}: value ok 12625 - $vrlex->[$gbl][$lex]{$gbl}: no exception ok 12626 - $vrlex->[$gbl][$lex]{$gbl}: value ok 12627 - $vrlex->[$gbl][$lex]{$gbl} = 123: no exception ok 12628 - $vrlex->[$gbl][$lex]{$gbl} = 123: value ok 12629 - exists $vrlex->[$gbl][$lex]{$gbl}: no exception ok 12630 - exists $vrlex->[$gbl][$lex]{$gbl}: value ok 12631 - delete $vrlex->[$gbl][$lex]{$gbl}: no exception ok 12632 - delete $vrlex->[$gbl][$lex]{$gbl}: value ok 12633 - $vrgbl->[$gbl][$lex]{$gbl}: no exception ok 12634 - $vrgbl->[$gbl][$lex]{$gbl}: value ok 12635 - $vrgbl->[$gbl][$lex]{$gbl} = 123: no exception ok 12636 - $vrgbl->[$gbl][$lex]{$gbl} = 123: value ok 12637 - exists $vrgbl->[$gbl][$lex]{$gbl}: no exception ok 12638 - exists $vrgbl->[$gbl][$lex]{$gbl}: value ok 12639 - delete $vrgbl->[$gbl][$lex]{$gbl}: no exception ok 12640 - delete $vrgbl->[$gbl][$lex]{$gbl}: value ok 12641 - $vlex[$lex+1][$lex]{$gbl}: no exception ok 12642 - $vlex[$lex+1][$lex]{$gbl}: value ok 12643 - $vlex[$lex+1][$lex]{$gbl} = 123: no exception ok 12644 - $vlex[$lex+1][$lex]{$gbl} = 123: value ok 12645 - exists $vlex[$lex+1][$lex]{$gbl}: no exception ok 12646 - exists $vlex[$lex+1][$lex]{$gbl}: value ok 12647 - delete $vlex[$lex+1][$lex]{$gbl}: no exception ok 12648 - delete $vlex[$lex+1][$lex]{$gbl}: value ok 12649 - $vgbl[$lex+1][$lex]{$gbl}: no exception ok 12650 - $vgbl[$lex+1][$lex]{$gbl}: value ok 12651 - $vgbl[$lex+1][$lex]{$gbl} = 123: no exception ok 12652 - $vgbl[$lex+1][$lex]{$gbl} = 123: value ok 12653 - exists $vgbl[$lex+1][$lex]{$gbl}: no exception ok 12654 - exists $vgbl[$lex+1][$lex]{$gbl}: value ok 12655 - delete $vgbl[$lex+1][$lex]{$gbl}: no exception ok 12656 - delete $vgbl[$lex+1][$lex]{$gbl}: value ok 12657 - $vrlex->[$lex+1][$lex]{$gbl}: no exception ok 12658 - $vrlex->[$lex+1][$lex]{$gbl}: value ok 12659 - $vrlex->[$lex+1][$lex]{$gbl} = 123: no exception ok 12660 - $vrlex->[$lex+1][$lex]{$gbl} = 123: value ok 12661 - exists $vrlex->[$lex+1][$lex]{$gbl}: no exception ok 12662 - exists $vrlex->[$lex+1][$lex]{$gbl}: value ok 12663 - delete $vrlex->[$lex+1][$lex]{$gbl}: no exception ok 12664 - delete $vrlex->[$lex+1][$lex]{$gbl}: value ok 12665 - $vrgbl->[$lex+1][$lex]{$gbl}: no exception ok 12666 - $vrgbl->[$lex+1][$lex]{$gbl}: value ok 12667 - $vrgbl->[$lex+1][$lex]{$gbl} = 123: no exception ok 12668 - $vrgbl->[$lex+1][$lex]{$gbl} = 123: value ok 12669 - exists $vrgbl->[$lex+1][$lex]{$gbl}: no exception ok 12670 - exists $vrgbl->[$lex+1][$lex]{$gbl}: value ok 12671 - delete $vrgbl->[$lex+1][$lex]{$gbl}: no exception ok 12672 - delete $vrgbl->[$lex+1][$lex]{$gbl}: value ok 12673 - $vlex{foo}[$lex]{$gbl}: no exception ok 12674 - $vlex{foo}[$lex]{$gbl}: value ok 12675 - $vlex{foo}[$lex]{$gbl} = 123: no exception ok 12676 - $vlex{foo}[$lex]{$gbl} = 123: value ok 12677 - exists $vlex{foo}[$lex]{$gbl}: no exception ok 12678 - exists $vlex{foo}[$lex]{$gbl}: value ok 12679 - delete $vlex{foo}[$lex]{$gbl}: no exception ok 12680 - delete $vlex{foo}[$lex]{$gbl}: value ok 12681 - $vgbl{foo}[$lex]{$gbl}: no exception ok 12682 - $vgbl{foo}[$lex]{$gbl}: value ok 12683 - $vgbl{foo}[$lex]{$gbl} = 123: no exception ok 12684 - $vgbl{foo}[$lex]{$gbl} = 123: value ok 12685 - exists $vgbl{foo}[$lex]{$gbl}: no exception ok 12686 - exists $vgbl{foo}[$lex]{$gbl}: value ok 12687 - delete $vgbl{foo}[$lex]{$gbl}: no exception ok 12688 - delete $vgbl{foo}[$lex]{$gbl}: value ok 12689 - $vrlex->{foo}[$lex]{$gbl}: no exception ok 12690 - $vrlex->{foo}[$lex]{$gbl}: value ok 12691 - $vrlex->{foo}[$lex]{$gbl} = 123: no exception ok 12692 - $vrlex->{foo}[$lex]{$gbl} = 123: value ok 12693 - exists $vrlex->{foo}[$lex]{$gbl}: no exception ok 12694 - exists $vrlex->{foo}[$lex]{$gbl}: value ok 12695 - delete $vrlex->{foo}[$lex]{$gbl}: no exception ok 12696 - delete $vrlex->{foo}[$lex]{$gbl}: value ok 12697 - $vrgbl->{foo}[$lex]{$gbl}: no exception ok 12698 - $vrgbl->{foo}[$lex]{$gbl}: value ok 12699 - $vrgbl->{foo}[$lex]{$gbl} = 123: no exception ok 12700 - $vrgbl->{foo}[$lex]{$gbl} = 123: value ok 12701 - exists $vrgbl->{foo}[$lex]{$gbl}: no exception ok 12702 - exists $vrgbl->{foo}[$lex]{$gbl}: value ok 12703 - delete $vrgbl->{foo}[$lex]{$gbl}: no exception ok 12704 - delete $vrgbl->{foo}[$lex]{$gbl}: value ok 12705 - $vlex{$lex}[$lex]{$gbl}: no exception ok 12706 - $vlex{$lex}[$lex]{$gbl}: value ok 12707 - $vlex{$lex}[$lex]{$gbl} = 123: no exception ok 12708 - $vlex{$lex}[$lex]{$gbl} = 123: value ok 12709 - exists $vlex{$lex}[$lex]{$gbl}: no exception ok 12710 - exists $vlex{$lex}[$lex]{$gbl}: value ok 12711 - delete $vlex{$lex}[$lex]{$gbl}: no exception ok 12712 - delete $vlex{$lex}[$lex]{$gbl}: value ok 12713 - $vgbl{$lex}[$lex]{$gbl}: no exception ok 12714 - $vgbl{$lex}[$lex]{$gbl}: value ok 12715 - $vgbl{$lex}[$lex]{$gbl} = 123: no exception ok 12716 - $vgbl{$lex}[$lex]{$gbl} = 123: value ok 12717 - exists $vgbl{$lex}[$lex]{$gbl}: no exception ok 12718 - exists $vgbl{$lex}[$lex]{$gbl}: value ok 12719 - delete $vgbl{$lex}[$lex]{$gbl}: no exception ok 12720 - delete $vgbl{$lex}[$lex]{$gbl}: value ok 12721 - $vrlex->{$lex}[$lex]{$gbl}: no exception ok 12722 - $vrlex->{$lex}[$lex]{$gbl}: value ok 12723 - $vrlex->{$lex}[$lex]{$gbl} = 123: no exception ok 12724 - $vrlex->{$lex}[$lex]{$gbl} = 123: value ok 12725 - exists $vrlex->{$lex}[$lex]{$gbl}: no exception ok 12726 - exists $vrlex->{$lex}[$lex]{$gbl}: value ok 12727 - delete $vrlex->{$lex}[$lex]{$gbl}: no exception ok 12728 - delete $vrlex->{$lex}[$lex]{$gbl}: value ok 12729 - $vrgbl->{$lex}[$lex]{$gbl}: no exception ok 12730 - $vrgbl->{$lex}[$lex]{$gbl}: value ok 12731 - $vrgbl->{$lex}[$lex]{$gbl} = 123: no exception ok 12732 - $vrgbl->{$lex}[$lex]{$gbl} = 123: value ok 12733 - exists $vrgbl->{$lex}[$lex]{$gbl}: no exception ok 12734 - exists $vrgbl->{$lex}[$lex]{$gbl}: value ok 12735 - delete $vrgbl->{$lex}[$lex]{$gbl}: no exception ok 12736 - delete $vrgbl->{$lex}[$lex]{$gbl}: value ok 12737 - $vlex{$gbl}[$lex]{$gbl}: no exception ok 12738 - $vlex{$gbl}[$lex]{$gbl}: value ok 12739 - $vlex{$gbl}[$lex]{$gbl} = 123: no exception ok 12740 - $vlex{$gbl}[$lex]{$gbl} = 123: value ok 12741 - exists $vlex{$gbl}[$lex]{$gbl}: no exception ok 12742 - exists $vlex{$gbl}[$lex]{$gbl}: value ok 12743 - delete $vlex{$gbl}[$lex]{$gbl}: no exception ok 12744 - delete $vlex{$gbl}[$lex]{$gbl}: value ok 12745 - $vgbl{$gbl}[$lex]{$gbl}: no exception ok 12746 - $vgbl{$gbl}[$lex]{$gbl}: value ok 12747 - $vgbl{$gbl}[$lex]{$gbl} = 123: no exception ok 12748 - $vgbl{$gbl}[$lex]{$gbl} = 123: value ok 12749 - exists $vgbl{$gbl}[$lex]{$gbl}: no exception ok 12750 - exists $vgbl{$gbl}[$lex]{$gbl}: value ok 12751 - delete $vgbl{$gbl}[$lex]{$gbl}: no exception ok 12752 - delete $vgbl{$gbl}[$lex]{$gbl}: value ok 12753 - $vrlex->{$gbl}[$lex]{$gbl}: no exception ok 12754 - $vrlex->{$gbl}[$lex]{$gbl}: value ok 12755 - $vrlex->{$gbl}[$lex]{$gbl} = 123: no exception ok 12756 - $vrlex->{$gbl}[$lex]{$gbl} = 123: value ok 12757 - exists $vrlex->{$gbl}[$lex]{$gbl}: no exception ok 12758 - exists $vrlex->{$gbl}[$lex]{$gbl}: value ok 12759 - delete $vrlex->{$gbl}[$lex]{$gbl}: no exception ok 12760 - delete $vrlex->{$gbl}[$lex]{$gbl}: value ok 12761 - $vrgbl->{$gbl}[$lex]{$gbl}: no exception ok 12762 - $vrgbl->{$gbl}[$lex]{$gbl}: value ok 12763 - $vrgbl->{$gbl}[$lex]{$gbl} = 123: no exception ok 12764 - $vrgbl->{$gbl}[$lex]{$gbl} = 123: value ok 12765 - exists $vrgbl->{$gbl}[$lex]{$gbl}: no exception ok 12766 - exists $vrgbl->{$gbl}[$lex]{$gbl}: value ok 12767 - delete $vrgbl->{$gbl}[$lex]{$gbl}: no exception ok 12768 - delete $vrgbl->{$gbl}[$lex]{$gbl}: value ok 12769 - $vlex{"x$lex"}[$lex]{$gbl}: no exception ok 12770 - $vlex{"x$lex"}[$lex]{$gbl}: value ok 12771 - $vlex{"x$lex"}[$lex]{$gbl} = 123: no exception ok 12772 - $vlex{"x$lex"}[$lex]{$gbl} = 123: value ok 12773 - exists $vlex{"x$lex"}[$lex]{$gbl}: no exception ok 12774 - exists $vlex{"x$lex"}[$lex]{$gbl}: value ok 12775 - delete $vlex{"x$lex"}[$lex]{$gbl}: no exception ok 12776 - delete $vlex{"x$lex"}[$lex]{$gbl}: value ok 12777 - $vgbl{"x$lex"}[$lex]{$gbl}: no exception ok 12778 - $vgbl{"x$lex"}[$lex]{$gbl}: value ok 12779 - $vgbl{"x$lex"}[$lex]{$gbl} = 123: no exception ok 12780 - $vgbl{"x$lex"}[$lex]{$gbl} = 123: value ok 12781 - exists $vgbl{"x$lex"}[$lex]{$gbl}: no exception ok 12782 - exists $vgbl{"x$lex"}[$lex]{$gbl}: value ok 12783 - delete $vgbl{"x$lex"}[$lex]{$gbl}: no exception ok 12784 - delete $vgbl{"x$lex"}[$lex]{$gbl}: value ok 12785 - $vrlex->{"x$lex"}[$lex]{$gbl}: no exception ok 12786 - $vrlex->{"x$lex"}[$lex]{$gbl}: value ok 12787 - $vrlex->{"x$lex"}[$lex]{$gbl} = 123: no exception ok 12788 - $vrlex->{"x$lex"}[$lex]{$gbl} = 123: value ok 12789 - exists $vrlex->{"x$lex"}[$lex]{$gbl}: no exception ok 12790 - exists $vrlex->{"x$lex"}[$lex]{$gbl}: value ok 12791 - delete $vrlex->{"x$lex"}[$lex]{$gbl}: no exception ok 12792 - delete $vrlex->{"x$lex"}[$lex]{$gbl}: value ok 12793 - $vrgbl->{"x$lex"}[$lex]{$gbl}: no exception ok 12794 - $vrgbl->{"x$lex"}[$lex]{$gbl}: value ok 12795 - $vrgbl->{"x$lex"}[$lex]{$gbl} = 123: no exception ok 12796 - $vrgbl->{"x$lex"}[$lex]{$gbl} = 123: value ok 12797 - exists $vrgbl->{"x$lex"}[$lex]{$gbl}: no exception ok 12798 - exists $vrgbl->{"x$lex"}[$lex]{$gbl}: value ok 12799 - delete $vrgbl->{"x$lex"}[$lex]{$gbl}: no exception ok 12800 - delete $vrgbl->{"x$lex"}[$lex]{$gbl}: value ok 12801 - $vlex[0][$gbl]{$gbl}: no exception ok 12802 - $vlex[0][$gbl]{$gbl}: value ok 12803 - $vlex[0][$gbl]{$gbl} = 123: no exception ok 12804 - $vlex[0][$gbl]{$gbl} = 123: value ok 12805 - exists $vlex[0][$gbl]{$gbl}: no exception ok 12806 - exists $vlex[0][$gbl]{$gbl}: value ok 12807 - delete $vlex[0][$gbl]{$gbl}: no exception ok 12808 - delete $vlex[0][$gbl]{$gbl}: value ok 12809 - $vgbl[0][$gbl]{$gbl}: no exception ok 12810 - $vgbl[0][$gbl]{$gbl}: value ok 12811 - $vgbl[0][$gbl]{$gbl} = 123: no exception ok 12812 - $vgbl[0][$gbl]{$gbl} = 123: value ok 12813 - exists $vgbl[0][$gbl]{$gbl}: no exception ok 12814 - exists $vgbl[0][$gbl]{$gbl}: value ok 12815 - delete $vgbl[0][$gbl]{$gbl}: no exception ok 12816 - delete $vgbl[0][$gbl]{$gbl}: value ok 12817 - $vrlex->[0][$gbl]{$gbl}: no exception ok 12818 - $vrlex->[0][$gbl]{$gbl}: value ok 12819 - $vrlex->[0][$gbl]{$gbl} = 123: no exception ok 12820 - $vrlex->[0][$gbl]{$gbl} = 123: value ok 12821 - exists $vrlex->[0][$gbl]{$gbl}: no exception ok 12822 - exists $vrlex->[0][$gbl]{$gbl}: value ok 12823 - delete $vrlex->[0][$gbl]{$gbl}: no exception ok 12824 - delete $vrlex->[0][$gbl]{$gbl}: value ok 12825 - $vrgbl->[0][$gbl]{$gbl}: no exception ok 12826 - $vrgbl->[0][$gbl]{$gbl}: value ok 12827 - $vrgbl->[0][$gbl]{$gbl} = 123: no exception ok 12828 - $vrgbl->[0][$gbl]{$gbl} = 123: value ok 12829 - exists $vrgbl->[0][$gbl]{$gbl}: no exception ok 12830 - exists $vrgbl->[0][$gbl]{$gbl}: value ok 12831 - delete $vrgbl->[0][$gbl]{$gbl}: no exception ok 12832 - delete $vrgbl->[0][$gbl]{$gbl}: value ok 12833 - $vlex[$lex][$gbl]{$gbl}: no exception ok 12834 - $vlex[$lex][$gbl]{$gbl}: value ok 12835 - $vlex[$lex][$gbl]{$gbl} = 123: no exception ok 12836 - $vlex[$lex][$gbl]{$gbl} = 123: value ok 12837 - exists $vlex[$lex][$gbl]{$gbl}: no exception ok 12838 - exists $vlex[$lex][$gbl]{$gbl}: value ok 12839 - delete $vlex[$lex][$gbl]{$gbl}: no exception ok 12840 - delete $vlex[$lex][$gbl]{$gbl}: value ok 12841 - $vgbl[$lex][$gbl]{$gbl}: no exception ok 12842 - $vgbl[$lex][$gbl]{$gbl}: value ok 12843 - $vgbl[$lex][$gbl]{$gbl} = 123: no exception ok 12844 - $vgbl[$lex][$gbl]{$gbl} = 123: value ok 12845 - exists $vgbl[$lex][$gbl]{$gbl}: no exception ok 12846 - exists $vgbl[$lex][$gbl]{$gbl}: value ok 12847 - delete $vgbl[$lex][$gbl]{$gbl}: no exception ok 12848 - delete $vgbl[$lex][$gbl]{$gbl}: value ok 12849 - $vrlex->[$lex][$gbl]{$gbl}: no exception ok 12850 - $vrlex->[$lex][$gbl]{$gbl}: value ok 12851 - $vrlex->[$lex][$gbl]{$gbl} = 123: no exception ok 12852 - $vrlex->[$lex][$gbl]{$gbl} = 123: value ok 12853 - exists $vrlex->[$lex][$gbl]{$gbl}: no exception ok 12854 - exists $vrlex->[$lex][$gbl]{$gbl}: value ok 12855 - delete $vrlex->[$lex][$gbl]{$gbl}: no exception ok 12856 - delete $vrlex->[$lex][$gbl]{$gbl}: value ok 12857 - $vrgbl->[$lex][$gbl]{$gbl}: no exception ok 12858 - $vrgbl->[$lex][$gbl]{$gbl}: value ok 12859 - $vrgbl->[$lex][$gbl]{$gbl} = 123: no exception ok 12860 - $vrgbl->[$lex][$gbl]{$gbl} = 123: value ok 12861 - exists $vrgbl->[$lex][$gbl]{$gbl}: no exception ok 12862 - exists $vrgbl->[$lex][$gbl]{$gbl}: value ok 12863 - delete $vrgbl->[$lex][$gbl]{$gbl}: no exception ok 12864 - delete $vrgbl->[$lex][$gbl]{$gbl}: value ok 12865 - $vlex[$gbl][$gbl]{$gbl}: no exception ok 12866 - $vlex[$gbl][$gbl]{$gbl}: value ok 12867 - $vlex[$gbl][$gbl]{$gbl} = 123: no exception ok 12868 - $vlex[$gbl][$gbl]{$gbl} = 123: value ok 12869 - exists $vlex[$gbl][$gbl]{$gbl}: no exception ok 12870 - exists $vlex[$gbl][$gbl]{$gbl}: value ok 12871 - delete $vlex[$gbl][$gbl]{$gbl}: no exception ok 12872 - delete $vlex[$gbl][$gbl]{$gbl}: value ok 12873 - $vgbl[$gbl][$gbl]{$gbl}: no exception ok 12874 - $vgbl[$gbl][$gbl]{$gbl}: value ok 12875 - $vgbl[$gbl][$gbl]{$gbl} = 123: no exception ok 12876 - $vgbl[$gbl][$gbl]{$gbl} = 123: value ok 12877 - exists $vgbl[$gbl][$gbl]{$gbl}: no exception ok 12878 - exists $vgbl[$gbl][$gbl]{$gbl}: value ok 12879 - delete $vgbl[$gbl][$gbl]{$gbl}: no exception ok 12880 - delete $vgbl[$gbl][$gbl]{$gbl}: value ok 12881 - $vrlex->[$gbl][$gbl]{$gbl}: no exception ok 12882 - $vrlex->[$gbl][$gbl]{$gbl}: value ok 12883 - $vrlex->[$gbl][$gbl]{$gbl} = 123: no exception ok 12884 - $vrlex->[$gbl][$gbl]{$gbl} = 123: value ok 12885 - exists $vrlex->[$gbl][$gbl]{$gbl}: no exception ok 12886 - exists $vrlex->[$gbl][$gbl]{$gbl}: value ok 12887 - delete $vrlex->[$gbl][$gbl]{$gbl}: no exception ok 12888 - delete $vrlex->[$gbl][$gbl]{$gbl}: value ok 12889 - $vrgbl->[$gbl][$gbl]{$gbl}: no exception ok 12890 - $vrgbl->[$gbl][$gbl]{$gbl}: value ok 12891 - $vrgbl->[$gbl][$gbl]{$gbl} = 123: no exception ok 12892 - $vrgbl->[$gbl][$gbl]{$gbl} = 123: value ok 12893 - exists $vrgbl->[$gbl][$gbl]{$gbl}: no exception ok 12894 - exists $vrgbl->[$gbl][$gbl]{$gbl}: value ok 12895 - delete $vrgbl->[$gbl][$gbl]{$gbl}: no exception ok 12896 - delete $vrgbl->[$gbl][$gbl]{$gbl}: value ok 12897 - $vlex[$lex+1][$gbl]{$gbl}: no exception ok 12898 - $vlex[$lex+1][$gbl]{$gbl}: value ok 12899 - $vlex[$lex+1][$gbl]{$gbl} = 123: no exception ok 12900 - $vlex[$lex+1][$gbl]{$gbl} = 123: value ok 12901 - exists $vlex[$lex+1][$gbl]{$gbl}: no exception ok 12902 - exists $vlex[$lex+1][$gbl]{$gbl}: value ok 12903 - delete $vlex[$lex+1][$gbl]{$gbl}: no exception ok 12904 - delete $vlex[$lex+1][$gbl]{$gbl}: value ok 12905 - $vgbl[$lex+1][$gbl]{$gbl}: no exception ok 12906 - $vgbl[$lex+1][$gbl]{$gbl}: value ok 12907 - $vgbl[$lex+1][$gbl]{$gbl} = 123: no exception ok 12908 - $vgbl[$lex+1][$gbl]{$gbl} = 123: value ok 12909 - exists $vgbl[$lex+1][$gbl]{$gbl}: no exception ok 12910 - exists $vgbl[$lex+1][$gbl]{$gbl}: value ok 12911 - delete $vgbl[$lex+1][$gbl]{$gbl}: no exception ok 12912 - delete $vgbl[$lex+1][$gbl]{$gbl}: value ok 12913 - $vrlex->[$lex+1][$gbl]{$gbl}: no exception ok 12914 - $vrlex->[$lex+1][$gbl]{$gbl}: value ok 12915 - $vrlex->[$lex+1][$gbl]{$gbl} = 123: no exception ok 12916 - $vrlex->[$lex+1][$gbl]{$gbl} = 123: value ok 12917 - exists $vrlex->[$lex+1][$gbl]{$gbl}: no exception ok 12918 - exists $vrlex->[$lex+1][$gbl]{$gbl}: value ok 12919 - delete $vrlex->[$lex+1][$gbl]{$gbl}: no exception ok 12920 - delete $vrlex->[$lex+1][$gbl]{$gbl}: value ok 12921 - $vrgbl->[$lex+1][$gbl]{$gbl}: no exception ok 12922 - $vrgbl->[$lex+1][$gbl]{$gbl}: value ok 12923 - $vrgbl->[$lex+1][$gbl]{$gbl} = 123: no exception ok 12924 - $vrgbl->[$lex+1][$gbl]{$gbl} = 123: value ok 12925 - exists $vrgbl->[$lex+1][$gbl]{$gbl}: no exception ok 12926 - exists $vrgbl->[$lex+1][$gbl]{$gbl}: value ok 12927 - delete $vrgbl->[$lex+1][$gbl]{$gbl}: no exception ok 12928 - delete $vrgbl->[$lex+1][$gbl]{$gbl}: value ok 12929 - $vlex{foo}[$gbl]{$gbl}: no exception ok 12930 - $vlex{foo}[$gbl]{$gbl}: value ok 12931 - $vlex{foo}[$gbl]{$gbl} = 123: no exception ok 12932 - $vlex{foo}[$gbl]{$gbl} = 123: value ok 12933 - exists $vlex{foo}[$gbl]{$gbl}: no exception ok 12934 - exists $vlex{foo}[$gbl]{$gbl}: value ok 12935 - delete $vlex{foo}[$gbl]{$gbl}: no exception ok 12936 - delete $vlex{foo}[$gbl]{$gbl}: value ok 12937 - $vgbl{foo}[$gbl]{$gbl}: no exception ok 12938 - $vgbl{foo}[$gbl]{$gbl}: value ok 12939 - $vgbl{foo}[$gbl]{$gbl} = 123: no exception ok 12940 - $vgbl{foo}[$gbl]{$gbl} = 123: value ok 12941 - exists $vgbl{foo}[$gbl]{$gbl}: no exception ok 12942 - exists $vgbl{foo}[$gbl]{$gbl}: value ok 12943 - delete $vgbl{foo}[$gbl]{$gbl}: no exception ok 12944 - delete $vgbl{foo}[$gbl]{$gbl}: value ok 12945 - $vrlex->{foo}[$gbl]{$gbl}: no exception ok 12946 - $vrlex->{foo}[$gbl]{$gbl}: value ok 12947 - $vrlex->{foo}[$gbl]{$gbl} = 123: no exception ok 12948 - $vrlex->{foo}[$gbl]{$gbl} = 123: value ok 12949 - exists $vrlex->{foo}[$gbl]{$gbl}: no exception ok 12950 - exists $vrlex->{foo}[$gbl]{$gbl}: value ok 12951 - delete $vrlex->{foo}[$gbl]{$gbl}: no exception ok 12952 - delete $vrlex->{foo}[$gbl]{$gbl}: value ok 12953 - $vrgbl->{foo}[$gbl]{$gbl}: no exception ok 12954 - $vrgbl->{foo}[$gbl]{$gbl}: value ok 12955 - $vrgbl->{foo}[$gbl]{$gbl} = 123: no exception ok 12956 - $vrgbl->{foo}[$gbl]{$gbl} = 123: value ok 12957 - exists $vrgbl->{foo}[$gbl]{$gbl}: no exception ok 12958 - exists $vrgbl->{foo}[$gbl]{$gbl}: value ok 12959 - delete $vrgbl->{foo}[$gbl]{$gbl}: no exception ok 12960 - delete $vrgbl->{foo}[$gbl]{$gbl}: value ok 12961 - $vlex{$lex}[$gbl]{$gbl}: no exception ok 12962 - $vlex{$lex}[$gbl]{$gbl}: value ok 12963 - $vlex{$lex}[$gbl]{$gbl} = 123: no exception ok 12964 - $vlex{$lex}[$gbl]{$gbl} = 123: value ok 12965 - exists $vlex{$lex}[$gbl]{$gbl}: no exception ok 12966 - exists $vlex{$lex}[$gbl]{$gbl}: value ok 12967 - delete $vlex{$lex}[$gbl]{$gbl}: no exception ok 12968 - delete $vlex{$lex}[$gbl]{$gbl}: value ok 12969 - $vgbl{$lex}[$gbl]{$gbl}: no exception ok 12970 - $vgbl{$lex}[$gbl]{$gbl}: value ok 12971 - $vgbl{$lex}[$gbl]{$gbl} = 123: no exception ok 12972 - $vgbl{$lex}[$gbl]{$gbl} = 123: value ok 12973 - exists $vgbl{$lex}[$gbl]{$gbl}: no exception ok 12974 - exists $vgbl{$lex}[$gbl]{$gbl}: value ok 12975 - delete $vgbl{$lex}[$gbl]{$gbl}: no exception ok 12976 - delete $vgbl{$lex}[$gbl]{$gbl}: value ok 12977 - $vrlex->{$lex}[$gbl]{$gbl}: no exception ok 12978 - $vrlex->{$lex}[$gbl]{$gbl}: value ok 12979 - $vrlex->{$lex}[$gbl]{$gbl} = 123: no exception ok 12980 - $vrlex->{$lex}[$gbl]{$gbl} = 123: value ok 12981 - exists $vrlex->{$lex}[$gbl]{$gbl}: no exception ok 12982 - exists $vrlex->{$lex}[$gbl]{$gbl}: value ok 12983 - delete $vrlex->{$lex}[$gbl]{$gbl}: no exception ok 12984 - delete $vrlex->{$lex}[$gbl]{$gbl}: value ok 12985 - $vrgbl->{$lex}[$gbl]{$gbl}: no exception ok 12986 - $vrgbl->{$lex}[$gbl]{$gbl}: value ok 12987 - $vrgbl->{$lex}[$gbl]{$gbl} = 123: no exception ok 12988 - $vrgbl->{$lex}[$gbl]{$gbl} = 123: value ok 12989 - exists $vrgbl->{$lex}[$gbl]{$gbl}: no exception ok 12990 - exists $vrgbl->{$lex}[$gbl]{$gbl}: value ok 12991 - delete $vrgbl->{$lex}[$gbl]{$gbl}: no exception ok 12992 - delete $vrgbl->{$lex}[$gbl]{$gbl}: value ok 12993 - $vlex{$gbl}[$gbl]{$gbl}: no exception ok 12994 - $vlex{$gbl}[$gbl]{$gbl}: value ok 12995 - $vlex{$gbl}[$gbl]{$gbl} = 123: no exception ok 12996 - $vlex{$gbl}[$gbl]{$gbl} = 123: value ok 12997 - exists $vlex{$gbl}[$gbl]{$gbl}: no exception ok 12998 - exists $vlex{$gbl}[$gbl]{$gbl}: value ok 12999 - delete $vlex{$gbl}[$gbl]{$gbl}: no exception ok 13000 - delete $vlex{$gbl}[$gbl]{$gbl}: value ok 13001 - $vgbl{$gbl}[$gbl]{$gbl}: no exception ok 13002 - $vgbl{$gbl}[$gbl]{$gbl}: value ok 13003 - $vgbl{$gbl}[$gbl]{$gbl} = 123: no exception ok 13004 - $vgbl{$gbl}[$gbl]{$gbl} = 123: value ok 13005 - exists $vgbl{$gbl}[$gbl]{$gbl}: no exception ok 13006 - exists $vgbl{$gbl}[$gbl]{$gbl}: value ok 13007 - delete $vgbl{$gbl}[$gbl]{$gbl}: no exception ok 13008 - delete $vgbl{$gbl}[$gbl]{$gbl}: value ok 13009 - $vrlex->{$gbl}[$gbl]{$gbl}: no exception ok 13010 - $vrlex->{$gbl}[$gbl]{$gbl}: value ok 13011 - $vrlex->{$gbl}[$gbl]{$gbl} = 123: no exception ok 13012 - $vrlex->{$gbl}[$gbl]{$gbl} = 123: value ok 13013 - exists $vrlex->{$gbl}[$gbl]{$gbl}: no exception ok 13014 - exists $vrlex->{$gbl}[$gbl]{$gbl}: value ok 13015 - delete $vrlex->{$gbl}[$gbl]{$gbl}: no exception ok 13016 - delete $vrlex->{$gbl}[$gbl]{$gbl}: value ok 13017 - $vrgbl->{$gbl}[$gbl]{$gbl}: no exception ok 13018 - $vrgbl->{$gbl}[$gbl]{$gbl}: value ok 13019 - $vrgbl->{$gbl}[$gbl]{$gbl} = 123: no exception ok 13020 - $vrgbl->{$gbl}[$gbl]{$gbl} = 123: value ok 13021 - exists $vrgbl->{$gbl}[$gbl]{$gbl}: no exception ok 13022 - exists $vrgbl->{$gbl}[$gbl]{$gbl}: value ok 13023 - delete $vrgbl->{$gbl}[$gbl]{$gbl}: no exception ok 13024 - delete $vrgbl->{$gbl}[$gbl]{$gbl}: value ok 13025 - $vlex{"x$lex"}[$gbl]{$gbl}: no exception ok 13026 - $vlex{"x$lex"}[$gbl]{$gbl}: value ok 13027 - $vlex{"x$lex"}[$gbl]{$gbl} = 123: no exception ok 13028 - $vlex{"x$lex"}[$gbl]{$gbl} = 123: value ok 13029 - exists $vlex{"x$lex"}[$gbl]{$gbl}: no exception ok 13030 - exists $vlex{"x$lex"}[$gbl]{$gbl}: value ok 13031 - delete $vlex{"x$lex"}[$gbl]{$gbl}: no exception ok 13032 - delete $vlex{"x$lex"}[$gbl]{$gbl}: value ok 13033 - $vgbl{"x$lex"}[$gbl]{$gbl}: no exception ok 13034 - $vgbl{"x$lex"}[$gbl]{$gbl}: value ok 13035 - $vgbl{"x$lex"}[$gbl]{$gbl} = 123: no exception ok 13036 - $vgbl{"x$lex"}[$gbl]{$gbl} = 123: value ok 13037 - exists $vgbl{"x$lex"}[$gbl]{$gbl}: no exception ok 13038 - exists $vgbl{"x$lex"}[$gbl]{$gbl}: value ok 13039 - delete $vgbl{"x$lex"}[$gbl]{$gbl}: no exception ok 13040 - delete $vgbl{"x$lex"}[$gbl]{$gbl}: value ok 13041 - $vrlex->{"x$lex"}[$gbl]{$gbl}: no exception ok 13042 - $vrlex->{"x$lex"}[$gbl]{$gbl}: value ok 13043 - $vrlex->{"x$lex"}[$gbl]{$gbl} = 123: no exception ok 13044 - $vrlex->{"x$lex"}[$gbl]{$gbl} = 123: value ok 13045 - exists $vrlex->{"x$lex"}[$gbl]{$gbl}: no exception ok 13046 - exists $vrlex->{"x$lex"}[$gbl]{$gbl}: value ok 13047 - delete $vrlex->{"x$lex"}[$gbl]{$gbl}: no exception ok 13048 - delete $vrlex->{"x$lex"}[$gbl]{$gbl}: value ok 13049 - $vrgbl->{"x$lex"}[$gbl]{$gbl}: no exception ok 13050 - $vrgbl->{"x$lex"}[$gbl]{$gbl}: value ok 13051 - $vrgbl->{"x$lex"}[$gbl]{$gbl} = 123: no exception ok 13052 - $vrgbl->{"x$lex"}[$gbl]{$gbl} = 123: value ok 13053 - exists $vrgbl->{"x$lex"}[$gbl]{$gbl}: no exception ok 13054 - exists $vrgbl->{"x$lex"}[$gbl]{$gbl}: value ok 13055 - delete $vrgbl->{"x$lex"}[$gbl]{$gbl}: no exception ok 13056 - delete $vrgbl->{"x$lex"}[$gbl]{$gbl}: value ok 13057 - $vlex[0][$lex+1]{$gbl}: no exception ok 13058 - $vlex[0][$lex+1]{$gbl}: value ok 13059 - $vlex[0][$lex+1]{$gbl} = 123: no exception ok 13060 - $vlex[0][$lex+1]{$gbl} = 123: value ok 13061 - exists $vlex[0][$lex+1]{$gbl}: no exception ok 13062 - exists $vlex[0][$lex+1]{$gbl}: value ok 13063 - delete $vlex[0][$lex+1]{$gbl}: no exception ok 13064 - delete $vlex[0][$lex+1]{$gbl}: value ok 13065 - $vgbl[0][$lex+1]{$gbl}: no exception ok 13066 - $vgbl[0][$lex+1]{$gbl}: value ok 13067 - $vgbl[0][$lex+1]{$gbl} = 123: no exception ok 13068 - $vgbl[0][$lex+1]{$gbl} = 123: value ok 13069 - exists $vgbl[0][$lex+1]{$gbl}: no exception ok 13070 - exists $vgbl[0][$lex+1]{$gbl}: value ok 13071 - delete $vgbl[0][$lex+1]{$gbl}: no exception ok 13072 - delete $vgbl[0][$lex+1]{$gbl}: value ok 13073 - $vrlex->[0][$lex+1]{$gbl}: no exception ok 13074 - $vrlex->[0][$lex+1]{$gbl}: value ok 13075 - $vrlex->[0][$lex+1]{$gbl} = 123: no exception ok 13076 - $vrlex->[0][$lex+1]{$gbl} = 123: value ok 13077 - exists $vrlex->[0][$lex+1]{$gbl}: no exception ok 13078 - exists $vrlex->[0][$lex+1]{$gbl}: value ok 13079 - delete $vrlex->[0][$lex+1]{$gbl}: no exception ok 13080 - delete $vrlex->[0][$lex+1]{$gbl}: value ok 13081 - $vrgbl->[0][$lex+1]{$gbl}: no exception ok 13082 - $vrgbl->[0][$lex+1]{$gbl}: value ok 13083 - $vrgbl->[0][$lex+1]{$gbl} = 123: no exception ok 13084 - $vrgbl->[0][$lex+1]{$gbl} = 123: value ok 13085 - exists $vrgbl->[0][$lex+1]{$gbl}: no exception ok 13086 - exists $vrgbl->[0][$lex+1]{$gbl}: value ok 13087 - delete $vrgbl->[0][$lex+1]{$gbl}: no exception ok 13088 - delete $vrgbl->[0][$lex+1]{$gbl}: value ok 13089 - $vlex[$lex][$lex+1]{$gbl}: no exception ok 13090 - $vlex[$lex][$lex+1]{$gbl}: value ok 13091 - $vlex[$lex][$lex+1]{$gbl} = 123: no exception ok 13092 - $vlex[$lex][$lex+1]{$gbl} = 123: value ok 13093 - exists $vlex[$lex][$lex+1]{$gbl}: no exception ok 13094 - exists $vlex[$lex][$lex+1]{$gbl}: value ok 13095 - delete $vlex[$lex][$lex+1]{$gbl}: no exception ok 13096 - delete $vlex[$lex][$lex+1]{$gbl}: value ok 13097 - $vgbl[$lex][$lex+1]{$gbl}: no exception ok 13098 - $vgbl[$lex][$lex+1]{$gbl}: value ok 13099 - $vgbl[$lex][$lex+1]{$gbl} = 123: no exception ok 13100 - $vgbl[$lex][$lex+1]{$gbl} = 123: value ok 13101 - exists $vgbl[$lex][$lex+1]{$gbl}: no exception ok 13102 - exists $vgbl[$lex][$lex+1]{$gbl}: value ok 13103 - delete $vgbl[$lex][$lex+1]{$gbl}: no exception ok 13104 - delete $vgbl[$lex][$lex+1]{$gbl}: value ok 13105 - $vrlex->[$lex][$lex+1]{$gbl}: no exception ok 13106 - $vrlex->[$lex][$lex+1]{$gbl}: value ok 13107 - $vrlex->[$lex][$lex+1]{$gbl} = 123: no exception ok 13108 - $vrlex->[$lex][$lex+1]{$gbl} = 123: value ok 13109 - exists $vrlex->[$lex][$lex+1]{$gbl}: no exception ok 13110 - exists $vrlex->[$lex][$lex+1]{$gbl}: value ok 13111 - delete $vrlex->[$lex][$lex+1]{$gbl}: no exception ok 13112 - delete $vrlex->[$lex][$lex+1]{$gbl}: value ok 13113 - $vrgbl->[$lex][$lex+1]{$gbl}: no exception ok 13114 - $vrgbl->[$lex][$lex+1]{$gbl}: value ok 13115 - $vrgbl->[$lex][$lex+1]{$gbl} = 123: no exception ok 13116 - $vrgbl->[$lex][$lex+1]{$gbl} = 123: value ok 13117 - exists $vrgbl->[$lex][$lex+1]{$gbl}: no exception ok 13118 - exists $vrgbl->[$lex][$lex+1]{$gbl}: value ok 13119 - delete $vrgbl->[$lex][$lex+1]{$gbl}: no exception ok 13120 - delete $vrgbl->[$lex][$lex+1]{$gbl}: value ok 13121 - $vlex[$gbl][$lex+1]{$gbl}: no exception ok 13122 - $vlex[$gbl][$lex+1]{$gbl}: value ok 13123 - $vlex[$gbl][$lex+1]{$gbl} = 123: no exception ok 13124 - $vlex[$gbl][$lex+1]{$gbl} = 123: value ok 13125 - exists $vlex[$gbl][$lex+1]{$gbl}: no exception ok 13126 - exists $vlex[$gbl][$lex+1]{$gbl}: value ok 13127 - delete $vlex[$gbl][$lex+1]{$gbl}: no exception ok 13128 - delete $vlex[$gbl][$lex+1]{$gbl}: value ok 13129 - $vgbl[$gbl][$lex+1]{$gbl}: no exception ok 13130 - $vgbl[$gbl][$lex+1]{$gbl}: value ok 13131 - $vgbl[$gbl][$lex+1]{$gbl} = 123: no exception ok 13132 - $vgbl[$gbl][$lex+1]{$gbl} = 123: value ok 13133 - exists $vgbl[$gbl][$lex+1]{$gbl}: no exception ok 13134 - exists $vgbl[$gbl][$lex+1]{$gbl}: value ok 13135 - delete $vgbl[$gbl][$lex+1]{$gbl}: no exception ok 13136 - delete $vgbl[$gbl][$lex+1]{$gbl}: value ok 13137 - $vrlex->[$gbl][$lex+1]{$gbl}: no exception ok 13138 - $vrlex->[$gbl][$lex+1]{$gbl}: value ok 13139 - $vrlex->[$gbl][$lex+1]{$gbl} = 123: no exception ok 13140 - $vrlex->[$gbl][$lex+1]{$gbl} = 123: value ok 13141 - exists $vrlex->[$gbl][$lex+1]{$gbl}: no exception ok 13142 - exists $vrlex->[$gbl][$lex+1]{$gbl}: value ok 13143 - delete $vrlex->[$gbl][$lex+1]{$gbl}: no exception ok 13144 - delete $vrlex->[$gbl][$lex+1]{$gbl}: value ok 13145 - $vrgbl->[$gbl][$lex+1]{$gbl}: no exception ok 13146 - $vrgbl->[$gbl][$lex+1]{$gbl}: value ok 13147 - $vrgbl->[$gbl][$lex+1]{$gbl} = 123: no exception ok 13148 - $vrgbl->[$gbl][$lex+1]{$gbl} = 123: value ok 13149 - exists $vrgbl->[$gbl][$lex+1]{$gbl}: no exception ok 13150 - exists $vrgbl->[$gbl][$lex+1]{$gbl}: value ok 13151 - delete $vrgbl->[$gbl][$lex+1]{$gbl}: no exception ok 13152 - delete $vrgbl->[$gbl][$lex+1]{$gbl}: value ok 13153 - $vlex[$lex+1][$lex+1]{$gbl}: no exception ok 13154 - $vlex[$lex+1][$lex+1]{$gbl}: value ok 13155 - $vlex[$lex+1][$lex+1]{$gbl} = 123: no exception ok 13156 - $vlex[$lex+1][$lex+1]{$gbl} = 123: value ok 13157 - exists $vlex[$lex+1][$lex+1]{$gbl}: no exception ok 13158 - exists $vlex[$lex+1][$lex+1]{$gbl}: value ok 13159 - delete $vlex[$lex+1][$lex+1]{$gbl}: no exception ok 13160 - delete $vlex[$lex+1][$lex+1]{$gbl}: value ok 13161 - $vgbl[$lex+1][$lex+1]{$gbl}: no exception ok 13162 - $vgbl[$lex+1][$lex+1]{$gbl}: value ok 13163 - $vgbl[$lex+1][$lex+1]{$gbl} = 123: no exception ok 13164 - $vgbl[$lex+1][$lex+1]{$gbl} = 123: value ok 13165 - exists $vgbl[$lex+1][$lex+1]{$gbl}: no exception ok 13166 - exists $vgbl[$lex+1][$lex+1]{$gbl}: value ok 13167 - delete $vgbl[$lex+1][$lex+1]{$gbl}: no exception ok 13168 - delete $vgbl[$lex+1][$lex+1]{$gbl}: value ok 13169 - $vrlex->[$lex+1][$lex+1]{$gbl}: no exception ok 13170 - $vrlex->[$lex+1][$lex+1]{$gbl}: value ok 13171 - $vrlex->[$lex+1][$lex+1]{$gbl} = 123: no exception ok 13172 - $vrlex->[$lex+1][$lex+1]{$gbl} = 123: value ok 13173 - exists $vrlex->[$lex+1][$lex+1]{$gbl}: no exception ok 13174 - exists $vrlex->[$lex+1][$lex+1]{$gbl}: value ok 13175 - delete $vrlex->[$lex+1][$lex+1]{$gbl}: no exception ok 13176 - delete $vrlex->[$lex+1][$lex+1]{$gbl}: value ok 13177 - $vrgbl->[$lex+1][$lex+1]{$gbl}: no exception ok 13178 - $vrgbl->[$lex+1][$lex+1]{$gbl}: value ok 13179 - $vrgbl->[$lex+1][$lex+1]{$gbl} = 123: no exception ok 13180 - $vrgbl->[$lex+1][$lex+1]{$gbl} = 123: value ok 13181 - exists $vrgbl->[$lex+1][$lex+1]{$gbl}: no exception ok 13182 - exists $vrgbl->[$lex+1][$lex+1]{$gbl}: value ok 13183 - delete $vrgbl->[$lex+1][$lex+1]{$gbl}: no exception ok 13184 - delete $vrgbl->[$lex+1][$lex+1]{$gbl}: value ok 13185 - $vlex{foo}[$lex+1]{$gbl}: no exception ok 13186 - $vlex{foo}[$lex+1]{$gbl}: value ok 13187 - $vlex{foo}[$lex+1]{$gbl} = 123: no exception ok 13188 - $vlex{foo}[$lex+1]{$gbl} = 123: value ok 13189 - exists $vlex{foo}[$lex+1]{$gbl}: no exception ok 13190 - exists $vlex{foo}[$lex+1]{$gbl}: value ok 13191 - delete $vlex{foo}[$lex+1]{$gbl}: no exception ok 13192 - delete $vlex{foo}[$lex+1]{$gbl}: value ok 13193 - $vgbl{foo}[$lex+1]{$gbl}: no exception ok 13194 - $vgbl{foo}[$lex+1]{$gbl}: value ok 13195 - $vgbl{foo}[$lex+1]{$gbl} = 123: no exception ok 13196 - $vgbl{foo}[$lex+1]{$gbl} = 123: value ok 13197 - exists $vgbl{foo}[$lex+1]{$gbl}: no exception ok 13198 - exists $vgbl{foo}[$lex+1]{$gbl}: value ok 13199 - delete $vgbl{foo}[$lex+1]{$gbl}: no exception ok 13200 - delete $vgbl{foo}[$lex+1]{$gbl}: value ok 13201 - $vrlex->{foo}[$lex+1]{$gbl}: no exception ok 13202 - $vrlex->{foo}[$lex+1]{$gbl}: value ok 13203 - $vrlex->{foo}[$lex+1]{$gbl} = 123: no exception ok 13204 - $vrlex->{foo}[$lex+1]{$gbl} = 123: value ok 13205 - exists $vrlex->{foo}[$lex+1]{$gbl}: no exception ok 13206 - exists $vrlex->{foo}[$lex+1]{$gbl}: value ok 13207 - delete $vrlex->{foo}[$lex+1]{$gbl}: no exception ok 13208 - delete $vrlex->{foo}[$lex+1]{$gbl}: value ok 13209 - $vrgbl->{foo}[$lex+1]{$gbl}: no exception ok 13210 - $vrgbl->{foo}[$lex+1]{$gbl}: value ok 13211 - $vrgbl->{foo}[$lex+1]{$gbl} = 123: no exception ok 13212 - $vrgbl->{foo}[$lex+1]{$gbl} = 123: value ok 13213 - exists $vrgbl->{foo}[$lex+1]{$gbl}: no exception ok 13214 - exists $vrgbl->{foo}[$lex+1]{$gbl}: value ok 13215 - delete $vrgbl->{foo}[$lex+1]{$gbl}: no exception ok 13216 - delete $vrgbl->{foo}[$lex+1]{$gbl}: value ok 13217 - $vlex{$lex}[$lex+1]{$gbl}: no exception ok 13218 - $vlex{$lex}[$lex+1]{$gbl}: value ok 13219 - $vlex{$lex}[$lex+1]{$gbl} = 123: no exception ok 13220 - $vlex{$lex}[$lex+1]{$gbl} = 123: value ok 13221 - exists $vlex{$lex}[$lex+1]{$gbl}: no exception ok 13222 - exists $vlex{$lex}[$lex+1]{$gbl}: value ok 13223 - delete $vlex{$lex}[$lex+1]{$gbl}: no exception ok 13224 - delete $vlex{$lex}[$lex+1]{$gbl}: value ok 13225 - $vgbl{$lex}[$lex+1]{$gbl}: no exception ok 13226 - $vgbl{$lex}[$lex+1]{$gbl}: value ok 13227 - $vgbl{$lex}[$lex+1]{$gbl} = 123: no exception ok 13228 - $vgbl{$lex}[$lex+1]{$gbl} = 123: value ok 13229 - exists $vgbl{$lex}[$lex+1]{$gbl}: no exception ok 13230 - exists $vgbl{$lex}[$lex+1]{$gbl}: value ok 13231 - delete $vgbl{$lex}[$lex+1]{$gbl}: no exception ok 13232 - delete $vgbl{$lex}[$lex+1]{$gbl}: value ok 13233 - $vrlex->{$lex}[$lex+1]{$gbl}: no exception ok 13234 - $vrlex->{$lex}[$lex+1]{$gbl}: value ok 13235 - $vrlex->{$lex}[$lex+1]{$gbl} = 123: no exception ok 13236 - $vrlex->{$lex}[$lex+1]{$gbl} = 123: value ok 13237 - exists $vrlex->{$lex}[$lex+1]{$gbl}: no exception ok 13238 - exists $vrlex->{$lex}[$lex+1]{$gbl}: value ok 13239 - delete $vrlex->{$lex}[$lex+1]{$gbl}: no exception ok 13240 - delete $vrlex->{$lex}[$lex+1]{$gbl}: value ok 13241 - $vrgbl->{$lex}[$lex+1]{$gbl}: no exception ok 13242 - $vrgbl->{$lex}[$lex+1]{$gbl}: value ok 13243 - $vrgbl->{$lex}[$lex+1]{$gbl} = 123: no exception ok 13244 - $vrgbl->{$lex}[$lex+1]{$gbl} = 123: value ok 13245 - exists $vrgbl->{$lex}[$lex+1]{$gbl}: no exception ok 13246 - exists $vrgbl->{$lex}[$lex+1]{$gbl}: value ok 13247 - delete $vrgbl->{$lex}[$lex+1]{$gbl}: no exception ok 13248 - delete $vrgbl->{$lex}[$lex+1]{$gbl}: value ok 13249 - $vlex{$gbl}[$lex+1]{$gbl}: no exception ok 13250 - $vlex{$gbl}[$lex+1]{$gbl}: value ok 13251 - $vlex{$gbl}[$lex+1]{$gbl} = 123: no exception ok 13252 - $vlex{$gbl}[$lex+1]{$gbl} = 123: value ok 13253 - exists $vlex{$gbl}[$lex+1]{$gbl}: no exception ok 13254 - exists $vlex{$gbl}[$lex+1]{$gbl}: value ok 13255 - delete $vlex{$gbl}[$lex+1]{$gbl}: no exception ok 13256 - delete $vlex{$gbl}[$lex+1]{$gbl}: value ok 13257 - $vgbl{$gbl}[$lex+1]{$gbl}: no exception ok 13258 - $vgbl{$gbl}[$lex+1]{$gbl}: value ok 13259 - $vgbl{$gbl}[$lex+1]{$gbl} = 123: no exception ok 13260 - $vgbl{$gbl}[$lex+1]{$gbl} = 123: value ok 13261 - exists $vgbl{$gbl}[$lex+1]{$gbl}: no exception ok 13262 - exists $vgbl{$gbl}[$lex+1]{$gbl}: value ok 13263 - delete $vgbl{$gbl}[$lex+1]{$gbl}: no exception ok 13264 - delete $vgbl{$gbl}[$lex+1]{$gbl}: value ok 13265 - $vrlex->{$gbl}[$lex+1]{$gbl}: no exception ok 13266 - $vrlex->{$gbl}[$lex+1]{$gbl}: value ok 13267 - $vrlex->{$gbl}[$lex+1]{$gbl} = 123: no exception ok 13268 - $vrlex->{$gbl}[$lex+1]{$gbl} = 123: value ok 13269 - exists $vrlex->{$gbl}[$lex+1]{$gbl}: no exception ok 13270 - exists $vrlex->{$gbl}[$lex+1]{$gbl}: value ok 13271 - delete $vrlex->{$gbl}[$lex+1]{$gbl}: no exception ok 13272 - delete $vrlex->{$gbl}[$lex+1]{$gbl}: value ok 13273 - $vrgbl->{$gbl}[$lex+1]{$gbl}: no exception ok 13274 - $vrgbl->{$gbl}[$lex+1]{$gbl}: value ok 13275 - $vrgbl->{$gbl}[$lex+1]{$gbl} = 123: no exception ok 13276 - $vrgbl->{$gbl}[$lex+1]{$gbl} = 123: value ok 13277 - exists $vrgbl->{$gbl}[$lex+1]{$gbl}: no exception ok 13278 - exists $vrgbl->{$gbl}[$lex+1]{$gbl}: value ok 13279 - delete $vrgbl->{$gbl}[$lex+1]{$gbl}: no exception ok 13280 - delete $vrgbl->{$gbl}[$lex+1]{$gbl}: value ok 13281 - $vlex{"x$lex"}[$lex+1]{$gbl}: no exception ok 13282 - $vlex{"x$lex"}[$lex+1]{$gbl}: value ok 13283 - $vlex{"x$lex"}[$lex+1]{$gbl} = 123: no exception ok 13284 - $vlex{"x$lex"}[$lex+1]{$gbl} = 123: value ok 13285 - exists $vlex{"x$lex"}[$lex+1]{$gbl}: no exception ok 13286 - exists $vlex{"x$lex"}[$lex+1]{$gbl}: value ok 13287 - delete $vlex{"x$lex"}[$lex+1]{$gbl}: no exception ok 13288 - delete $vlex{"x$lex"}[$lex+1]{$gbl}: value ok 13289 - $vgbl{"x$lex"}[$lex+1]{$gbl}: no exception ok 13290 - $vgbl{"x$lex"}[$lex+1]{$gbl}: value ok 13291 - $vgbl{"x$lex"}[$lex+1]{$gbl} = 123: no exception ok 13292 - $vgbl{"x$lex"}[$lex+1]{$gbl} = 123: value ok 13293 - exists $vgbl{"x$lex"}[$lex+1]{$gbl}: no exception ok 13294 - exists $vgbl{"x$lex"}[$lex+1]{$gbl}: value ok 13295 - delete $vgbl{"x$lex"}[$lex+1]{$gbl}: no exception ok 13296 - delete $vgbl{"x$lex"}[$lex+1]{$gbl}: value ok 13297 - $vrlex->{"x$lex"}[$lex+1]{$gbl}: no exception ok 13298 - $vrlex->{"x$lex"}[$lex+1]{$gbl}: value ok 13299 - $vrlex->{"x$lex"}[$lex+1]{$gbl} = 123: no exception ok 13300 - $vrlex->{"x$lex"}[$lex+1]{$gbl} = 123: value ok 13301 - exists $vrlex->{"x$lex"}[$lex+1]{$gbl}: no exception ok 13302 - exists $vrlex->{"x$lex"}[$lex+1]{$gbl}: value ok 13303 - delete $vrlex->{"x$lex"}[$lex+1]{$gbl}: no exception ok 13304 - delete $vrlex->{"x$lex"}[$lex+1]{$gbl}: value ok 13305 - $vrgbl->{"x$lex"}[$lex+1]{$gbl}: no exception ok 13306 - $vrgbl->{"x$lex"}[$lex+1]{$gbl}: value ok 13307 - $vrgbl->{"x$lex"}[$lex+1]{$gbl} = 123: no exception ok 13308 - $vrgbl->{"x$lex"}[$lex+1]{$gbl} = 123: value ok 13309 - exists $vrgbl->{"x$lex"}[$lex+1]{$gbl}: no exception ok 13310 - exists $vrgbl->{"x$lex"}[$lex+1]{$gbl}: value ok 13311 - delete $vrgbl->{"x$lex"}[$lex+1]{$gbl}: no exception ok 13312 - delete $vrgbl->{"x$lex"}[$lex+1]{$gbl}: value ok 13313 - $vlex[0]{foo}{$gbl}: no exception ok 13314 - $vlex[0]{foo}{$gbl}: value ok 13315 - $vlex[0]{foo}{$gbl} = 123: no exception ok 13316 - $vlex[0]{foo}{$gbl} = 123: value ok 13317 - exists $vlex[0]{foo}{$gbl}: no exception ok 13318 - exists $vlex[0]{foo}{$gbl}: value ok 13319 - delete $vlex[0]{foo}{$gbl}: no exception ok 13320 - delete $vlex[0]{foo}{$gbl}: value ok 13321 - $vgbl[0]{foo}{$gbl}: no exception ok 13322 - $vgbl[0]{foo}{$gbl}: value ok 13323 - $vgbl[0]{foo}{$gbl} = 123: no exception ok 13324 - $vgbl[0]{foo}{$gbl} = 123: value ok 13325 - exists $vgbl[0]{foo}{$gbl}: no exception ok 13326 - exists $vgbl[0]{foo}{$gbl}: value ok 13327 - delete $vgbl[0]{foo}{$gbl}: no exception ok 13328 - delete $vgbl[0]{foo}{$gbl}: value ok 13329 - $vrlex->[0]{foo}{$gbl}: no exception ok 13330 - $vrlex->[0]{foo}{$gbl}: value ok 13331 - $vrlex->[0]{foo}{$gbl} = 123: no exception ok 13332 - $vrlex->[0]{foo}{$gbl} = 123: value ok 13333 - exists $vrlex->[0]{foo}{$gbl}: no exception ok 13334 - exists $vrlex->[0]{foo}{$gbl}: value ok 13335 - delete $vrlex->[0]{foo}{$gbl}: no exception ok 13336 - delete $vrlex->[0]{foo}{$gbl}: value ok 13337 - $vrgbl->[0]{foo}{$gbl}: no exception ok 13338 - $vrgbl->[0]{foo}{$gbl}: value ok 13339 - $vrgbl->[0]{foo}{$gbl} = 123: no exception ok 13340 - $vrgbl->[0]{foo}{$gbl} = 123: value ok 13341 - exists $vrgbl->[0]{foo}{$gbl}: no exception ok 13342 - exists $vrgbl->[0]{foo}{$gbl}: value ok 13343 - delete $vrgbl->[0]{foo}{$gbl}: no exception ok 13344 - delete $vrgbl->[0]{foo}{$gbl}: value ok 13345 - $vlex[$lex]{foo}{$gbl}: no exception ok 13346 - $vlex[$lex]{foo}{$gbl}: value ok 13347 - $vlex[$lex]{foo}{$gbl} = 123: no exception ok 13348 - $vlex[$lex]{foo}{$gbl} = 123: value ok 13349 - exists $vlex[$lex]{foo}{$gbl}: no exception ok 13350 - exists $vlex[$lex]{foo}{$gbl}: value ok 13351 - delete $vlex[$lex]{foo}{$gbl}: no exception ok 13352 - delete $vlex[$lex]{foo}{$gbl}: value ok 13353 - $vgbl[$lex]{foo}{$gbl}: no exception ok 13354 - $vgbl[$lex]{foo}{$gbl}: value ok 13355 - $vgbl[$lex]{foo}{$gbl} = 123: no exception ok 13356 - $vgbl[$lex]{foo}{$gbl} = 123: value ok 13357 - exists $vgbl[$lex]{foo}{$gbl}: no exception ok 13358 - exists $vgbl[$lex]{foo}{$gbl}: value ok 13359 - delete $vgbl[$lex]{foo}{$gbl}: no exception ok 13360 - delete $vgbl[$lex]{foo}{$gbl}: value ok 13361 - $vrlex->[$lex]{foo}{$gbl}: no exception ok 13362 - $vrlex->[$lex]{foo}{$gbl}: value ok 13363 - $vrlex->[$lex]{foo}{$gbl} = 123: no exception ok 13364 - $vrlex->[$lex]{foo}{$gbl} = 123: value ok 13365 - exists $vrlex->[$lex]{foo}{$gbl}: no exception ok 13366 - exists $vrlex->[$lex]{foo}{$gbl}: value ok 13367 - delete $vrlex->[$lex]{foo}{$gbl}: no exception ok 13368 - delete $vrlex->[$lex]{foo}{$gbl}: value ok 13369 - $vrgbl->[$lex]{foo}{$gbl}: no exception ok 13370 - $vrgbl->[$lex]{foo}{$gbl}: value ok 13371 - $vrgbl->[$lex]{foo}{$gbl} = 123: no exception ok 13372 - $vrgbl->[$lex]{foo}{$gbl} = 123: value ok 13373 - exists $vrgbl->[$lex]{foo}{$gbl}: no exception ok 13374 - exists $vrgbl->[$lex]{foo}{$gbl}: value ok 13375 - delete $vrgbl->[$lex]{foo}{$gbl}: no exception ok 13376 - delete $vrgbl->[$lex]{foo}{$gbl}: value ok 13377 - $vlex[$gbl]{foo}{$gbl}: no exception ok 13378 - $vlex[$gbl]{foo}{$gbl}: value ok 13379 - $vlex[$gbl]{foo}{$gbl} = 123: no exception ok 13380 - $vlex[$gbl]{foo}{$gbl} = 123: value ok 13381 - exists $vlex[$gbl]{foo}{$gbl}: no exception ok 13382 - exists $vlex[$gbl]{foo}{$gbl}: value ok 13383 - delete $vlex[$gbl]{foo}{$gbl}: no exception ok 13384 - delete $vlex[$gbl]{foo}{$gbl}: value ok 13385 - $vgbl[$gbl]{foo}{$gbl}: no exception ok 13386 - $vgbl[$gbl]{foo}{$gbl}: value ok 13387 - $vgbl[$gbl]{foo}{$gbl} = 123: no exception ok 13388 - $vgbl[$gbl]{foo}{$gbl} = 123: value ok 13389 - exists $vgbl[$gbl]{foo}{$gbl}: no exception ok 13390 - exists $vgbl[$gbl]{foo}{$gbl}: value ok 13391 - delete $vgbl[$gbl]{foo}{$gbl}: no exception ok 13392 - delete $vgbl[$gbl]{foo}{$gbl}: value ok 13393 - $vrlex->[$gbl]{foo}{$gbl}: no exception ok 13394 - $vrlex->[$gbl]{foo}{$gbl}: value ok 13395 - $vrlex->[$gbl]{foo}{$gbl} = 123: no exception ok 13396 - $vrlex->[$gbl]{foo}{$gbl} = 123: value ok 13397 - exists $vrlex->[$gbl]{foo}{$gbl}: no exception ok 13398 - exists $vrlex->[$gbl]{foo}{$gbl}: value ok 13399 - delete $vrlex->[$gbl]{foo}{$gbl}: no exception ok 13400 - delete $vrlex->[$gbl]{foo}{$gbl}: value ok 13401 - $vrgbl->[$gbl]{foo}{$gbl}: no exception ok 13402 - $vrgbl->[$gbl]{foo}{$gbl}: value ok 13403 - $vrgbl->[$gbl]{foo}{$gbl} = 123: no exception ok 13404 - $vrgbl->[$gbl]{foo}{$gbl} = 123: value ok 13405 - exists $vrgbl->[$gbl]{foo}{$gbl}: no exception ok 13406 - exists $vrgbl->[$gbl]{foo}{$gbl}: value ok 13407 - delete $vrgbl->[$gbl]{foo}{$gbl}: no exception ok 13408 - delete $vrgbl->[$gbl]{foo}{$gbl}: value ok 13409 - $vlex[$lex+1]{foo}{$gbl}: no exception ok 13410 - $vlex[$lex+1]{foo}{$gbl}: value ok 13411 - $vlex[$lex+1]{foo}{$gbl} = 123: no exception ok 13412 - $vlex[$lex+1]{foo}{$gbl} = 123: value ok 13413 - exists $vlex[$lex+1]{foo}{$gbl}: no exception ok 13414 - exists $vlex[$lex+1]{foo}{$gbl}: value ok 13415 - delete $vlex[$lex+1]{foo}{$gbl}: no exception ok 13416 - delete $vlex[$lex+1]{foo}{$gbl}: value ok 13417 - $vgbl[$lex+1]{foo}{$gbl}: no exception ok 13418 - $vgbl[$lex+1]{foo}{$gbl}: value ok 13419 - $vgbl[$lex+1]{foo}{$gbl} = 123: no exception ok 13420 - $vgbl[$lex+1]{foo}{$gbl} = 123: value ok 13421 - exists $vgbl[$lex+1]{foo}{$gbl}: no exception ok 13422 - exists $vgbl[$lex+1]{foo}{$gbl}: value ok 13423 - delete $vgbl[$lex+1]{foo}{$gbl}: no exception ok 13424 - delete $vgbl[$lex+1]{foo}{$gbl}: value ok 13425 - $vrlex->[$lex+1]{foo}{$gbl}: no exception ok 13426 - $vrlex->[$lex+1]{foo}{$gbl}: value ok 13427 - $vrlex->[$lex+1]{foo}{$gbl} = 123: no exception ok 13428 - $vrlex->[$lex+1]{foo}{$gbl} = 123: value ok 13429 - exists $vrlex->[$lex+1]{foo}{$gbl}: no exception ok 13430 - exists $vrlex->[$lex+1]{foo}{$gbl}: value ok 13431 - delete $vrlex->[$lex+1]{foo}{$gbl}: no exception ok 13432 - delete $vrlex->[$lex+1]{foo}{$gbl}: value ok 13433 - $vrgbl->[$lex+1]{foo}{$gbl}: no exception ok 13434 - $vrgbl->[$lex+1]{foo}{$gbl}: value ok 13435 - $vrgbl->[$lex+1]{foo}{$gbl} = 123: no exception ok 13436 - $vrgbl->[$lex+1]{foo}{$gbl} = 123: value ok 13437 - exists $vrgbl->[$lex+1]{foo}{$gbl}: no exception ok 13438 - exists $vrgbl->[$lex+1]{foo}{$gbl}: value ok 13439 - delete $vrgbl->[$lex+1]{foo}{$gbl}: no exception ok 13440 - delete $vrgbl->[$lex+1]{foo}{$gbl}: value ok 13441 - $vlex{foo}{foo}{$gbl}: no exception ok 13442 - $vlex{foo}{foo}{$gbl}: value ok 13443 - $vlex{foo}{foo}{$gbl} = 123: no exception ok 13444 - $vlex{foo}{foo}{$gbl} = 123: value ok 13445 - exists $vlex{foo}{foo}{$gbl}: no exception ok 13446 - exists $vlex{foo}{foo}{$gbl}: value ok 13447 - delete $vlex{foo}{foo}{$gbl}: no exception ok 13448 - delete $vlex{foo}{foo}{$gbl}: value ok 13449 - $vgbl{foo}{foo}{$gbl}: no exception ok 13450 - $vgbl{foo}{foo}{$gbl}: value ok 13451 - $vgbl{foo}{foo}{$gbl} = 123: no exception ok 13452 - $vgbl{foo}{foo}{$gbl} = 123: value ok 13453 - exists $vgbl{foo}{foo}{$gbl}: no exception ok 13454 - exists $vgbl{foo}{foo}{$gbl}: value ok 13455 - delete $vgbl{foo}{foo}{$gbl}: no exception ok 13456 - delete $vgbl{foo}{foo}{$gbl}: value ok 13457 - $vrlex->{foo}{foo}{$gbl}: no exception ok 13458 - $vrlex->{foo}{foo}{$gbl}: value ok 13459 - $vrlex->{foo}{foo}{$gbl} = 123: no exception ok 13460 - $vrlex->{foo}{foo}{$gbl} = 123: value ok 13461 - exists $vrlex->{foo}{foo}{$gbl}: no exception ok 13462 - exists $vrlex->{foo}{foo}{$gbl}: value ok 13463 - delete $vrlex->{foo}{foo}{$gbl}: no exception ok 13464 - delete $vrlex->{foo}{foo}{$gbl}: value ok 13465 - $vrgbl->{foo}{foo}{$gbl}: no exception ok 13466 - $vrgbl->{foo}{foo}{$gbl}: value ok 13467 - $vrgbl->{foo}{foo}{$gbl} = 123: no exception ok 13468 - $vrgbl->{foo}{foo}{$gbl} = 123: value ok 13469 - exists $vrgbl->{foo}{foo}{$gbl}: no exception ok 13470 - exists $vrgbl->{foo}{foo}{$gbl}: value ok 13471 - delete $vrgbl->{foo}{foo}{$gbl}: no exception ok 13472 - delete $vrgbl->{foo}{foo}{$gbl}: value ok 13473 - $vlex{$lex}{foo}{$gbl}: no exception ok 13474 - $vlex{$lex}{foo}{$gbl}: value ok 13475 - $vlex{$lex}{foo}{$gbl} = 123: no exception ok 13476 - $vlex{$lex}{foo}{$gbl} = 123: value ok 13477 - exists $vlex{$lex}{foo}{$gbl}: no exception ok 13478 - exists $vlex{$lex}{foo}{$gbl}: value ok 13479 - delete $vlex{$lex}{foo}{$gbl}: no exception ok 13480 - delete $vlex{$lex}{foo}{$gbl}: value ok 13481 - $vgbl{$lex}{foo}{$gbl}: no exception ok 13482 - $vgbl{$lex}{foo}{$gbl}: value ok 13483 - $vgbl{$lex}{foo}{$gbl} = 123: no exception ok 13484 - $vgbl{$lex}{foo}{$gbl} = 123: value ok 13485 - exists $vgbl{$lex}{foo}{$gbl}: no exception ok 13486 - exists $vgbl{$lex}{foo}{$gbl}: value ok 13487 - delete $vgbl{$lex}{foo}{$gbl}: no exception ok 13488 - delete $vgbl{$lex}{foo}{$gbl}: value ok 13489 - $vrlex->{$lex}{foo}{$gbl}: no exception ok 13490 - $vrlex->{$lex}{foo}{$gbl}: value ok 13491 - $vrlex->{$lex}{foo}{$gbl} = 123: no exception ok 13492 - $vrlex->{$lex}{foo}{$gbl} = 123: value ok 13493 - exists $vrlex->{$lex}{foo}{$gbl}: no exception ok 13494 - exists $vrlex->{$lex}{foo}{$gbl}: value ok 13495 - delete $vrlex->{$lex}{foo}{$gbl}: no exception ok 13496 - delete $vrlex->{$lex}{foo}{$gbl}: value ok 13497 - $vrgbl->{$lex}{foo}{$gbl}: no exception ok 13498 - $vrgbl->{$lex}{foo}{$gbl}: value ok 13499 - $vrgbl->{$lex}{foo}{$gbl} = 123: no exception ok 13500 - $vrgbl->{$lex}{foo}{$gbl} = 123: value ok 13501 - exists $vrgbl->{$lex}{foo}{$gbl}: no exception ok 13502 - exists $vrgbl->{$lex}{foo}{$gbl}: value ok 13503 - delete $vrgbl->{$lex}{foo}{$gbl}: no exception ok 13504 - delete $vrgbl->{$lex}{foo}{$gbl}: value ok 13505 - $vlex{$gbl}{foo}{$gbl}: no exception ok 13506 - $vlex{$gbl}{foo}{$gbl}: value ok 13507 - $vlex{$gbl}{foo}{$gbl} = 123: no exception ok 13508 - $vlex{$gbl}{foo}{$gbl} = 123: value ok 13509 - exists $vlex{$gbl}{foo}{$gbl}: no exception ok 13510 - exists $vlex{$gbl}{foo}{$gbl}: value ok 13511 - delete $vlex{$gbl}{foo}{$gbl}: no exception ok 13512 - delete $vlex{$gbl}{foo}{$gbl}: value ok 13513 - $vgbl{$gbl}{foo}{$gbl}: no exception ok 13514 - $vgbl{$gbl}{foo}{$gbl}: value ok 13515 - $vgbl{$gbl}{foo}{$gbl} = 123: no exception ok 13516 - $vgbl{$gbl}{foo}{$gbl} = 123: value ok 13517 - exists $vgbl{$gbl}{foo}{$gbl}: no exception ok 13518 - exists $vgbl{$gbl}{foo}{$gbl}: value ok 13519 - delete $vgbl{$gbl}{foo}{$gbl}: no exception ok 13520 - delete $vgbl{$gbl}{foo}{$gbl}: value ok 13521 - $vrlex->{$gbl}{foo}{$gbl}: no exception ok 13522 - $vrlex->{$gbl}{foo}{$gbl}: value ok 13523 - $vrlex->{$gbl}{foo}{$gbl} = 123: no exception ok 13524 - $vrlex->{$gbl}{foo}{$gbl} = 123: value ok 13525 - exists $vrlex->{$gbl}{foo}{$gbl}: no exception ok 13526 - exists $vrlex->{$gbl}{foo}{$gbl}: value ok 13527 - delete $vrlex->{$gbl}{foo}{$gbl}: no exception ok 13528 - delete $vrlex->{$gbl}{foo}{$gbl}: value ok 13529 - $vrgbl->{$gbl}{foo}{$gbl}: no exception ok 13530 - $vrgbl->{$gbl}{foo}{$gbl}: value ok 13531 - $vrgbl->{$gbl}{foo}{$gbl} = 123: no exception ok 13532 - $vrgbl->{$gbl}{foo}{$gbl} = 123: value ok 13533 - exists $vrgbl->{$gbl}{foo}{$gbl}: no exception ok 13534 - exists $vrgbl->{$gbl}{foo}{$gbl}: value ok 13535 - delete $vrgbl->{$gbl}{foo}{$gbl}: no exception ok 13536 - delete $vrgbl->{$gbl}{foo}{$gbl}: value ok 13537 - $vlex{"x$lex"}{foo}{$gbl}: no exception ok 13538 - $vlex{"x$lex"}{foo}{$gbl}: value ok 13539 - $vlex{"x$lex"}{foo}{$gbl} = 123: no exception ok 13540 - $vlex{"x$lex"}{foo}{$gbl} = 123: value ok 13541 - exists $vlex{"x$lex"}{foo}{$gbl}: no exception ok 13542 - exists $vlex{"x$lex"}{foo}{$gbl}: value ok 13543 - delete $vlex{"x$lex"}{foo}{$gbl}: no exception ok 13544 - delete $vlex{"x$lex"}{foo}{$gbl}: value ok 13545 - $vgbl{"x$lex"}{foo}{$gbl}: no exception ok 13546 - $vgbl{"x$lex"}{foo}{$gbl}: value ok 13547 - $vgbl{"x$lex"}{foo}{$gbl} = 123: no exception ok 13548 - $vgbl{"x$lex"}{foo}{$gbl} = 123: value ok 13549 - exists $vgbl{"x$lex"}{foo}{$gbl}: no exception ok 13550 - exists $vgbl{"x$lex"}{foo}{$gbl}: value ok 13551 - delete $vgbl{"x$lex"}{foo}{$gbl}: no exception ok 13552 - delete $vgbl{"x$lex"}{foo}{$gbl}: value ok 13553 - $vrlex->{"x$lex"}{foo}{$gbl}: no exception ok 13554 - $vrlex->{"x$lex"}{foo}{$gbl}: value ok 13555 - $vrlex->{"x$lex"}{foo}{$gbl} = 123: no exception ok 13556 - $vrlex->{"x$lex"}{foo}{$gbl} = 123: value ok 13557 - exists $vrlex->{"x$lex"}{foo}{$gbl}: no exception ok 13558 - exists $vrlex->{"x$lex"}{foo}{$gbl}: value ok 13559 - delete $vrlex->{"x$lex"}{foo}{$gbl}: no exception ok 13560 - delete $vrlex->{"x$lex"}{foo}{$gbl}: value ok 13561 - $vrgbl->{"x$lex"}{foo}{$gbl}: no exception ok 13562 - $vrgbl->{"x$lex"}{foo}{$gbl}: value ok 13563 - $vrgbl->{"x$lex"}{foo}{$gbl} = 123: no exception ok 13564 - $vrgbl->{"x$lex"}{foo}{$gbl} = 123: value ok 13565 - exists $vrgbl->{"x$lex"}{foo}{$gbl}: no exception ok 13566 - exists $vrgbl->{"x$lex"}{foo}{$gbl}: value ok 13567 - delete $vrgbl->{"x$lex"}{foo}{$gbl}: no exception ok 13568 - delete $vrgbl->{"x$lex"}{foo}{$gbl}: value ok 13569 - $vlex[0]{$lex}{$gbl}: no exception ok 13570 - $vlex[0]{$lex}{$gbl}: value ok 13571 - $vlex[0]{$lex}{$gbl} = 123: no exception ok 13572 - $vlex[0]{$lex}{$gbl} = 123: value ok 13573 - exists $vlex[0]{$lex}{$gbl}: no exception ok 13574 - exists $vlex[0]{$lex}{$gbl}: value ok 13575 - delete $vlex[0]{$lex}{$gbl}: no exception ok 13576 - delete $vlex[0]{$lex}{$gbl}: value ok 13577 - $vgbl[0]{$lex}{$gbl}: no exception ok 13578 - $vgbl[0]{$lex}{$gbl}: value ok 13579 - $vgbl[0]{$lex}{$gbl} = 123: no exception ok 13580 - $vgbl[0]{$lex}{$gbl} = 123: value ok 13581 - exists $vgbl[0]{$lex}{$gbl}: no exception ok 13582 - exists $vgbl[0]{$lex}{$gbl}: value ok 13583 - delete $vgbl[0]{$lex}{$gbl}: no exception ok 13584 - delete $vgbl[0]{$lex}{$gbl}: value ok 13585 - $vrlex->[0]{$lex}{$gbl}: no exception ok 13586 - $vrlex->[0]{$lex}{$gbl}: value ok 13587 - $vrlex->[0]{$lex}{$gbl} = 123: no exception ok 13588 - $vrlex->[0]{$lex}{$gbl} = 123: value ok 13589 - exists $vrlex->[0]{$lex}{$gbl}: no exception ok 13590 - exists $vrlex->[0]{$lex}{$gbl}: value ok 13591 - delete $vrlex->[0]{$lex}{$gbl}: no exception ok 13592 - delete $vrlex->[0]{$lex}{$gbl}: value ok 13593 - $vrgbl->[0]{$lex}{$gbl}: no exception ok 13594 - $vrgbl->[0]{$lex}{$gbl}: value ok 13595 - $vrgbl->[0]{$lex}{$gbl} = 123: no exception ok 13596 - $vrgbl->[0]{$lex}{$gbl} = 123: value ok 13597 - exists $vrgbl->[0]{$lex}{$gbl}: no exception ok 13598 - exists $vrgbl->[0]{$lex}{$gbl}: value ok 13599 - delete $vrgbl->[0]{$lex}{$gbl}: no exception ok 13600 - delete $vrgbl->[0]{$lex}{$gbl}: value ok 13601 - $vlex[$lex]{$lex}{$gbl}: no exception ok 13602 - $vlex[$lex]{$lex}{$gbl}: value ok 13603 - $vlex[$lex]{$lex}{$gbl} = 123: no exception ok 13604 - $vlex[$lex]{$lex}{$gbl} = 123: value ok 13605 - exists $vlex[$lex]{$lex}{$gbl}: no exception ok 13606 - exists $vlex[$lex]{$lex}{$gbl}: value ok 13607 - delete $vlex[$lex]{$lex}{$gbl}: no exception ok 13608 - delete $vlex[$lex]{$lex}{$gbl}: value ok 13609 - $vgbl[$lex]{$lex}{$gbl}: no exception ok 13610 - $vgbl[$lex]{$lex}{$gbl}: value ok 13611 - $vgbl[$lex]{$lex}{$gbl} = 123: no exception ok 13612 - $vgbl[$lex]{$lex}{$gbl} = 123: value ok 13613 - exists $vgbl[$lex]{$lex}{$gbl}: no exception ok 13614 - exists $vgbl[$lex]{$lex}{$gbl}: value ok 13615 - delete $vgbl[$lex]{$lex}{$gbl}: no exception ok 13616 - delete $vgbl[$lex]{$lex}{$gbl}: value ok 13617 - $vrlex->[$lex]{$lex}{$gbl}: no exception ok 13618 - $vrlex->[$lex]{$lex}{$gbl}: value ok 13619 - $vrlex->[$lex]{$lex}{$gbl} = 123: no exception ok 13620 - $vrlex->[$lex]{$lex}{$gbl} = 123: value ok 13621 - exists $vrlex->[$lex]{$lex}{$gbl}: no exception ok 13622 - exists $vrlex->[$lex]{$lex}{$gbl}: value ok 13623 - delete $vrlex->[$lex]{$lex}{$gbl}: no exception ok 13624 - delete $vrlex->[$lex]{$lex}{$gbl}: value ok 13625 - $vrgbl->[$lex]{$lex}{$gbl}: no exception ok 13626 - $vrgbl->[$lex]{$lex}{$gbl}: value ok 13627 - $vrgbl->[$lex]{$lex}{$gbl} = 123: no exception ok 13628 - $vrgbl->[$lex]{$lex}{$gbl} = 123: value ok 13629 - exists $vrgbl->[$lex]{$lex}{$gbl}: no exception ok 13630 - exists $vrgbl->[$lex]{$lex}{$gbl}: value ok 13631 - delete $vrgbl->[$lex]{$lex}{$gbl}: no exception ok 13632 - delete $vrgbl->[$lex]{$lex}{$gbl}: value ok 13633 - $vlex[$gbl]{$lex}{$gbl}: no exception ok 13634 - $vlex[$gbl]{$lex}{$gbl}: value ok 13635 - $vlex[$gbl]{$lex}{$gbl} = 123: no exception ok 13636 - $vlex[$gbl]{$lex}{$gbl} = 123: value ok 13637 - exists $vlex[$gbl]{$lex}{$gbl}: no exception ok 13638 - exists $vlex[$gbl]{$lex}{$gbl}: value ok 13639 - delete $vlex[$gbl]{$lex}{$gbl}: no exception ok 13640 - delete $vlex[$gbl]{$lex}{$gbl}: value ok 13641 - $vgbl[$gbl]{$lex}{$gbl}: no exception ok 13642 - $vgbl[$gbl]{$lex}{$gbl}: value ok 13643 - $vgbl[$gbl]{$lex}{$gbl} = 123: no exception ok 13644 - $vgbl[$gbl]{$lex}{$gbl} = 123: value ok 13645 - exists $vgbl[$gbl]{$lex}{$gbl}: no exception ok 13646 - exists $vgbl[$gbl]{$lex}{$gbl}: value ok 13647 - delete $vgbl[$gbl]{$lex}{$gbl}: no exception ok 13648 - delete $vgbl[$gbl]{$lex}{$gbl}: value ok 13649 - $vrlex->[$gbl]{$lex}{$gbl}: no exception ok 13650 - $vrlex->[$gbl]{$lex}{$gbl}: value ok 13651 - $vrlex->[$gbl]{$lex}{$gbl} = 123: no exception ok 13652 - $vrlex->[$gbl]{$lex}{$gbl} = 123: value ok 13653 - exists $vrlex->[$gbl]{$lex}{$gbl}: no exception ok 13654 - exists $vrlex->[$gbl]{$lex}{$gbl}: value ok 13655 - delete $vrlex->[$gbl]{$lex}{$gbl}: no exception ok 13656 - delete $vrlex->[$gbl]{$lex}{$gbl}: value ok 13657 - $vrgbl->[$gbl]{$lex}{$gbl}: no exception ok 13658 - $vrgbl->[$gbl]{$lex}{$gbl}: value ok 13659 - $vrgbl->[$gbl]{$lex}{$gbl} = 123: no exception ok 13660 - $vrgbl->[$gbl]{$lex}{$gbl} = 123: value ok 13661 - exists $vrgbl->[$gbl]{$lex}{$gbl}: no exception ok 13662 - exists $vrgbl->[$gbl]{$lex}{$gbl}: value ok 13663 - delete $vrgbl->[$gbl]{$lex}{$gbl}: no exception ok 13664 - delete $vrgbl->[$gbl]{$lex}{$gbl}: value ok 13665 - $vlex[$lex+1]{$lex}{$gbl}: no exception ok 13666 - $vlex[$lex+1]{$lex}{$gbl}: value ok 13667 - $vlex[$lex+1]{$lex}{$gbl} = 123: no exception ok 13668 - $vlex[$lex+1]{$lex}{$gbl} = 123: value ok 13669 - exists $vlex[$lex+1]{$lex}{$gbl}: no exception ok 13670 - exists $vlex[$lex+1]{$lex}{$gbl}: value ok 13671 - delete $vlex[$lex+1]{$lex}{$gbl}: no exception ok 13672 - delete $vlex[$lex+1]{$lex}{$gbl}: value ok 13673 - $vgbl[$lex+1]{$lex}{$gbl}: no exception ok 13674 - $vgbl[$lex+1]{$lex}{$gbl}: value ok 13675 - $vgbl[$lex+1]{$lex}{$gbl} = 123: no exception ok 13676 - $vgbl[$lex+1]{$lex}{$gbl} = 123: value ok 13677 - exists $vgbl[$lex+1]{$lex}{$gbl}: no exception ok 13678 - exists $vgbl[$lex+1]{$lex}{$gbl}: value ok 13679 - delete $vgbl[$lex+1]{$lex}{$gbl}: no exception ok 13680 - delete $vgbl[$lex+1]{$lex}{$gbl}: value ok 13681 - $vrlex->[$lex+1]{$lex}{$gbl}: no exception ok 13682 - $vrlex->[$lex+1]{$lex}{$gbl}: value ok 13683 - $vrlex->[$lex+1]{$lex}{$gbl} = 123: no exception ok 13684 - $vrlex->[$lex+1]{$lex}{$gbl} = 123: value ok 13685 - exists $vrlex->[$lex+1]{$lex}{$gbl}: no exception ok 13686 - exists $vrlex->[$lex+1]{$lex}{$gbl}: value ok 13687 - delete $vrlex->[$lex+1]{$lex}{$gbl}: no exception ok 13688 - delete $vrlex->[$lex+1]{$lex}{$gbl}: value ok 13689 - $vrgbl->[$lex+1]{$lex}{$gbl}: no exception ok 13690 - $vrgbl->[$lex+1]{$lex}{$gbl}: value ok 13691 - $vrgbl->[$lex+1]{$lex}{$gbl} = 123: no exception ok 13692 - $vrgbl->[$lex+1]{$lex}{$gbl} = 123: value ok 13693 - exists $vrgbl->[$lex+1]{$lex}{$gbl}: no exception ok 13694 - exists $vrgbl->[$lex+1]{$lex}{$gbl}: value ok 13695 - delete $vrgbl->[$lex+1]{$lex}{$gbl}: no exception ok 13696 - delete $vrgbl->[$lex+1]{$lex}{$gbl}: value ok 13697 - $vlex{foo}{$lex}{$gbl}: no exception ok 13698 - $vlex{foo}{$lex}{$gbl}: value ok 13699 - $vlex{foo}{$lex}{$gbl} = 123: no exception ok 13700 - $vlex{foo}{$lex}{$gbl} = 123: value ok 13701 - exists $vlex{foo}{$lex}{$gbl}: no exception ok 13702 - exists $vlex{foo}{$lex}{$gbl}: value ok 13703 - delete $vlex{foo}{$lex}{$gbl}: no exception ok 13704 - delete $vlex{foo}{$lex}{$gbl}: value ok 13705 - $vgbl{foo}{$lex}{$gbl}: no exception ok 13706 - $vgbl{foo}{$lex}{$gbl}: value ok 13707 - $vgbl{foo}{$lex}{$gbl} = 123: no exception ok 13708 - $vgbl{foo}{$lex}{$gbl} = 123: value ok 13709 - exists $vgbl{foo}{$lex}{$gbl}: no exception ok 13710 - exists $vgbl{foo}{$lex}{$gbl}: value ok 13711 - delete $vgbl{foo}{$lex}{$gbl}: no exception ok 13712 - delete $vgbl{foo}{$lex}{$gbl}: value ok 13713 - $vrlex->{foo}{$lex}{$gbl}: no exception ok 13714 - $vrlex->{foo}{$lex}{$gbl}: value ok 13715 - $vrlex->{foo}{$lex}{$gbl} = 123: no exception ok 13716 - $vrlex->{foo}{$lex}{$gbl} = 123: value ok 13717 - exists $vrlex->{foo}{$lex}{$gbl}: no exception ok 13718 - exists $vrlex->{foo}{$lex}{$gbl}: value ok 13719 - delete $vrlex->{foo}{$lex}{$gbl}: no exception ok 13720 - delete $vrlex->{foo}{$lex}{$gbl}: value ok 13721 - $vrgbl->{foo}{$lex}{$gbl}: no exception ok 13722 - $vrgbl->{foo}{$lex}{$gbl}: value ok 13723 - $vrgbl->{foo}{$lex}{$gbl} = 123: no exception ok 13724 - $vrgbl->{foo}{$lex}{$gbl} = 123: value ok 13725 - exists $vrgbl->{foo}{$lex}{$gbl}: no exception ok 13726 - exists $vrgbl->{foo}{$lex}{$gbl}: value ok 13727 - delete $vrgbl->{foo}{$lex}{$gbl}: no exception ok 13728 - delete $vrgbl->{foo}{$lex}{$gbl}: value ok 13729 - $vlex{$lex}{$lex}{$gbl}: no exception ok 13730 - $vlex{$lex}{$lex}{$gbl}: value ok 13731 - $vlex{$lex}{$lex}{$gbl} = 123: no exception ok 13732 - $vlex{$lex}{$lex}{$gbl} = 123: value ok 13733 - exists $vlex{$lex}{$lex}{$gbl}: no exception ok 13734 - exists $vlex{$lex}{$lex}{$gbl}: value ok 13735 - delete $vlex{$lex}{$lex}{$gbl}: no exception ok 13736 - delete $vlex{$lex}{$lex}{$gbl}: value ok 13737 - $vgbl{$lex}{$lex}{$gbl}: no exception ok 13738 - $vgbl{$lex}{$lex}{$gbl}: value ok 13739 - $vgbl{$lex}{$lex}{$gbl} = 123: no exception ok 13740 - $vgbl{$lex}{$lex}{$gbl} = 123: value ok 13741 - exists $vgbl{$lex}{$lex}{$gbl}: no exception ok 13742 - exists $vgbl{$lex}{$lex}{$gbl}: value ok 13743 - delete $vgbl{$lex}{$lex}{$gbl}: no exception ok 13744 - delete $vgbl{$lex}{$lex}{$gbl}: value ok 13745 - $vrlex->{$lex}{$lex}{$gbl}: no exception ok 13746 - $vrlex->{$lex}{$lex}{$gbl}: value ok 13747 - $vrlex->{$lex}{$lex}{$gbl} = 123: no exception ok 13748 - $vrlex->{$lex}{$lex}{$gbl} = 123: value ok 13749 - exists $vrlex->{$lex}{$lex}{$gbl}: no exception ok 13750 - exists $vrlex->{$lex}{$lex}{$gbl}: value ok 13751 - delete $vrlex->{$lex}{$lex}{$gbl}: no exception ok 13752 - delete $vrlex->{$lex}{$lex}{$gbl}: value ok 13753 - $vrgbl->{$lex}{$lex}{$gbl}: no exception ok 13754 - $vrgbl->{$lex}{$lex}{$gbl}: value ok 13755 - $vrgbl->{$lex}{$lex}{$gbl} = 123: no exception ok 13756 - $vrgbl->{$lex}{$lex}{$gbl} = 123: value ok 13757 - exists $vrgbl->{$lex}{$lex}{$gbl}: no exception ok 13758 - exists $vrgbl->{$lex}{$lex}{$gbl}: value ok 13759 - delete $vrgbl->{$lex}{$lex}{$gbl}: no exception ok 13760 - delete $vrgbl->{$lex}{$lex}{$gbl}: value ok 13761 - $vlex{$gbl}{$lex}{$gbl}: no exception ok 13762 - $vlex{$gbl}{$lex}{$gbl}: value ok 13763 - $vlex{$gbl}{$lex}{$gbl} = 123: no exception ok 13764 - $vlex{$gbl}{$lex}{$gbl} = 123: value ok 13765 - exists $vlex{$gbl}{$lex}{$gbl}: no exception ok 13766 - exists $vlex{$gbl}{$lex}{$gbl}: value ok 13767 - delete $vlex{$gbl}{$lex}{$gbl}: no exception ok 13768 - delete $vlex{$gbl}{$lex}{$gbl}: value ok 13769 - $vgbl{$gbl}{$lex}{$gbl}: no exception ok 13770 - $vgbl{$gbl}{$lex}{$gbl}: value ok 13771 - $vgbl{$gbl}{$lex}{$gbl} = 123: no exception ok 13772 - $vgbl{$gbl}{$lex}{$gbl} = 123: value ok 13773 - exists $vgbl{$gbl}{$lex}{$gbl}: no exception ok 13774 - exists $vgbl{$gbl}{$lex}{$gbl}: value ok 13775 - delete $vgbl{$gbl}{$lex}{$gbl}: no exception ok 13776 - delete $vgbl{$gbl}{$lex}{$gbl}: value ok 13777 - $vrlex->{$gbl}{$lex}{$gbl}: no exception ok 13778 - $vrlex->{$gbl}{$lex}{$gbl}: value ok 13779 - $vrlex->{$gbl}{$lex}{$gbl} = 123: no exception ok 13780 - $vrlex->{$gbl}{$lex}{$gbl} = 123: value ok 13781 - exists $vrlex->{$gbl}{$lex}{$gbl}: no exception ok 13782 - exists $vrlex->{$gbl}{$lex}{$gbl}: value ok 13783 - delete $vrlex->{$gbl}{$lex}{$gbl}: no exception ok 13784 - delete $vrlex->{$gbl}{$lex}{$gbl}: value ok 13785 - $vrgbl->{$gbl}{$lex}{$gbl}: no exception ok 13786 - $vrgbl->{$gbl}{$lex}{$gbl}: value ok 13787 - $vrgbl->{$gbl}{$lex}{$gbl} = 123: no exception ok 13788 - $vrgbl->{$gbl}{$lex}{$gbl} = 123: value ok 13789 - exists $vrgbl->{$gbl}{$lex}{$gbl}: no exception ok 13790 - exists $vrgbl->{$gbl}{$lex}{$gbl}: value ok 13791 - delete $vrgbl->{$gbl}{$lex}{$gbl}: no exception ok 13792 - delete $vrgbl->{$gbl}{$lex}{$gbl}: value ok 13793 - $vlex{"x$lex"}{$lex}{$gbl}: no exception ok 13794 - $vlex{"x$lex"}{$lex}{$gbl}: value ok 13795 - $vlex{"x$lex"}{$lex}{$gbl} = 123: no exception ok 13796 - $vlex{"x$lex"}{$lex}{$gbl} = 123: value ok 13797 - exists $vlex{"x$lex"}{$lex}{$gbl}: no exception ok 13798 - exists $vlex{"x$lex"}{$lex}{$gbl}: value ok 13799 - delete $vlex{"x$lex"}{$lex}{$gbl}: no exception ok 13800 - delete $vlex{"x$lex"}{$lex}{$gbl}: value ok 13801 - $vgbl{"x$lex"}{$lex}{$gbl}: no exception ok 13802 - $vgbl{"x$lex"}{$lex}{$gbl}: value ok 13803 - $vgbl{"x$lex"}{$lex}{$gbl} = 123: no exception ok 13804 - $vgbl{"x$lex"}{$lex}{$gbl} = 123: value ok 13805 - exists $vgbl{"x$lex"}{$lex}{$gbl}: no exception ok 13806 - exists $vgbl{"x$lex"}{$lex}{$gbl}: value ok 13807 - delete $vgbl{"x$lex"}{$lex}{$gbl}: no exception ok 13808 - delete $vgbl{"x$lex"}{$lex}{$gbl}: value ok 13809 - $vrlex->{"x$lex"}{$lex}{$gbl}: no exception ok 13810 - $vrlex->{"x$lex"}{$lex}{$gbl}: value ok 13811 - $vrlex->{"x$lex"}{$lex}{$gbl} = 123: no exception ok 13812 - $vrlex->{"x$lex"}{$lex}{$gbl} = 123: value ok 13813 - exists $vrlex->{"x$lex"}{$lex}{$gbl}: no exception ok 13814 - exists $vrlex->{"x$lex"}{$lex}{$gbl}: value ok 13815 - delete $vrlex->{"x$lex"}{$lex}{$gbl}: no exception ok 13816 - delete $vrlex->{"x$lex"}{$lex}{$gbl}: value ok 13817 - $vrgbl->{"x$lex"}{$lex}{$gbl}: no exception ok 13818 - $vrgbl->{"x$lex"}{$lex}{$gbl}: value ok 13819 - $vrgbl->{"x$lex"}{$lex}{$gbl} = 123: no exception ok 13820 - $vrgbl->{"x$lex"}{$lex}{$gbl} = 123: value ok 13821 - exists $vrgbl->{"x$lex"}{$lex}{$gbl}: no exception ok 13822 - exists $vrgbl->{"x$lex"}{$lex}{$gbl}: value ok 13823 - delete $vrgbl->{"x$lex"}{$lex}{$gbl}: no exception ok 13824 - delete $vrgbl->{"x$lex"}{$lex}{$gbl}: value ok 13825 - $vlex[0]{$gbl}{$gbl}: no exception ok 13826 - $vlex[0]{$gbl}{$gbl}: value ok 13827 - $vlex[0]{$gbl}{$gbl} = 123: no exception ok 13828 - $vlex[0]{$gbl}{$gbl} = 123: value ok 13829 - exists $vlex[0]{$gbl}{$gbl}: no exception ok 13830 - exists $vlex[0]{$gbl}{$gbl}: value ok 13831 - delete $vlex[0]{$gbl}{$gbl}: no exception ok 13832 - delete $vlex[0]{$gbl}{$gbl}: value ok 13833 - $vgbl[0]{$gbl}{$gbl}: no exception ok 13834 - $vgbl[0]{$gbl}{$gbl}: value ok 13835 - $vgbl[0]{$gbl}{$gbl} = 123: no exception ok 13836 - $vgbl[0]{$gbl}{$gbl} = 123: value ok 13837 - exists $vgbl[0]{$gbl}{$gbl}: no exception ok 13838 - exists $vgbl[0]{$gbl}{$gbl}: value ok 13839 - delete $vgbl[0]{$gbl}{$gbl}: no exception ok 13840 - delete $vgbl[0]{$gbl}{$gbl}: value ok 13841 - $vrlex->[0]{$gbl}{$gbl}: no exception ok 13842 - $vrlex->[0]{$gbl}{$gbl}: value ok 13843 - $vrlex->[0]{$gbl}{$gbl} = 123: no exception ok 13844 - $vrlex->[0]{$gbl}{$gbl} = 123: value ok 13845 - exists $vrlex->[0]{$gbl}{$gbl}: no exception ok 13846 - exists $vrlex->[0]{$gbl}{$gbl}: value ok 13847 - delete $vrlex->[0]{$gbl}{$gbl}: no exception ok 13848 - delete $vrlex->[0]{$gbl}{$gbl}: value ok 13849 - $vrgbl->[0]{$gbl}{$gbl}: no exception ok 13850 - $vrgbl->[0]{$gbl}{$gbl}: value ok 13851 - $vrgbl->[0]{$gbl}{$gbl} = 123: no exception ok 13852 - $vrgbl->[0]{$gbl}{$gbl} = 123: value ok 13853 - exists $vrgbl->[0]{$gbl}{$gbl}: no exception ok 13854 - exists $vrgbl->[0]{$gbl}{$gbl}: value ok 13855 - delete $vrgbl->[0]{$gbl}{$gbl}: no exception ok 13856 - delete $vrgbl->[0]{$gbl}{$gbl}: value ok 13857 - $vlex[$lex]{$gbl}{$gbl}: no exception ok 13858 - $vlex[$lex]{$gbl}{$gbl}: value ok 13859 - $vlex[$lex]{$gbl}{$gbl} = 123: no exception ok 13860 - $vlex[$lex]{$gbl}{$gbl} = 123: value ok 13861 - exists $vlex[$lex]{$gbl}{$gbl}: no exception ok 13862 - exists $vlex[$lex]{$gbl}{$gbl}: value ok 13863 - delete $vlex[$lex]{$gbl}{$gbl}: no exception ok 13864 - delete $vlex[$lex]{$gbl}{$gbl}: value ok 13865 - $vgbl[$lex]{$gbl}{$gbl}: no exception ok 13866 - $vgbl[$lex]{$gbl}{$gbl}: value ok 13867 - $vgbl[$lex]{$gbl}{$gbl} = 123: no exception ok 13868 - $vgbl[$lex]{$gbl}{$gbl} = 123: value ok 13869 - exists $vgbl[$lex]{$gbl}{$gbl}: no exception ok 13870 - exists $vgbl[$lex]{$gbl}{$gbl}: value ok 13871 - delete $vgbl[$lex]{$gbl}{$gbl}: no exception ok 13872 - delete $vgbl[$lex]{$gbl}{$gbl}: value ok 13873 - $vrlex->[$lex]{$gbl}{$gbl}: no exception ok 13874 - $vrlex->[$lex]{$gbl}{$gbl}: value ok 13875 - $vrlex->[$lex]{$gbl}{$gbl} = 123: no exception ok 13876 - $vrlex->[$lex]{$gbl}{$gbl} = 123: value ok 13877 - exists $vrlex->[$lex]{$gbl}{$gbl}: no exception ok 13878 - exists $vrlex->[$lex]{$gbl}{$gbl}: value ok 13879 - delete $vrlex->[$lex]{$gbl}{$gbl}: no exception ok 13880 - delete $vrlex->[$lex]{$gbl}{$gbl}: value ok 13881 - $vrgbl->[$lex]{$gbl}{$gbl}: no exception ok 13882 - $vrgbl->[$lex]{$gbl}{$gbl}: value ok 13883 - $vrgbl->[$lex]{$gbl}{$gbl} = 123: no exception ok 13884 - $vrgbl->[$lex]{$gbl}{$gbl} = 123: value ok 13885 - exists $vrgbl->[$lex]{$gbl}{$gbl}: no exception ok 13886 - exists $vrgbl->[$lex]{$gbl}{$gbl}: value ok 13887 - delete $vrgbl->[$lex]{$gbl}{$gbl}: no exception ok 13888 - delete $vrgbl->[$lex]{$gbl}{$gbl}: value ok 13889 - $vlex[$gbl]{$gbl}{$gbl}: no exception ok 13890 - $vlex[$gbl]{$gbl}{$gbl}: value ok 13891 - $vlex[$gbl]{$gbl}{$gbl} = 123: no exception ok 13892 - $vlex[$gbl]{$gbl}{$gbl} = 123: value ok 13893 - exists $vlex[$gbl]{$gbl}{$gbl}: no exception ok 13894 - exists $vlex[$gbl]{$gbl}{$gbl}: value ok 13895 - delete $vlex[$gbl]{$gbl}{$gbl}: no exception ok 13896 - delete $vlex[$gbl]{$gbl}{$gbl}: value ok 13897 - $vgbl[$gbl]{$gbl}{$gbl}: no exception ok 13898 - $vgbl[$gbl]{$gbl}{$gbl}: value ok 13899 - $vgbl[$gbl]{$gbl}{$gbl} = 123: no exception ok 13900 - $vgbl[$gbl]{$gbl}{$gbl} = 123: value ok 13901 - exists $vgbl[$gbl]{$gbl}{$gbl}: no exception ok 13902 - exists $vgbl[$gbl]{$gbl}{$gbl}: value ok 13903 - delete $vgbl[$gbl]{$gbl}{$gbl}: no exception ok 13904 - delete $vgbl[$gbl]{$gbl}{$gbl}: value ok 13905 - $vrlex->[$gbl]{$gbl}{$gbl}: no exception ok 13906 - $vrlex->[$gbl]{$gbl}{$gbl}: value ok 13907 - $vrlex->[$gbl]{$gbl}{$gbl} = 123: no exception ok 13908 - $vrlex->[$gbl]{$gbl}{$gbl} = 123: value ok 13909 - exists $vrlex->[$gbl]{$gbl}{$gbl}: no exception ok 13910 - exists $vrlex->[$gbl]{$gbl}{$gbl}: value ok 13911 - delete $vrlex->[$gbl]{$gbl}{$gbl}: no exception ok 13912 - delete $vrlex->[$gbl]{$gbl}{$gbl}: value ok 13913 - $vrgbl->[$gbl]{$gbl}{$gbl}: no exception ok 13914 - $vrgbl->[$gbl]{$gbl}{$gbl}: value ok 13915 - $vrgbl->[$gbl]{$gbl}{$gbl} = 123: no exception ok 13916 - $vrgbl->[$gbl]{$gbl}{$gbl} = 123: value ok 13917 - exists $vrgbl->[$gbl]{$gbl}{$gbl}: no exception ok 13918 - exists $vrgbl->[$gbl]{$gbl}{$gbl}: value ok 13919 - delete $vrgbl->[$gbl]{$gbl}{$gbl}: no exception ok 13920 - delete $vrgbl->[$gbl]{$gbl}{$gbl}: value ok 13921 - $vlex[$lex+1]{$gbl}{$gbl}: no exception ok 13922 - $vlex[$lex+1]{$gbl}{$gbl}: value ok 13923 - $vlex[$lex+1]{$gbl}{$gbl} = 123: no exception ok 13924 - $vlex[$lex+1]{$gbl}{$gbl} = 123: value ok 13925 - exists $vlex[$lex+1]{$gbl}{$gbl}: no exception ok 13926 - exists $vlex[$lex+1]{$gbl}{$gbl}: value ok 13927 - delete $vlex[$lex+1]{$gbl}{$gbl}: no exception ok 13928 - delete $vlex[$lex+1]{$gbl}{$gbl}: value ok 13929 - $vgbl[$lex+1]{$gbl}{$gbl}: no exception ok 13930 - $vgbl[$lex+1]{$gbl}{$gbl}: value ok 13931 - $vgbl[$lex+1]{$gbl}{$gbl} = 123: no exception ok 13932 - $vgbl[$lex+1]{$gbl}{$gbl} = 123: value ok 13933 - exists $vgbl[$lex+1]{$gbl}{$gbl}: no exception ok 13934 - exists $vgbl[$lex+1]{$gbl}{$gbl}: value ok 13935 - delete $vgbl[$lex+1]{$gbl}{$gbl}: no exception ok 13936 - delete $vgbl[$lex+1]{$gbl}{$gbl}: value ok 13937 - $vrlex->[$lex+1]{$gbl}{$gbl}: no exception ok 13938 - $vrlex->[$lex+1]{$gbl}{$gbl}: value ok 13939 - $vrlex->[$lex+1]{$gbl}{$gbl} = 123: no exception ok 13940 - $vrlex->[$lex+1]{$gbl}{$gbl} = 123: value ok 13941 - exists $vrlex->[$lex+1]{$gbl}{$gbl}: no exception ok 13942 - exists $vrlex->[$lex+1]{$gbl}{$gbl}: value ok 13943 - delete $vrlex->[$lex+1]{$gbl}{$gbl}: no exception ok 13944 - delete $vrlex->[$lex+1]{$gbl}{$gbl}: value ok 13945 - $vrgbl->[$lex+1]{$gbl}{$gbl}: no exception ok 13946 - $vrgbl->[$lex+1]{$gbl}{$gbl}: value ok 13947 - $vrgbl->[$lex+1]{$gbl}{$gbl} = 123: no exception ok 13948 - $vrgbl->[$lex+1]{$gbl}{$gbl} = 123: value ok 13949 - exists $vrgbl->[$lex+1]{$gbl}{$gbl}: no exception ok 13950 - exists $vrgbl->[$lex+1]{$gbl}{$gbl}: value ok 13951 - delete $vrgbl->[$lex+1]{$gbl}{$gbl}: no exception ok 13952 - delete $vrgbl->[$lex+1]{$gbl}{$gbl}: value ok 13953 - $vlex{foo}{$gbl}{$gbl}: no exception ok 13954 - $vlex{foo}{$gbl}{$gbl}: value ok 13955 - $vlex{foo}{$gbl}{$gbl} = 123: no exception ok 13956 - $vlex{foo}{$gbl}{$gbl} = 123: value ok 13957 - exists $vlex{foo}{$gbl}{$gbl}: no exception ok 13958 - exists $vlex{foo}{$gbl}{$gbl}: value ok 13959 - delete $vlex{foo}{$gbl}{$gbl}: no exception ok 13960 - delete $vlex{foo}{$gbl}{$gbl}: value ok 13961 - $vgbl{foo}{$gbl}{$gbl}: no exception ok 13962 - $vgbl{foo}{$gbl}{$gbl}: value ok 13963 - $vgbl{foo}{$gbl}{$gbl} = 123: no exception ok 13964 - $vgbl{foo}{$gbl}{$gbl} = 123: value ok 13965 - exists $vgbl{foo}{$gbl}{$gbl}: no exception ok 13966 - exists $vgbl{foo}{$gbl}{$gbl}: value ok 13967 - delete $vgbl{foo}{$gbl}{$gbl}: no exception ok 13968 - delete $vgbl{foo}{$gbl}{$gbl}: value ok 13969 - $vrlex->{foo}{$gbl}{$gbl}: no exception ok 13970 - $vrlex->{foo}{$gbl}{$gbl}: value ok 13971 - $vrlex->{foo}{$gbl}{$gbl} = 123: no exception ok 13972 - $vrlex->{foo}{$gbl}{$gbl} = 123: value ok 13973 - exists $vrlex->{foo}{$gbl}{$gbl}: no exception ok 13974 - exists $vrlex->{foo}{$gbl}{$gbl}: value ok 13975 - delete $vrlex->{foo}{$gbl}{$gbl}: no exception ok 13976 - delete $vrlex->{foo}{$gbl}{$gbl}: value ok 13977 - $vrgbl->{foo}{$gbl}{$gbl}: no exception ok 13978 - $vrgbl->{foo}{$gbl}{$gbl}: value ok 13979 - $vrgbl->{foo}{$gbl}{$gbl} = 123: no exception ok 13980 - $vrgbl->{foo}{$gbl}{$gbl} = 123: value ok 13981 - exists $vrgbl->{foo}{$gbl}{$gbl}: no exception ok 13982 - exists $vrgbl->{foo}{$gbl}{$gbl}: value ok 13983 - delete $vrgbl->{foo}{$gbl}{$gbl}: no exception ok 13984 - delete $vrgbl->{foo}{$gbl}{$gbl}: value ok 13985 - $vlex{$lex}{$gbl}{$gbl}: no exception ok 13986 - $vlex{$lex}{$gbl}{$gbl}: value ok 13987 - $vlex{$lex}{$gbl}{$gbl} = 123: no exception ok 13988 - $vlex{$lex}{$gbl}{$gbl} = 123: value ok 13989 - exists $vlex{$lex}{$gbl}{$gbl}: no exception ok 13990 - exists $vlex{$lex}{$gbl}{$gbl}: value ok 13991 - delete $vlex{$lex}{$gbl}{$gbl}: no exception ok 13992 - delete $vlex{$lex}{$gbl}{$gbl}: value ok 13993 - $vgbl{$lex}{$gbl}{$gbl}: no exception ok 13994 - $vgbl{$lex}{$gbl}{$gbl}: value ok 13995 - $vgbl{$lex}{$gbl}{$gbl} = 123: no exception ok 13996 - $vgbl{$lex}{$gbl}{$gbl} = 123: value ok 13997 - exists $vgbl{$lex}{$gbl}{$gbl}: no exception ok 13998 - exists $vgbl{$lex}{$gbl}{$gbl}: value ok 13999 - delete $vgbl{$lex}{$gbl}{$gbl}: no exception ok 14000 - delete $vgbl{$lex}{$gbl}{$gbl}: value ok 14001 - $vrlex->{$lex}{$gbl}{$gbl}: no exception ok 14002 - $vrlex->{$lex}{$gbl}{$gbl}: value ok 14003 - $vrlex->{$lex}{$gbl}{$gbl} = 123: no exception ok 14004 - $vrlex->{$lex}{$gbl}{$gbl} = 123: value ok 14005 - exists $vrlex->{$lex}{$gbl}{$gbl}: no exception ok 14006 - exists $vrlex->{$lex}{$gbl}{$gbl}: value ok 14007 - delete $vrlex->{$lex}{$gbl}{$gbl}: no exception ok 14008 - delete $vrlex->{$lex}{$gbl}{$gbl}: value ok 14009 - $vrgbl->{$lex}{$gbl}{$gbl}: no exception ok 14010 - $vrgbl->{$lex}{$gbl}{$gbl}: value ok 14011 - $vrgbl->{$lex}{$gbl}{$gbl} = 123: no exception ok 14012 - $vrgbl->{$lex}{$gbl}{$gbl} = 123: value ok 14013 - exists $vrgbl->{$lex}{$gbl}{$gbl}: no exception ok 14014 - exists $vrgbl->{$lex}{$gbl}{$gbl}: value ok 14015 - delete $vrgbl->{$lex}{$gbl}{$gbl}: no exception ok 14016 - delete $vrgbl->{$lex}{$gbl}{$gbl}: value ok 14017 - $vlex{$gbl}{$gbl}{$gbl}: no exception ok 14018 - $vlex{$gbl}{$gbl}{$gbl}: value ok 14019 - $vlex{$gbl}{$gbl}{$gbl} = 123: no exception ok 14020 - $vlex{$gbl}{$gbl}{$gbl} = 123: value ok 14021 - exists $vlex{$gbl}{$gbl}{$gbl}: no exception ok 14022 - exists $vlex{$gbl}{$gbl}{$gbl}: value ok 14023 - delete $vlex{$gbl}{$gbl}{$gbl}: no exception ok 14024 - delete $vlex{$gbl}{$gbl}{$gbl}: value ok 14025 - $vgbl{$gbl}{$gbl}{$gbl}: no exception ok 14026 - $vgbl{$gbl}{$gbl}{$gbl}: value ok 14027 - $vgbl{$gbl}{$gbl}{$gbl} = 123: no exception ok 14028 - $vgbl{$gbl}{$gbl}{$gbl} = 123: value ok 14029 - exists $vgbl{$gbl}{$gbl}{$gbl}: no exception ok 14030 - exists $vgbl{$gbl}{$gbl}{$gbl}: value ok 14031 - delete $vgbl{$gbl}{$gbl}{$gbl}: no exception ok 14032 - delete $vgbl{$gbl}{$gbl}{$gbl}: value ok 14033 - $vrlex->{$gbl}{$gbl}{$gbl}: no exception ok 14034 - $vrlex->{$gbl}{$gbl}{$gbl}: value ok 14035 - $vrlex->{$gbl}{$gbl}{$gbl} = 123: no exception ok 14036 - $vrlex->{$gbl}{$gbl}{$gbl} = 123: value ok 14037 - exists $vrlex->{$gbl}{$gbl}{$gbl}: no exception ok 14038 - exists $vrlex->{$gbl}{$gbl}{$gbl}: value ok 14039 - delete $vrlex->{$gbl}{$gbl}{$gbl}: no exception ok 14040 - delete $vrlex->{$gbl}{$gbl}{$gbl}: value ok 14041 - $vrgbl->{$gbl}{$gbl}{$gbl}: no exception ok 14042 - $vrgbl->{$gbl}{$gbl}{$gbl}: value ok 14043 - $vrgbl->{$gbl}{$gbl}{$gbl} = 123: no exception ok 14044 - $vrgbl->{$gbl}{$gbl}{$gbl} = 123: value ok 14045 - exists $vrgbl->{$gbl}{$gbl}{$gbl}: no exception ok 14046 - exists $vrgbl->{$gbl}{$gbl}{$gbl}: value ok 14047 - delete $vrgbl->{$gbl}{$gbl}{$gbl}: no exception ok 14048 - delete $vrgbl->{$gbl}{$gbl}{$gbl}: value ok 14049 - $vlex{"x$lex"}{$gbl}{$gbl}: no exception ok 14050 - $vlex{"x$lex"}{$gbl}{$gbl}: value ok 14051 - $vlex{"x$lex"}{$gbl}{$gbl} = 123: no exception ok 14052 - $vlex{"x$lex"}{$gbl}{$gbl} = 123: value ok 14053 - exists $vlex{"x$lex"}{$gbl}{$gbl}: no exception ok 14054 - exists $vlex{"x$lex"}{$gbl}{$gbl}: value ok 14055 - delete $vlex{"x$lex"}{$gbl}{$gbl}: no exception ok 14056 - delete $vlex{"x$lex"}{$gbl}{$gbl}: value ok 14057 - $vgbl{"x$lex"}{$gbl}{$gbl}: no exception ok 14058 - $vgbl{"x$lex"}{$gbl}{$gbl}: value ok 14059 - $vgbl{"x$lex"}{$gbl}{$gbl} = 123: no exception ok 14060 - $vgbl{"x$lex"}{$gbl}{$gbl} = 123: value ok 14061 - exists $vgbl{"x$lex"}{$gbl}{$gbl}: no exception ok 14062 - exists $vgbl{"x$lex"}{$gbl}{$gbl}: value ok 14063 - delete $vgbl{"x$lex"}{$gbl}{$gbl}: no exception ok 14064 - delete $vgbl{"x$lex"}{$gbl}{$gbl}: value ok 14065 - $vrlex->{"x$lex"}{$gbl}{$gbl}: no exception ok 14066 - $vrlex->{"x$lex"}{$gbl}{$gbl}: value ok 14067 - $vrlex->{"x$lex"}{$gbl}{$gbl} = 123: no exception ok 14068 - $vrlex->{"x$lex"}{$gbl}{$gbl} = 123: value ok 14069 - exists $vrlex->{"x$lex"}{$gbl}{$gbl}: no exception ok 14070 - exists $vrlex->{"x$lex"}{$gbl}{$gbl}: value ok 14071 - delete $vrlex->{"x$lex"}{$gbl}{$gbl}: no exception ok 14072 - delete $vrlex->{"x$lex"}{$gbl}{$gbl}: value ok 14073 - $vrgbl->{"x$lex"}{$gbl}{$gbl}: no exception ok 14074 - $vrgbl->{"x$lex"}{$gbl}{$gbl}: value ok 14075 - $vrgbl->{"x$lex"}{$gbl}{$gbl} = 123: no exception ok 14076 - $vrgbl->{"x$lex"}{$gbl}{$gbl} = 123: value ok 14077 - exists $vrgbl->{"x$lex"}{$gbl}{$gbl}: no exception ok 14078 - exists $vrgbl->{"x$lex"}{$gbl}{$gbl}: value ok 14079 - delete $vrgbl->{"x$lex"}{$gbl}{$gbl}: no exception ok 14080 - delete $vrgbl->{"x$lex"}{$gbl}{$gbl}: value ok 14081 - $vlex[0]{"x$lex"}{$gbl}: no exception ok 14082 - $vlex[0]{"x$lex"}{$gbl}: value ok 14083 - $vlex[0]{"x$lex"}{$gbl} = 123: no exception ok 14084 - $vlex[0]{"x$lex"}{$gbl} = 123: value ok 14085 - exists $vlex[0]{"x$lex"}{$gbl}: no exception ok 14086 - exists $vlex[0]{"x$lex"}{$gbl}: value ok 14087 - delete $vlex[0]{"x$lex"}{$gbl}: no exception ok 14088 - delete $vlex[0]{"x$lex"}{$gbl}: value ok 14089 - $vgbl[0]{"x$lex"}{$gbl}: no exception ok 14090 - $vgbl[0]{"x$lex"}{$gbl}: value ok 14091 - $vgbl[0]{"x$lex"}{$gbl} = 123: no exception ok 14092 - $vgbl[0]{"x$lex"}{$gbl} = 123: value ok 14093 - exists $vgbl[0]{"x$lex"}{$gbl}: no exception ok 14094 - exists $vgbl[0]{"x$lex"}{$gbl}: value ok 14095 - delete $vgbl[0]{"x$lex"}{$gbl}: no exception ok 14096 - delete $vgbl[0]{"x$lex"}{$gbl}: value ok 14097 - $vrlex->[0]{"x$lex"}{$gbl}: no exception ok 14098 - $vrlex->[0]{"x$lex"}{$gbl}: value ok 14099 - $vrlex->[0]{"x$lex"}{$gbl} = 123: no exception ok 14100 - $vrlex->[0]{"x$lex"}{$gbl} = 123: value ok 14101 - exists $vrlex->[0]{"x$lex"}{$gbl}: no exception ok 14102 - exists $vrlex->[0]{"x$lex"}{$gbl}: value ok 14103 - delete $vrlex->[0]{"x$lex"}{$gbl}: no exception ok 14104 - delete $vrlex->[0]{"x$lex"}{$gbl}: value ok 14105 - $vrgbl->[0]{"x$lex"}{$gbl}: no exception ok 14106 - $vrgbl->[0]{"x$lex"}{$gbl}: value ok 14107 - $vrgbl->[0]{"x$lex"}{$gbl} = 123: no exception ok 14108 - $vrgbl->[0]{"x$lex"}{$gbl} = 123: value ok 14109 - exists $vrgbl->[0]{"x$lex"}{$gbl}: no exception ok 14110 - exists $vrgbl->[0]{"x$lex"}{$gbl}: value ok 14111 - delete $vrgbl->[0]{"x$lex"}{$gbl}: no exception ok 14112 - delete $vrgbl->[0]{"x$lex"}{$gbl}: value ok 14113 - $vlex[$lex]{"x$lex"}{$gbl}: no exception ok 14114 - $vlex[$lex]{"x$lex"}{$gbl}: value ok 14115 - $vlex[$lex]{"x$lex"}{$gbl} = 123: no exception ok 14116 - $vlex[$lex]{"x$lex"}{$gbl} = 123: value ok 14117 - exists $vlex[$lex]{"x$lex"}{$gbl}: no exception ok 14118 - exists $vlex[$lex]{"x$lex"}{$gbl}: value ok 14119 - delete $vlex[$lex]{"x$lex"}{$gbl}: no exception ok 14120 - delete $vlex[$lex]{"x$lex"}{$gbl}: value ok 14121 - $vgbl[$lex]{"x$lex"}{$gbl}: no exception ok 14122 - $vgbl[$lex]{"x$lex"}{$gbl}: value ok 14123 - $vgbl[$lex]{"x$lex"}{$gbl} = 123: no exception ok 14124 - $vgbl[$lex]{"x$lex"}{$gbl} = 123: value ok 14125 - exists $vgbl[$lex]{"x$lex"}{$gbl}: no exception ok 14126 - exists $vgbl[$lex]{"x$lex"}{$gbl}: value ok 14127 - delete $vgbl[$lex]{"x$lex"}{$gbl}: no exception ok 14128 - delete $vgbl[$lex]{"x$lex"}{$gbl}: value ok 14129 - $vrlex->[$lex]{"x$lex"}{$gbl}: no exception ok 14130 - $vrlex->[$lex]{"x$lex"}{$gbl}: value ok 14131 - $vrlex->[$lex]{"x$lex"}{$gbl} = 123: no exception ok 14132 - $vrlex->[$lex]{"x$lex"}{$gbl} = 123: value ok 14133 - exists $vrlex->[$lex]{"x$lex"}{$gbl}: no exception ok 14134 - exists $vrlex->[$lex]{"x$lex"}{$gbl}: value ok 14135 - delete $vrlex->[$lex]{"x$lex"}{$gbl}: no exception ok 14136 - delete $vrlex->[$lex]{"x$lex"}{$gbl}: value ok 14137 - $vrgbl->[$lex]{"x$lex"}{$gbl}: no exception ok 14138 - $vrgbl->[$lex]{"x$lex"}{$gbl}: value ok 14139 - $vrgbl->[$lex]{"x$lex"}{$gbl} = 123: no exception ok 14140 - $vrgbl->[$lex]{"x$lex"}{$gbl} = 123: value ok 14141 - exists $vrgbl->[$lex]{"x$lex"}{$gbl}: no exception ok 14142 - exists $vrgbl->[$lex]{"x$lex"}{$gbl}: value ok 14143 - delete $vrgbl->[$lex]{"x$lex"}{$gbl}: no exception ok 14144 - delete $vrgbl->[$lex]{"x$lex"}{$gbl}: value ok 14145 - $vlex[$gbl]{"x$lex"}{$gbl}: no exception ok 14146 - $vlex[$gbl]{"x$lex"}{$gbl}: value ok 14147 - $vlex[$gbl]{"x$lex"}{$gbl} = 123: no exception ok 14148 - $vlex[$gbl]{"x$lex"}{$gbl} = 123: value ok 14149 - exists $vlex[$gbl]{"x$lex"}{$gbl}: no exception ok 14150 - exists $vlex[$gbl]{"x$lex"}{$gbl}: value ok 14151 - delete $vlex[$gbl]{"x$lex"}{$gbl}: no exception ok 14152 - delete $vlex[$gbl]{"x$lex"}{$gbl}: value ok 14153 - $vgbl[$gbl]{"x$lex"}{$gbl}: no exception ok 14154 - $vgbl[$gbl]{"x$lex"}{$gbl}: value ok 14155 - $vgbl[$gbl]{"x$lex"}{$gbl} = 123: no exception ok 14156 - $vgbl[$gbl]{"x$lex"}{$gbl} = 123: value ok 14157 - exists $vgbl[$gbl]{"x$lex"}{$gbl}: no exception ok 14158 - exists $vgbl[$gbl]{"x$lex"}{$gbl}: value ok 14159 - delete $vgbl[$gbl]{"x$lex"}{$gbl}: no exception ok 14160 - delete $vgbl[$gbl]{"x$lex"}{$gbl}: value ok 14161 - $vrlex->[$gbl]{"x$lex"}{$gbl}: no exception ok 14162 - $vrlex->[$gbl]{"x$lex"}{$gbl}: value ok 14163 - $vrlex->[$gbl]{"x$lex"}{$gbl} = 123: no exception ok 14164 - $vrlex->[$gbl]{"x$lex"}{$gbl} = 123: value ok 14165 - exists $vrlex->[$gbl]{"x$lex"}{$gbl}: no exception ok 14166 - exists $vrlex->[$gbl]{"x$lex"}{$gbl}: value ok 14167 - delete $vrlex->[$gbl]{"x$lex"}{$gbl}: no exception ok 14168 - delete $vrlex->[$gbl]{"x$lex"}{$gbl}: value ok 14169 - $vrgbl->[$gbl]{"x$lex"}{$gbl}: no exception ok 14170 - $vrgbl->[$gbl]{"x$lex"}{$gbl}: value ok 14171 - $vrgbl->[$gbl]{"x$lex"}{$gbl} = 123: no exception ok 14172 - $vrgbl->[$gbl]{"x$lex"}{$gbl} = 123: value ok 14173 - exists $vrgbl->[$gbl]{"x$lex"}{$gbl}: no exception ok 14174 - exists $vrgbl->[$gbl]{"x$lex"}{$gbl}: value ok 14175 - delete $vrgbl->[$gbl]{"x$lex"}{$gbl}: no exception ok 14176 - delete $vrgbl->[$gbl]{"x$lex"}{$gbl}: value ok 14177 - $vlex[$lex+1]{"x$lex"}{$gbl}: no exception ok 14178 - $vlex[$lex+1]{"x$lex"}{$gbl}: value ok 14179 - $vlex[$lex+1]{"x$lex"}{$gbl} = 123: no exception ok 14180 - $vlex[$lex+1]{"x$lex"}{$gbl} = 123: value ok 14181 - exists $vlex[$lex+1]{"x$lex"}{$gbl}: no exception ok 14182 - exists $vlex[$lex+1]{"x$lex"}{$gbl}: value ok 14183 - delete $vlex[$lex+1]{"x$lex"}{$gbl}: no exception ok 14184 - delete $vlex[$lex+1]{"x$lex"}{$gbl}: value ok 14185 - $vgbl[$lex+1]{"x$lex"}{$gbl}: no exception ok 14186 - $vgbl[$lex+1]{"x$lex"}{$gbl}: value ok 14187 - $vgbl[$lex+1]{"x$lex"}{$gbl} = 123: no exception ok 14188 - $vgbl[$lex+1]{"x$lex"}{$gbl} = 123: value ok 14189 - exists $vgbl[$lex+1]{"x$lex"}{$gbl}: no exception ok 14190 - exists $vgbl[$lex+1]{"x$lex"}{$gbl}: value ok 14191 - delete $vgbl[$lex+1]{"x$lex"}{$gbl}: no exception ok 14192 - delete $vgbl[$lex+1]{"x$lex"}{$gbl}: value ok 14193 - $vrlex->[$lex+1]{"x$lex"}{$gbl}: no exception ok 14194 - $vrlex->[$lex+1]{"x$lex"}{$gbl}: value ok 14195 - $vrlex->[$lex+1]{"x$lex"}{$gbl} = 123: no exception ok 14196 - $vrlex->[$lex+1]{"x$lex"}{$gbl} = 123: value ok 14197 - exists $vrlex->[$lex+1]{"x$lex"}{$gbl}: no exception ok 14198 - exists $vrlex->[$lex+1]{"x$lex"}{$gbl}: value ok 14199 - delete $vrlex->[$lex+1]{"x$lex"}{$gbl}: no exception ok 14200 - delete $vrlex->[$lex+1]{"x$lex"}{$gbl}: value ok 14201 - $vrgbl->[$lex+1]{"x$lex"}{$gbl}: no exception ok 14202 - $vrgbl->[$lex+1]{"x$lex"}{$gbl}: value ok 14203 - $vrgbl->[$lex+1]{"x$lex"}{$gbl} = 123: no exception ok 14204 - $vrgbl->[$lex+1]{"x$lex"}{$gbl} = 123: value ok 14205 - exists $vrgbl->[$lex+1]{"x$lex"}{$gbl}: no exception ok 14206 - exists $vrgbl->[$lex+1]{"x$lex"}{$gbl}: value ok 14207 - delete $vrgbl->[$lex+1]{"x$lex"}{$gbl}: no exception ok 14208 - delete $vrgbl->[$lex+1]{"x$lex"}{$gbl}: value ok 14209 - $vlex{foo}{"x$lex"}{$gbl}: no exception ok 14210 - $vlex{foo}{"x$lex"}{$gbl}: value ok 14211 - $vlex{foo}{"x$lex"}{$gbl} = 123: no exception ok 14212 - $vlex{foo}{"x$lex"}{$gbl} = 123: value ok 14213 - exists $vlex{foo}{"x$lex"}{$gbl}: no exception ok 14214 - exists $vlex{foo}{"x$lex"}{$gbl}: value ok 14215 - delete $vlex{foo}{"x$lex"}{$gbl}: no exception ok 14216 - delete $vlex{foo}{"x$lex"}{$gbl}: value ok 14217 - $vgbl{foo}{"x$lex"}{$gbl}: no exception ok 14218 - $vgbl{foo}{"x$lex"}{$gbl}: value ok 14219 - $vgbl{foo}{"x$lex"}{$gbl} = 123: no exception ok 14220 - $vgbl{foo}{"x$lex"}{$gbl} = 123: value ok 14221 - exists $vgbl{foo}{"x$lex"}{$gbl}: no exception ok 14222 - exists $vgbl{foo}{"x$lex"}{$gbl}: value ok 14223 - delete $vgbl{foo}{"x$lex"}{$gbl}: no exception ok 14224 - delete $vgbl{foo}{"x$lex"}{$gbl}: value ok 14225 - $vrlex->{foo}{"x$lex"}{$gbl}: no exception ok 14226 - $vrlex->{foo}{"x$lex"}{$gbl}: value ok 14227 - $vrlex->{foo}{"x$lex"}{$gbl} = 123: no exception ok 14228 - $vrlex->{foo}{"x$lex"}{$gbl} = 123: value ok 14229 - exists $vrlex->{foo}{"x$lex"}{$gbl}: no exception ok 14230 - exists $vrlex->{foo}{"x$lex"}{$gbl}: value ok 14231 - delete $vrlex->{foo}{"x$lex"}{$gbl}: no exception ok 14232 - delete $vrlex->{foo}{"x$lex"}{$gbl}: value ok 14233 - $vrgbl->{foo}{"x$lex"}{$gbl}: no exception ok 14234 - $vrgbl->{foo}{"x$lex"}{$gbl}: value ok 14235 - $vrgbl->{foo}{"x$lex"}{$gbl} = 123: no exception ok 14236 - $vrgbl->{foo}{"x$lex"}{$gbl} = 123: value ok 14237 - exists $vrgbl->{foo}{"x$lex"}{$gbl}: no exception ok 14238 - exists $vrgbl->{foo}{"x$lex"}{$gbl}: value ok 14239 - delete $vrgbl->{foo}{"x$lex"}{$gbl}: no exception ok 14240 - delete $vrgbl->{foo}{"x$lex"}{$gbl}: value ok 14241 - $vlex{$lex}{"x$lex"}{$gbl}: no exception ok 14242 - $vlex{$lex}{"x$lex"}{$gbl}: value ok 14243 - $vlex{$lex}{"x$lex"}{$gbl} = 123: no exception ok 14244 - $vlex{$lex}{"x$lex"}{$gbl} = 123: value ok 14245 - exists $vlex{$lex}{"x$lex"}{$gbl}: no exception ok 14246 - exists $vlex{$lex}{"x$lex"}{$gbl}: value ok 14247 - delete $vlex{$lex}{"x$lex"}{$gbl}: no exception ok 14248 - delete $vlex{$lex}{"x$lex"}{$gbl}: value ok 14249 - $vgbl{$lex}{"x$lex"}{$gbl}: no exception ok 14250 - $vgbl{$lex}{"x$lex"}{$gbl}: value ok 14251 - $vgbl{$lex}{"x$lex"}{$gbl} = 123: no exception ok 14252 - $vgbl{$lex}{"x$lex"}{$gbl} = 123: value ok 14253 - exists $vgbl{$lex}{"x$lex"}{$gbl}: no exception ok 14254 - exists $vgbl{$lex}{"x$lex"}{$gbl}: value ok 14255 - delete $vgbl{$lex}{"x$lex"}{$gbl}: no exception ok 14256 - delete $vgbl{$lex}{"x$lex"}{$gbl}: value ok 14257 - $vrlex->{$lex}{"x$lex"}{$gbl}: no exception ok 14258 - $vrlex->{$lex}{"x$lex"}{$gbl}: value ok 14259 - $vrlex->{$lex}{"x$lex"}{$gbl} = 123: no exception ok 14260 - $vrlex->{$lex}{"x$lex"}{$gbl} = 123: value ok 14261 - exists $vrlex->{$lex}{"x$lex"}{$gbl}: no exception ok 14262 - exists $vrlex->{$lex}{"x$lex"}{$gbl}: value ok 14263 - delete $vrlex->{$lex}{"x$lex"}{$gbl}: no exception ok 14264 - delete $vrlex->{$lex}{"x$lex"}{$gbl}: value ok 14265 - $vrgbl->{$lex}{"x$lex"}{$gbl}: no exception ok 14266 - $vrgbl->{$lex}{"x$lex"}{$gbl}: value ok 14267 - $vrgbl->{$lex}{"x$lex"}{$gbl} = 123: no exception ok 14268 - $vrgbl->{$lex}{"x$lex"}{$gbl} = 123: value ok 14269 - exists $vrgbl->{$lex}{"x$lex"}{$gbl}: no exception ok 14270 - exists $vrgbl->{$lex}{"x$lex"}{$gbl}: value ok 14271 - delete $vrgbl->{$lex}{"x$lex"}{$gbl}: no exception ok 14272 - delete $vrgbl->{$lex}{"x$lex"}{$gbl}: value ok 14273 - $vlex{$gbl}{"x$lex"}{$gbl}: no exception ok 14274 - $vlex{$gbl}{"x$lex"}{$gbl}: value ok 14275 - $vlex{$gbl}{"x$lex"}{$gbl} = 123: no exception ok 14276 - $vlex{$gbl}{"x$lex"}{$gbl} = 123: value ok 14277 - exists $vlex{$gbl}{"x$lex"}{$gbl}: no exception ok 14278 - exists $vlex{$gbl}{"x$lex"}{$gbl}: value ok 14279 - delete $vlex{$gbl}{"x$lex"}{$gbl}: no exception ok 14280 - delete $vlex{$gbl}{"x$lex"}{$gbl}: value ok 14281 - $vgbl{$gbl}{"x$lex"}{$gbl}: no exception ok 14282 - $vgbl{$gbl}{"x$lex"}{$gbl}: value ok 14283 - $vgbl{$gbl}{"x$lex"}{$gbl} = 123: no exception ok 14284 - $vgbl{$gbl}{"x$lex"}{$gbl} = 123: value ok 14285 - exists $vgbl{$gbl}{"x$lex"}{$gbl}: no exception ok 14286 - exists $vgbl{$gbl}{"x$lex"}{$gbl}: value ok 14287 - delete $vgbl{$gbl}{"x$lex"}{$gbl}: no exception ok 14288 - delete $vgbl{$gbl}{"x$lex"}{$gbl}: value ok 14289 - $vrlex->{$gbl}{"x$lex"}{$gbl}: no exception ok 14290 - $vrlex->{$gbl}{"x$lex"}{$gbl}: value ok 14291 - $vrlex->{$gbl}{"x$lex"}{$gbl} = 123: no exception ok 14292 - $vrlex->{$gbl}{"x$lex"}{$gbl} = 123: value ok 14293 - exists $vrlex->{$gbl}{"x$lex"}{$gbl}: no exception ok 14294 - exists $vrlex->{$gbl}{"x$lex"}{$gbl}: value ok 14295 - delete $vrlex->{$gbl}{"x$lex"}{$gbl}: no exception ok 14296 - delete $vrlex->{$gbl}{"x$lex"}{$gbl}: value ok 14297 - $vrgbl->{$gbl}{"x$lex"}{$gbl}: no exception ok 14298 - $vrgbl->{$gbl}{"x$lex"}{$gbl}: value ok 14299 - $vrgbl->{$gbl}{"x$lex"}{$gbl} = 123: no exception ok 14300 - $vrgbl->{$gbl}{"x$lex"}{$gbl} = 123: value ok 14301 - exists $vrgbl->{$gbl}{"x$lex"}{$gbl}: no exception ok 14302 - exists $vrgbl->{$gbl}{"x$lex"}{$gbl}: value ok 14303 - delete $vrgbl->{$gbl}{"x$lex"}{$gbl}: no exception ok 14304 - delete $vrgbl->{$gbl}{"x$lex"}{$gbl}: value ok 14305 - $vlex{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14306 - $vlex{"x$lex"}{"x$lex"}{$gbl}: value ok 14307 - $vlex{"x$lex"}{"x$lex"}{$gbl} = 123: no exception ok 14308 - $vlex{"x$lex"}{"x$lex"}{$gbl} = 123: value ok 14309 - exists $vlex{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14310 - exists $vlex{"x$lex"}{"x$lex"}{$gbl}: value ok 14311 - delete $vlex{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14312 - delete $vlex{"x$lex"}{"x$lex"}{$gbl}: value ok 14313 - $vgbl{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14314 - $vgbl{"x$lex"}{"x$lex"}{$gbl}: value ok 14315 - $vgbl{"x$lex"}{"x$lex"}{$gbl} = 123: no exception ok 14316 - $vgbl{"x$lex"}{"x$lex"}{$gbl} = 123: value ok 14317 - exists $vgbl{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14318 - exists $vgbl{"x$lex"}{"x$lex"}{$gbl}: value ok 14319 - delete $vgbl{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14320 - delete $vgbl{"x$lex"}{"x$lex"}{$gbl}: value ok 14321 - $vrlex->{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14322 - $vrlex->{"x$lex"}{"x$lex"}{$gbl}: value ok 14323 - $vrlex->{"x$lex"}{"x$lex"}{$gbl} = 123: no exception ok 14324 - $vrlex->{"x$lex"}{"x$lex"}{$gbl} = 123: value ok 14325 - exists $vrlex->{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14326 - exists $vrlex->{"x$lex"}{"x$lex"}{$gbl}: value ok 14327 - delete $vrlex->{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14328 - delete $vrlex->{"x$lex"}{"x$lex"}{$gbl}: value ok 14329 - $vrgbl->{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14330 - $vrgbl->{"x$lex"}{"x$lex"}{$gbl}: value ok 14331 - $vrgbl->{"x$lex"}{"x$lex"}{$gbl} = 123: no exception ok 14332 - $vrgbl->{"x$lex"}{"x$lex"}{$gbl} = 123: value ok 14333 - exists $vrgbl->{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14334 - exists $vrgbl->{"x$lex"}{"x$lex"}{$gbl}: value ok 14335 - delete $vrgbl->{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14336 - delete $vrgbl->{"x$lex"}{"x$lex"}{$gbl}: value ok 14337 - $vlex[0][0]{"x$lex"}: no exception ok 14338 - $vlex[0][0]{"x$lex"}: value ok 14339 - $vlex[0][0]{"x$lex"} = 123: no exception ok 14340 - $vlex[0][0]{"x$lex"} = 123: value ok 14341 - exists $vlex[0][0]{"x$lex"}: no exception ok 14342 - exists $vlex[0][0]{"x$lex"}: value ok 14343 - delete $vlex[0][0]{"x$lex"}: no exception ok 14344 - delete $vlex[0][0]{"x$lex"}: value ok 14345 - $vgbl[0][0]{"x$lex"}: no exception ok 14346 - $vgbl[0][0]{"x$lex"}: value ok 14347 - $vgbl[0][0]{"x$lex"} = 123: no exception ok 14348 - $vgbl[0][0]{"x$lex"} = 123: value ok 14349 - exists $vgbl[0][0]{"x$lex"}: no exception ok 14350 - exists $vgbl[0][0]{"x$lex"}: value ok 14351 - delete $vgbl[0][0]{"x$lex"}: no exception ok 14352 - delete $vgbl[0][0]{"x$lex"}: value ok 14353 - $vrlex->[0][0]{"x$lex"}: no exception ok 14354 - $vrlex->[0][0]{"x$lex"}: value ok 14355 - $vrlex->[0][0]{"x$lex"} = 123: no exception ok 14356 - $vrlex->[0][0]{"x$lex"} = 123: value ok 14357 - exists $vrlex->[0][0]{"x$lex"}: no exception ok 14358 - exists $vrlex->[0][0]{"x$lex"}: value ok 14359 - delete $vrlex->[0][0]{"x$lex"}: no exception ok 14360 - delete $vrlex->[0][0]{"x$lex"}: value ok 14361 - $vrgbl->[0][0]{"x$lex"}: no exception ok 14362 - $vrgbl->[0][0]{"x$lex"}: value ok 14363 - $vrgbl->[0][0]{"x$lex"} = 123: no exception ok 14364 - $vrgbl->[0][0]{"x$lex"} = 123: value ok 14365 - exists $vrgbl->[0][0]{"x$lex"}: no exception ok 14366 - exists $vrgbl->[0][0]{"x$lex"}: value ok 14367 - delete $vrgbl->[0][0]{"x$lex"}: no exception ok 14368 - delete $vrgbl->[0][0]{"x$lex"}: value ok 14369 - $vlex[$lex][0]{"x$lex"}: no exception ok 14370 - $vlex[$lex][0]{"x$lex"}: value ok 14371 - $vlex[$lex][0]{"x$lex"} = 123: no exception ok 14372 - $vlex[$lex][0]{"x$lex"} = 123: value ok 14373 - exists $vlex[$lex][0]{"x$lex"}: no exception ok 14374 - exists $vlex[$lex][0]{"x$lex"}: value ok 14375 - delete $vlex[$lex][0]{"x$lex"}: no exception ok 14376 - delete $vlex[$lex][0]{"x$lex"}: value ok 14377 - $vgbl[$lex][0]{"x$lex"}: no exception ok 14378 - $vgbl[$lex][0]{"x$lex"}: value ok 14379 - $vgbl[$lex][0]{"x$lex"} = 123: no exception ok 14380 - $vgbl[$lex][0]{"x$lex"} = 123: value ok 14381 - exists $vgbl[$lex][0]{"x$lex"}: no exception ok 14382 - exists $vgbl[$lex][0]{"x$lex"}: value ok 14383 - delete $vgbl[$lex][0]{"x$lex"}: no exception ok 14384 - delete $vgbl[$lex][0]{"x$lex"}: value ok 14385 - $vrlex->[$lex][0]{"x$lex"}: no exception ok 14386 - $vrlex->[$lex][0]{"x$lex"}: value ok 14387 - $vrlex->[$lex][0]{"x$lex"} = 123: no exception ok 14388 - $vrlex->[$lex][0]{"x$lex"} = 123: value ok 14389 - exists $vrlex->[$lex][0]{"x$lex"}: no exception ok 14390 - exists $vrlex->[$lex][0]{"x$lex"}: value ok 14391 - delete $vrlex->[$lex][0]{"x$lex"}: no exception ok 14392 - delete $vrlex->[$lex][0]{"x$lex"}: value ok 14393 - $vrgbl->[$lex][0]{"x$lex"}: no exception ok 14394 - $vrgbl->[$lex][0]{"x$lex"}: value ok 14395 - $vrgbl->[$lex][0]{"x$lex"} = 123: no exception ok 14396 - $vrgbl->[$lex][0]{"x$lex"} = 123: value ok 14397 - exists $vrgbl->[$lex][0]{"x$lex"}: no exception ok 14398 - exists $vrgbl->[$lex][0]{"x$lex"}: value ok 14399 - delete $vrgbl->[$lex][0]{"x$lex"}: no exception ok 14400 - delete $vrgbl->[$lex][0]{"x$lex"}: value ok 14401 - $vlex[$gbl][0]{"x$lex"}: no exception ok 14402 - $vlex[$gbl][0]{"x$lex"}: value ok 14403 - $vlex[$gbl][0]{"x$lex"} = 123: no exception ok 14404 - $vlex[$gbl][0]{"x$lex"} = 123: value ok 14405 - exists $vlex[$gbl][0]{"x$lex"}: no exception ok 14406 - exists $vlex[$gbl][0]{"x$lex"}: value ok 14407 - delete $vlex[$gbl][0]{"x$lex"}: no exception ok 14408 - delete $vlex[$gbl][0]{"x$lex"}: value ok 14409 - $vgbl[$gbl][0]{"x$lex"}: no exception ok 14410 - $vgbl[$gbl][0]{"x$lex"}: value ok 14411 - $vgbl[$gbl][0]{"x$lex"} = 123: no exception ok 14412 - $vgbl[$gbl][0]{"x$lex"} = 123: value ok 14413 - exists $vgbl[$gbl][0]{"x$lex"}: no exception ok 14414 - exists $vgbl[$gbl][0]{"x$lex"}: value ok 14415 - delete $vgbl[$gbl][0]{"x$lex"}: no exception ok 14416 - delete $vgbl[$gbl][0]{"x$lex"}: value ok 14417 - $vrlex->[$gbl][0]{"x$lex"}: no exception ok 14418 - $vrlex->[$gbl][0]{"x$lex"}: value ok 14419 - $vrlex->[$gbl][0]{"x$lex"} = 123: no exception ok 14420 - $vrlex->[$gbl][0]{"x$lex"} = 123: value ok 14421 - exists $vrlex->[$gbl][0]{"x$lex"}: no exception ok 14422 - exists $vrlex->[$gbl][0]{"x$lex"}: value ok 14423 - delete $vrlex->[$gbl][0]{"x$lex"}: no exception ok 14424 - delete $vrlex->[$gbl][0]{"x$lex"}: value ok 14425 - $vrgbl->[$gbl][0]{"x$lex"}: no exception ok 14426 - $vrgbl->[$gbl][0]{"x$lex"}: value ok 14427 - $vrgbl->[$gbl][0]{"x$lex"} = 123: no exception ok 14428 - $vrgbl->[$gbl][0]{"x$lex"} = 123: value ok 14429 - exists $vrgbl->[$gbl][0]{"x$lex"}: no exception ok 14430 - exists $vrgbl->[$gbl][0]{"x$lex"}: value ok 14431 - delete $vrgbl->[$gbl][0]{"x$lex"}: no exception ok 14432 - delete $vrgbl->[$gbl][0]{"x$lex"}: value ok 14433 - $vlex[$lex+1][0]{"x$lex"}: no exception ok 14434 - $vlex[$lex+1][0]{"x$lex"}: value ok 14435 - $vlex[$lex+1][0]{"x$lex"} = 123: no exception ok 14436 - $vlex[$lex+1][0]{"x$lex"} = 123: value ok 14437 - exists $vlex[$lex+1][0]{"x$lex"}: no exception ok 14438 - exists $vlex[$lex+1][0]{"x$lex"}: value ok 14439 - delete $vlex[$lex+1][0]{"x$lex"}: no exception ok 14440 - delete $vlex[$lex+1][0]{"x$lex"}: value ok 14441 - $vgbl[$lex+1][0]{"x$lex"}: no exception ok 14442 - $vgbl[$lex+1][0]{"x$lex"}: value ok 14443 - $vgbl[$lex+1][0]{"x$lex"} = 123: no exception ok 14444 - $vgbl[$lex+1][0]{"x$lex"} = 123: value ok 14445 - exists $vgbl[$lex+1][0]{"x$lex"}: no exception ok 14446 - exists $vgbl[$lex+1][0]{"x$lex"}: value ok 14447 - delete $vgbl[$lex+1][0]{"x$lex"}: no exception ok 14448 - delete $vgbl[$lex+1][0]{"x$lex"}: value ok 14449 - $vrlex->[$lex+1][0]{"x$lex"}: no exception ok 14450 - $vrlex->[$lex+1][0]{"x$lex"}: value ok 14451 - $vrlex->[$lex+1][0]{"x$lex"} = 123: no exception ok 14452 - $vrlex->[$lex+1][0]{"x$lex"} = 123: value ok 14453 - exists $vrlex->[$lex+1][0]{"x$lex"}: no exception ok 14454 - exists $vrlex->[$lex+1][0]{"x$lex"}: value ok 14455 - delete $vrlex->[$lex+1][0]{"x$lex"}: no exception ok 14456 - delete $vrlex->[$lex+1][0]{"x$lex"}: value ok 14457 - $vrgbl->[$lex+1][0]{"x$lex"}: no exception ok 14458 - $vrgbl->[$lex+1][0]{"x$lex"}: value ok 14459 - $vrgbl->[$lex+1][0]{"x$lex"} = 123: no exception ok 14460 - $vrgbl->[$lex+1][0]{"x$lex"} = 123: value ok 14461 - exists $vrgbl->[$lex+1][0]{"x$lex"}: no exception ok 14462 - exists $vrgbl->[$lex+1][0]{"x$lex"}: value ok 14463 - delete $vrgbl->[$lex+1][0]{"x$lex"}: no exception ok 14464 - delete $vrgbl->[$lex+1][0]{"x$lex"}: value ok 14465 - $vlex{foo}[0]{"x$lex"}: no exception ok 14466 - $vlex{foo}[0]{"x$lex"}: value ok 14467 - $vlex{foo}[0]{"x$lex"} = 123: no exception ok 14468 - $vlex{foo}[0]{"x$lex"} = 123: value ok 14469 - exists $vlex{foo}[0]{"x$lex"}: no exception ok 14470 - exists $vlex{foo}[0]{"x$lex"}: value ok 14471 - delete $vlex{foo}[0]{"x$lex"}: no exception ok 14472 - delete $vlex{foo}[0]{"x$lex"}: value ok 14473 - $vgbl{foo}[0]{"x$lex"}: no exception ok 14474 - $vgbl{foo}[0]{"x$lex"}: value ok 14475 - $vgbl{foo}[0]{"x$lex"} = 123: no exception ok 14476 - $vgbl{foo}[0]{"x$lex"} = 123: value ok 14477 - exists $vgbl{foo}[0]{"x$lex"}: no exception ok 14478 - exists $vgbl{foo}[0]{"x$lex"}: value ok 14479 - delete $vgbl{foo}[0]{"x$lex"}: no exception ok 14480 - delete $vgbl{foo}[0]{"x$lex"}: value ok 14481 - $vrlex->{foo}[0]{"x$lex"}: no exception ok 14482 - $vrlex->{foo}[0]{"x$lex"}: value ok 14483 - $vrlex->{foo}[0]{"x$lex"} = 123: no exception ok 14484 - $vrlex->{foo}[0]{"x$lex"} = 123: value ok 14485 - exists $vrlex->{foo}[0]{"x$lex"}: no exception ok 14486 - exists $vrlex->{foo}[0]{"x$lex"}: value ok 14487 - delete $vrlex->{foo}[0]{"x$lex"}: no exception ok 14488 - delete $vrlex->{foo}[0]{"x$lex"}: value ok 14489 - $vrgbl->{foo}[0]{"x$lex"}: no exception ok 14490 - $vrgbl->{foo}[0]{"x$lex"}: value ok 14491 - $vrgbl->{foo}[0]{"x$lex"} = 123: no exception ok 14492 - $vrgbl->{foo}[0]{"x$lex"} = 123: value ok 14493 - exists $vrgbl->{foo}[0]{"x$lex"}: no exception ok 14494 - exists $vrgbl->{foo}[0]{"x$lex"}: value ok 14495 - delete $vrgbl->{foo}[0]{"x$lex"}: no exception ok 14496 - delete $vrgbl->{foo}[0]{"x$lex"}: value ok 14497 - $vlex{$lex}[0]{"x$lex"}: no exception ok 14498 - $vlex{$lex}[0]{"x$lex"}: value ok 14499 - $vlex{$lex}[0]{"x$lex"} = 123: no exception ok 14500 - $vlex{$lex}[0]{"x$lex"} = 123: value ok 14501 - exists $vlex{$lex}[0]{"x$lex"}: no exception ok 14502 - exists $vlex{$lex}[0]{"x$lex"}: value ok 14503 - delete $vlex{$lex}[0]{"x$lex"}: no exception ok 14504 - delete $vlex{$lex}[0]{"x$lex"}: value ok 14505 - $vgbl{$lex}[0]{"x$lex"}: no exception ok 14506 - $vgbl{$lex}[0]{"x$lex"}: value ok 14507 - $vgbl{$lex}[0]{"x$lex"} = 123: no exception ok 14508 - $vgbl{$lex}[0]{"x$lex"} = 123: value ok 14509 - exists $vgbl{$lex}[0]{"x$lex"}: no exception ok 14510 - exists $vgbl{$lex}[0]{"x$lex"}: value ok 14511 - delete $vgbl{$lex}[0]{"x$lex"}: no exception ok 14512 - delete $vgbl{$lex}[0]{"x$lex"}: value ok 14513 - $vrlex->{$lex}[0]{"x$lex"}: no exception ok 14514 - $vrlex->{$lex}[0]{"x$lex"}: value ok 14515 - $vrlex->{$lex}[0]{"x$lex"} = 123: no exception ok 14516 - $vrlex->{$lex}[0]{"x$lex"} = 123: value ok 14517 - exists $vrlex->{$lex}[0]{"x$lex"}: no exception ok 14518 - exists $vrlex->{$lex}[0]{"x$lex"}: value ok 14519 - delete $vrlex->{$lex}[0]{"x$lex"}: no exception ok 14520 - delete $vrlex->{$lex}[0]{"x$lex"}: value ok 14521 - $vrgbl->{$lex}[0]{"x$lex"}: no exception ok 14522 - $vrgbl->{$lex}[0]{"x$lex"}: value ok 14523 - $vrgbl->{$lex}[0]{"x$lex"} = 123: no exception ok 14524 - $vrgbl->{$lex}[0]{"x$lex"} = 123: value ok 14525 - exists $vrgbl->{$lex}[0]{"x$lex"}: no exception ok 14526 - exists $vrgbl->{$lex}[0]{"x$lex"}: value ok 14527 - delete $vrgbl->{$lex}[0]{"x$lex"}: no exception ok 14528 - delete $vrgbl->{$lex}[0]{"x$lex"}: value ok 14529 - $vlex{$gbl}[0]{"x$lex"}: no exception ok 14530 - $vlex{$gbl}[0]{"x$lex"}: value ok 14531 - $vlex{$gbl}[0]{"x$lex"} = 123: no exception ok 14532 - $vlex{$gbl}[0]{"x$lex"} = 123: value ok 14533 - exists $vlex{$gbl}[0]{"x$lex"}: no exception ok 14534 - exists $vlex{$gbl}[0]{"x$lex"}: value ok 14535 - delete $vlex{$gbl}[0]{"x$lex"}: no exception ok 14536 - delete $vlex{$gbl}[0]{"x$lex"}: value ok 14537 - $vgbl{$gbl}[0]{"x$lex"}: no exception ok 14538 - $vgbl{$gbl}[0]{"x$lex"}: value ok 14539 - $vgbl{$gbl}[0]{"x$lex"} = 123: no exception ok 14540 - $vgbl{$gbl}[0]{"x$lex"} = 123: value ok 14541 - exists $vgbl{$gbl}[0]{"x$lex"}: no exception ok 14542 - exists $vgbl{$gbl}[0]{"x$lex"}: value ok 14543 - delete $vgbl{$gbl}[0]{"x$lex"}: no exception ok 14544 - delete $vgbl{$gbl}[0]{"x$lex"}: value ok 14545 - $vrlex->{$gbl}[0]{"x$lex"}: no exception ok 14546 - $vrlex->{$gbl}[0]{"x$lex"}: value ok 14547 - $vrlex->{$gbl}[0]{"x$lex"} = 123: no exception ok 14548 - $vrlex->{$gbl}[0]{"x$lex"} = 123: value ok 14549 - exists $vrlex->{$gbl}[0]{"x$lex"}: no exception ok 14550 - exists $vrlex->{$gbl}[0]{"x$lex"}: value ok 14551 - delete $vrlex->{$gbl}[0]{"x$lex"}: no exception ok 14552 - delete $vrlex->{$gbl}[0]{"x$lex"}: value ok 14553 - $vrgbl->{$gbl}[0]{"x$lex"}: no exception ok 14554 - $vrgbl->{$gbl}[0]{"x$lex"}: value ok 14555 - $vrgbl->{$gbl}[0]{"x$lex"} = 123: no exception ok 14556 - $vrgbl->{$gbl}[0]{"x$lex"} = 123: value ok 14557 - exists $vrgbl->{$gbl}[0]{"x$lex"}: no exception ok 14558 - exists $vrgbl->{$gbl}[0]{"x$lex"}: value ok 14559 - delete $vrgbl->{$gbl}[0]{"x$lex"}: no exception ok 14560 - delete $vrgbl->{$gbl}[0]{"x$lex"}: value ok 14561 - $vlex{"x$lex"}[0]{"x$lex"}: no exception ok 14562 - $vlex{"x$lex"}[0]{"x$lex"}: value ok 14563 - $vlex{"x$lex"}[0]{"x$lex"} = 123: no exception ok 14564 - $vlex{"x$lex"}[0]{"x$lex"} = 123: value ok 14565 - exists $vlex{"x$lex"}[0]{"x$lex"}: no exception ok 14566 - exists $vlex{"x$lex"}[0]{"x$lex"}: value ok 14567 - delete $vlex{"x$lex"}[0]{"x$lex"}: no exception ok 14568 - delete $vlex{"x$lex"}[0]{"x$lex"}: value ok 14569 - $vgbl{"x$lex"}[0]{"x$lex"}: no exception ok 14570 - $vgbl{"x$lex"}[0]{"x$lex"}: value ok 14571 - $vgbl{"x$lex"}[0]{"x$lex"} = 123: no exception ok 14572 - $vgbl{"x$lex"}[0]{"x$lex"} = 123: value ok 14573 - exists $vgbl{"x$lex"}[0]{"x$lex"}: no exception ok 14574 - exists $vgbl{"x$lex"}[0]{"x$lex"}: value ok 14575 - delete $vgbl{"x$lex"}[0]{"x$lex"}: no exception ok 14576 - delete $vgbl{"x$lex"}[0]{"x$lex"}: value ok 14577 - $vrlex->{"x$lex"}[0]{"x$lex"}: no exception ok 14578 - $vrlex->{"x$lex"}[0]{"x$lex"}: value ok 14579 - $vrlex->{"x$lex"}[0]{"x$lex"} = 123: no exception ok 14580 - $vrlex->{"x$lex"}[0]{"x$lex"} = 123: value ok 14581 - exists $vrlex->{"x$lex"}[0]{"x$lex"}: no exception ok 14582 - exists $vrlex->{"x$lex"}[0]{"x$lex"}: value ok 14583 - delete $vrlex->{"x$lex"}[0]{"x$lex"}: no exception ok 14584 - delete $vrlex->{"x$lex"}[0]{"x$lex"}: value ok 14585 - $vrgbl->{"x$lex"}[0]{"x$lex"}: no exception ok 14586 - $vrgbl->{"x$lex"}[0]{"x$lex"}: value ok 14587 - $vrgbl->{"x$lex"}[0]{"x$lex"} = 123: no exception ok 14588 - $vrgbl->{"x$lex"}[0]{"x$lex"} = 123: value ok 14589 - exists $vrgbl->{"x$lex"}[0]{"x$lex"}: no exception ok 14590 - exists $vrgbl->{"x$lex"}[0]{"x$lex"}: value ok 14591 - delete $vrgbl->{"x$lex"}[0]{"x$lex"}: no exception ok 14592 - delete $vrgbl->{"x$lex"}[0]{"x$lex"}: value ok 14593 - $vlex[0][$lex]{"x$lex"}: no exception ok 14594 - $vlex[0][$lex]{"x$lex"}: value ok 14595 - $vlex[0][$lex]{"x$lex"} = 123: no exception ok 14596 - $vlex[0][$lex]{"x$lex"} = 123: value ok 14597 - exists $vlex[0][$lex]{"x$lex"}: no exception ok 14598 - exists $vlex[0][$lex]{"x$lex"}: value ok 14599 - delete $vlex[0][$lex]{"x$lex"}: no exception ok 14600 - delete $vlex[0][$lex]{"x$lex"}: value ok 14601 - $vgbl[0][$lex]{"x$lex"}: no exception ok 14602 - $vgbl[0][$lex]{"x$lex"}: value ok 14603 - $vgbl[0][$lex]{"x$lex"} = 123: no exception ok 14604 - $vgbl[0][$lex]{"x$lex"} = 123: value ok 14605 - exists $vgbl[0][$lex]{"x$lex"}: no exception ok 14606 - exists $vgbl[0][$lex]{"x$lex"}: value ok 14607 - delete $vgbl[0][$lex]{"x$lex"}: no exception ok 14608 - delete $vgbl[0][$lex]{"x$lex"}: value ok 14609 - $vrlex->[0][$lex]{"x$lex"}: no exception ok 14610 - $vrlex->[0][$lex]{"x$lex"}: value ok 14611 - $vrlex->[0][$lex]{"x$lex"} = 123: no exception ok 14612 - $vrlex->[0][$lex]{"x$lex"} = 123: value ok 14613 - exists $vrlex->[0][$lex]{"x$lex"}: no exception ok 14614 - exists $vrlex->[0][$lex]{"x$lex"}: value ok 14615 - delete $vrlex->[0][$lex]{"x$lex"}: no exception ok 14616 - delete $vrlex->[0][$lex]{"x$lex"}: value ok 14617 - $vrgbl->[0][$lex]{"x$lex"}: no exception ok 14618 - $vrgbl->[0][$lex]{"x$lex"}: value ok 14619 - $vrgbl->[0][$lex]{"x$lex"} = 123: no exception ok 14620 - $vrgbl->[0][$lex]{"x$lex"} = 123: value ok 14621 - exists $vrgbl->[0][$lex]{"x$lex"}: no exception ok 14622 - exists $vrgbl->[0][$lex]{"x$lex"}: value ok 14623 - delete $vrgbl->[0][$lex]{"x$lex"}: no exception ok 14624 - delete $vrgbl->[0][$lex]{"x$lex"}: value ok 14625 - $vlex[$lex][$lex]{"x$lex"}: no exception ok 14626 - $vlex[$lex][$lex]{"x$lex"}: value ok 14627 - $vlex[$lex][$lex]{"x$lex"} = 123: no exception ok 14628 - $vlex[$lex][$lex]{"x$lex"} = 123: value ok 14629 - exists $vlex[$lex][$lex]{"x$lex"}: no exception ok 14630 - exists $vlex[$lex][$lex]{"x$lex"}: value ok 14631 - delete $vlex[$lex][$lex]{"x$lex"}: no exception ok 14632 - delete $vlex[$lex][$lex]{"x$lex"}: value ok 14633 - $vgbl[$lex][$lex]{"x$lex"}: no exception ok 14634 - $vgbl[$lex][$lex]{"x$lex"}: value ok 14635 - $vgbl[$lex][$lex]{"x$lex"} = 123: no exception ok 14636 - $vgbl[$lex][$lex]{"x$lex"} = 123: value ok 14637 - exists $vgbl[$lex][$lex]{"x$lex"}: no exception ok 14638 - exists $vgbl[$lex][$lex]{"x$lex"}: value ok 14639 - delete $vgbl[$lex][$lex]{"x$lex"}: no exception ok 14640 - delete $vgbl[$lex][$lex]{"x$lex"}: value ok 14641 - $vrlex->[$lex][$lex]{"x$lex"}: no exception ok 14642 - $vrlex->[$lex][$lex]{"x$lex"}: value ok 14643 - $vrlex->[$lex][$lex]{"x$lex"} = 123: no exception ok 14644 - $vrlex->[$lex][$lex]{"x$lex"} = 123: value ok 14645 - exists $vrlex->[$lex][$lex]{"x$lex"}: no exception ok 14646 - exists $vrlex->[$lex][$lex]{"x$lex"}: value ok 14647 - delete $vrlex->[$lex][$lex]{"x$lex"}: no exception ok 14648 - delete $vrlex->[$lex][$lex]{"x$lex"}: value ok 14649 - $vrgbl->[$lex][$lex]{"x$lex"}: no exception ok 14650 - $vrgbl->[$lex][$lex]{"x$lex"}: value ok 14651 - $vrgbl->[$lex][$lex]{"x$lex"} = 123: no exception ok 14652 - $vrgbl->[$lex][$lex]{"x$lex"} = 123: value ok 14653 - exists $vrgbl->[$lex][$lex]{"x$lex"}: no exception ok 14654 - exists $vrgbl->[$lex][$lex]{"x$lex"}: value ok 14655 - delete $vrgbl->[$lex][$lex]{"x$lex"}: no exception ok 14656 - delete $vrgbl->[$lex][$lex]{"x$lex"}: value ok 14657 - $vlex[$gbl][$lex]{"x$lex"}: no exception ok 14658 - $vlex[$gbl][$lex]{"x$lex"}: value ok 14659 - $vlex[$gbl][$lex]{"x$lex"} = 123: no exception ok 14660 - $vlex[$gbl][$lex]{"x$lex"} = 123: value ok 14661 - exists $vlex[$gbl][$lex]{"x$lex"}: no exception ok 14662 - exists $vlex[$gbl][$lex]{"x$lex"}: value ok 14663 - delete $vlex[$gbl][$lex]{"x$lex"}: no exception ok 14664 - delete $vlex[$gbl][$lex]{"x$lex"}: value ok 14665 - $vgbl[$gbl][$lex]{"x$lex"}: no exception ok 14666 - $vgbl[$gbl][$lex]{"x$lex"}: value ok 14667 - $vgbl[$gbl][$lex]{"x$lex"} = 123: no exception ok 14668 - $vgbl[$gbl][$lex]{"x$lex"} = 123: value ok 14669 - exists $vgbl[$gbl][$lex]{"x$lex"}: no exception ok 14670 - exists $vgbl[$gbl][$lex]{"x$lex"}: value ok 14671 - delete $vgbl[$gbl][$lex]{"x$lex"}: no exception ok 14672 - delete $vgbl[$gbl][$lex]{"x$lex"}: value ok 14673 - $vrlex->[$gbl][$lex]{"x$lex"}: no exception ok 14674 - $vrlex->[$gbl][$lex]{"x$lex"}: value ok 14675 - $vrlex->[$gbl][$lex]{"x$lex"} = 123: no exception ok 14676 - $vrlex->[$gbl][$lex]{"x$lex"} = 123: value ok 14677 - exists $vrlex->[$gbl][$lex]{"x$lex"}: no exception ok 14678 - exists $vrlex->[$gbl][$lex]{"x$lex"}: value ok 14679 - delete $vrlex->[$gbl][$lex]{"x$lex"}: no exception ok 14680 - delete $vrlex->[$gbl][$lex]{"x$lex"}: value ok 14681 - $vrgbl->[$gbl][$lex]{"x$lex"}: no exception ok 14682 - $vrgbl->[$gbl][$lex]{"x$lex"}: value ok 14683 - $vrgbl->[$gbl][$lex]{"x$lex"} = 123: no exception ok 14684 - $vrgbl->[$gbl][$lex]{"x$lex"} = 123: value ok 14685 - exists $vrgbl->[$gbl][$lex]{"x$lex"}: no exception ok 14686 - exists $vrgbl->[$gbl][$lex]{"x$lex"}: value ok 14687 - delete $vrgbl->[$gbl][$lex]{"x$lex"}: no exception ok 14688 - delete $vrgbl->[$gbl][$lex]{"x$lex"}: value ok 14689 - $vlex[$lex+1][$lex]{"x$lex"}: no exception ok 14690 - $vlex[$lex+1][$lex]{"x$lex"}: value ok 14691 - $vlex[$lex+1][$lex]{"x$lex"} = 123: no exception ok 14692 - $vlex[$lex+1][$lex]{"x$lex"} = 123: value ok 14693 - exists $vlex[$lex+1][$lex]{"x$lex"}: no exception ok 14694 - exists $vlex[$lex+1][$lex]{"x$lex"}: value ok 14695 - delete $vlex[$lex+1][$lex]{"x$lex"}: no exception ok 14696 - delete $vlex[$lex+1][$lex]{"x$lex"}: value ok 14697 - $vgbl[$lex+1][$lex]{"x$lex"}: no exception ok 14698 - $vgbl[$lex+1][$lex]{"x$lex"}: value ok 14699 - $vgbl[$lex+1][$lex]{"x$lex"} = 123: no exception ok 14700 - $vgbl[$lex+1][$lex]{"x$lex"} = 123: value ok 14701 - exists $vgbl[$lex+1][$lex]{"x$lex"}: no exception ok 14702 - exists $vgbl[$lex+1][$lex]{"x$lex"}: value ok 14703 - delete $vgbl[$lex+1][$lex]{"x$lex"}: no exception ok 14704 - delete $vgbl[$lex+1][$lex]{"x$lex"}: value ok 14705 - $vrlex->[$lex+1][$lex]{"x$lex"}: no exception ok 14706 - $vrlex->[$lex+1][$lex]{"x$lex"}: value ok 14707 - $vrlex->[$lex+1][$lex]{"x$lex"} = 123: no exception ok 14708 - $vrlex->[$lex+1][$lex]{"x$lex"} = 123: value ok 14709 - exists $vrlex->[$lex+1][$lex]{"x$lex"}: no exception ok 14710 - exists $vrlex->[$lex+1][$lex]{"x$lex"}: value ok 14711 - delete $vrlex->[$lex+1][$lex]{"x$lex"}: no exception ok 14712 - delete $vrlex->[$lex+1][$lex]{"x$lex"}: value ok 14713 - $vrgbl->[$lex+1][$lex]{"x$lex"}: no exception ok 14714 - $vrgbl->[$lex+1][$lex]{"x$lex"}: value ok 14715 - $vrgbl->[$lex+1][$lex]{"x$lex"} = 123: no exception ok 14716 - $vrgbl->[$lex+1][$lex]{"x$lex"} = 123: value ok 14717 - exists $vrgbl->[$lex+1][$lex]{"x$lex"}: no exception ok 14718 - exists $vrgbl->[$lex+1][$lex]{"x$lex"}: value ok 14719 - delete $vrgbl->[$lex+1][$lex]{"x$lex"}: no exception ok 14720 - delete $vrgbl->[$lex+1][$lex]{"x$lex"}: value ok 14721 - $vlex{foo}[$lex]{"x$lex"}: no exception ok 14722 - $vlex{foo}[$lex]{"x$lex"}: value ok 14723 - $vlex{foo}[$lex]{"x$lex"} = 123: no exception ok 14724 - $vlex{foo}[$lex]{"x$lex"} = 123: value ok 14725 - exists $vlex{foo}[$lex]{"x$lex"}: no exception ok 14726 - exists $vlex{foo}[$lex]{"x$lex"}: value ok 14727 - delete $vlex{foo}[$lex]{"x$lex"}: no exception ok 14728 - delete $vlex{foo}[$lex]{"x$lex"}: value ok 14729 - $vgbl{foo}[$lex]{"x$lex"}: no exception ok 14730 - $vgbl{foo}[$lex]{"x$lex"}: value ok 14731 - $vgbl{foo}[$lex]{"x$lex"} = 123: no exception ok 14732 - $vgbl{foo}[$lex]{"x$lex"} = 123: value ok 14733 - exists $vgbl{foo}[$lex]{"x$lex"}: no exception ok 14734 - exists $vgbl{foo}[$lex]{"x$lex"}: value ok 14735 - delete $vgbl{foo}[$lex]{"x$lex"}: no exception ok 14736 - delete $vgbl{foo}[$lex]{"x$lex"}: value ok 14737 - $vrlex->{foo}[$lex]{"x$lex"}: no exception ok 14738 - $vrlex->{foo}[$lex]{"x$lex"}: value ok 14739 - $vrlex->{foo}[$lex]{"x$lex"} = 123: no exception ok 14740 - $vrlex->{foo}[$lex]{"x$lex"} = 123: value ok 14741 - exists $vrlex->{foo}[$lex]{"x$lex"}: no exception ok 14742 - exists $vrlex->{foo}[$lex]{"x$lex"}: value ok 14743 - delete $vrlex->{foo}[$lex]{"x$lex"}: no exception ok 14744 - delete $vrlex->{foo}[$lex]{"x$lex"}: value ok 14745 - $vrgbl->{foo}[$lex]{"x$lex"}: no exception ok 14746 - $vrgbl->{foo}[$lex]{"x$lex"}: value ok 14747 - $vrgbl->{foo}[$lex]{"x$lex"} = 123: no exception ok 14748 - $vrgbl->{foo}[$lex]{"x$lex"} = 123: value ok 14749 - exists $vrgbl->{foo}[$lex]{"x$lex"}: no exception ok 14750 - exists $vrgbl->{foo}[$lex]{"x$lex"}: value ok 14751 - delete $vrgbl->{foo}[$lex]{"x$lex"}: no exception ok 14752 - delete $vrgbl->{foo}[$lex]{"x$lex"}: value ok 14753 - $vlex{$lex}[$lex]{"x$lex"}: no exception ok 14754 - $vlex{$lex}[$lex]{"x$lex"}: value ok 14755 - $vlex{$lex}[$lex]{"x$lex"} = 123: no exception ok 14756 - $vlex{$lex}[$lex]{"x$lex"} = 123: value ok 14757 - exists $vlex{$lex}[$lex]{"x$lex"}: no exception ok 14758 - exists $vlex{$lex}[$lex]{"x$lex"}: value ok 14759 - delete $vlex{$lex}[$lex]{"x$lex"}: no exception ok 14760 - delete $vlex{$lex}[$lex]{"x$lex"}: value ok 14761 - $vgbl{$lex}[$lex]{"x$lex"}: no exception ok 14762 - $vgbl{$lex}[$lex]{"x$lex"}: value ok 14763 - $vgbl{$lex}[$lex]{"x$lex"} = 123: no exception ok 14764 - $vgbl{$lex}[$lex]{"x$lex"} = 123: value ok 14765 - exists $vgbl{$lex}[$lex]{"x$lex"}: no exception ok 14766 - exists $vgbl{$lex}[$lex]{"x$lex"}: value ok 14767 - delete $vgbl{$lex}[$lex]{"x$lex"}: no exception ok 14768 - delete $vgbl{$lex}[$lex]{"x$lex"}: value ok 14769 - $vrlex->{$lex}[$lex]{"x$lex"}: no exception ok 14770 - $vrlex->{$lex}[$lex]{"x$lex"}: value ok 14771 - $vrlex->{$lex}[$lex]{"x$lex"} = 123: no exception ok 14772 - $vrlex->{$lex}[$lex]{"x$lex"} = 123: value ok 14773 - exists $vrlex->{$lex}[$lex]{"x$lex"}: no exception ok 14774 - exists $vrlex->{$lex}[$lex]{"x$lex"}: value ok 14775 - delete $vrlex->{$lex}[$lex]{"x$lex"}: no exception ok 14776 - delete $vrlex->{$lex}[$lex]{"x$lex"}: value ok 14777 - $vrgbl->{$lex}[$lex]{"x$lex"}: no exception ok 14778 - $vrgbl->{$lex}[$lex]{"x$lex"}: value ok 14779 - $vrgbl->{$lex}[$lex]{"x$lex"} = 123: no exception ok 14780 - $vrgbl->{$lex}[$lex]{"x$lex"} = 123: value ok 14781 - exists $vrgbl->{$lex}[$lex]{"x$lex"}: no exception ok 14782 - exists $vrgbl->{$lex}[$lex]{"x$lex"}: value ok 14783 - delete $vrgbl->{$lex}[$lex]{"x$lex"}: no exception ok 14784 - delete $vrgbl->{$lex}[$lex]{"x$lex"}: value ok 14785 - $vlex{$gbl}[$lex]{"x$lex"}: no exception ok 14786 - $vlex{$gbl}[$lex]{"x$lex"}: value ok 14787 - $vlex{$gbl}[$lex]{"x$lex"} = 123: no exception ok 14788 - $vlex{$gbl}[$lex]{"x$lex"} = 123: value ok 14789 - exists $vlex{$gbl}[$lex]{"x$lex"}: no exception ok 14790 - exists $vlex{$gbl}[$lex]{"x$lex"}: value ok 14791 - delete $vlex{$gbl}[$lex]{"x$lex"}: no exception ok 14792 - delete $vlex{$gbl}[$lex]{"x$lex"}: value ok 14793 - $vgbl{$gbl}[$lex]{"x$lex"}: no exception ok 14794 - $vgbl{$gbl}[$lex]{"x$lex"}: value ok 14795 - $vgbl{$gbl}[$lex]{"x$lex"} = 123: no exception ok 14796 - $vgbl{$gbl}[$lex]{"x$lex"} = 123: value ok 14797 - exists $vgbl{$gbl}[$lex]{"x$lex"}: no exception ok 14798 - exists $vgbl{$gbl}[$lex]{"x$lex"}: value ok 14799 - delete $vgbl{$gbl}[$lex]{"x$lex"}: no exception ok 14800 - delete $vgbl{$gbl}[$lex]{"x$lex"}: value ok 14801 - $vrlex->{$gbl}[$lex]{"x$lex"}: no exception ok 14802 - $vrlex->{$gbl}[$lex]{"x$lex"}: value ok 14803 - $vrlex->{$gbl}[$lex]{"x$lex"} = 123: no exception ok 14804 - $vrlex->{$gbl}[$lex]{"x$lex"} = 123: value ok 14805 - exists $vrlex->{$gbl}[$lex]{"x$lex"}: no exception ok 14806 - exists $vrlex->{$gbl}[$lex]{"x$lex"}: value ok 14807 - delete $vrlex->{$gbl}[$lex]{"x$lex"}: no exception ok 14808 - delete $vrlex->{$gbl}[$lex]{"x$lex"}: value ok 14809 - $vrgbl->{$gbl}[$lex]{"x$lex"}: no exception ok 14810 - $vrgbl->{$gbl}[$lex]{"x$lex"}: value ok 14811 - $vrgbl->{$gbl}[$lex]{"x$lex"} = 123: no exception ok 14812 - $vrgbl->{$gbl}[$lex]{"x$lex"} = 123: value ok 14813 - exists $vrgbl->{$gbl}[$lex]{"x$lex"}: no exception ok 14814 - exists $vrgbl->{$gbl}[$lex]{"x$lex"}: value ok 14815 - delete $vrgbl->{$gbl}[$lex]{"x$lex"}: no exception ok 14816 - delete $vrgbl->{$gbl}[$lex]{"x$lex"}: value ok 14817 - $vlex{"x$lex"}[$lex]{"x$lex"}: no exception ok 14818 - $vlex{"x$lex"}[$lex]{"x$lex"}: value ok 14819 - $vlex{"x$lex"}[$lex]{"x$lex"} = 123: no exception ok 14820 - $vlex{"x$lex"}[$lex]{"x$lex"} = 123: value ok 14821 - exists $vlex{"x$lex"}[$lex]{"x$lex"}: no exception ok 14822 - exists $vlex{"x$lex"}[$lex]{"x$lex"}: value ok 14823 - delete $vlex{"x$lex"}[$lex]{"x$lex"}: no exception ok 14824 - delete $vlex{"x$lex"}[$lex]{"x$lex"}: value ok 14825 - $vgbl{"x$lex"}[$lex]{"x$lex"}: no exception ok 14826 - $vgbl{"x$lex"}[$lex]{"x$lex"}: value ok 14827 - $vgbl{"x$lex"}[$lex]{"x$lex"} = 123: no exception ok 14828 - $vgbl{"x$lex"}[$lex]{"x$lex"} = 123: value ok 14829 - exists $vgbl{"x$lex"}[$lex]{"x$lex"}: no exception ok 14830 - exists $vgbl{"x$lex"}[$lex]{"x$lex"}: value ok 14831 - delete $vgbl{"x$lex"}[$lex]{"x$lex"}: no exception ok 14832 - delete $vgbl{"x$lex"}[$lex]{"x$lex"}: value ok 14833 - $vrlex->{"x$lex"}[$lex]{"x$lex"}: no exception ok 14834 - $vrlex->{"x$lex"}[$lex]{"x$lex"}: value ok 14835 - $vrlex->{"x$lex"}[$lex]{"x$lex"} = 123: no exception ok 14836 - $vrlex->{"x$lex"}[$lex]{"x$lex"} = 123: value ok 14837 - exists $vrlex->{"x$lex"}[$lex]{"x$lex"}: no exception ok 14838 - exists $vrlex->{"x$lex"}[$lex]{"x$lex"}: value ok 14839 - delete $vrlex->{"x$lex"}[$lex]{"x$lex"}: no exception ok 14840 - delete $vrlex->{"x$lex"}[$lex]{"x$lex"}: value ok 14841 - $vrgbl->{"x$lex"}[$lex]{"x$lex"}: no exception ok 14842 - $vrgbl->{"x$lex"}[$lex]{"x$lex"}: value ok 14843 - $vrgbl->{"x$lex"}[$lex]{"x$lex"} = 123: no exception ok 14844 - $vrgbl->{"x$lex"}[$lex]{"x$lex"} = 123: value ok 14845 - exists $vrgbl->{"x$lex"}[$lex]{"x$lex"}: no exception ok 14846 - exists $vrgbl->{"x$lex"}[$lex]{"x$lex"}: value ok 14847 - delete $vrgbl->{"x$lex"}[$lex]{"x$lex"}: no exception ok 14848 - delete $vrgbl->{"x$lex"}[$lex]{"x$lex"}: value ok 14849 - $vlex[0][$gbl]{"x$lex"}: no exception ok 14850 - $vlex[0][$gbl]{"x$lex"}: value ok 14851 - $vlex[0][$gbl]{"x$lex"} = 123: no exception ok 14852 - $vlex[0][$gbl]{"x$lex"} = 123: value ok 14853 - exists $vlex[0][$gbl]{"x$lex"}: no exception ok 14854 - exists $vlex[0][$gbl]{"x$lex"}: value ok 14855 - delete $vlex[0][$gbl]{"x$lex"}: no exception ok 14856 - delete $vlex[0][$gbl]{"x$lex"}: value ok 14857 - $vgbl[0][$gbl]{"x$lex"}: no exception ok 14858 - $vgbl[0][$gbl]{"x$lex"}: value ok 14859 - $vgbl[0][$gbl]{"x$lex"} = 123: no exception ok 14860 - $vgbl[0][$gbl]{"x$lex"} = 123: value ok 14861 - exists $vgbl[0][$gbl]{"x$lex"}: no exception ok 14862 - exists $vgbl[0][$gbl]{"x$lex"}: value ok 14863 - delete $vgbl[0][$gbl]{"x$lex"}: no exception ok 14864 - delete $vgbl[0][$gbl]{"x$lex"}: value ok 14865 - $vrlex->[0][$gbl]{"x$lex"}: no exception ok 14866 - $vrlex->[0][$gbl]{"x$lex"}: value ok 14867 - $vrlex->[0][$gbl]{"x$lex"} = 123: no exception ok 14868 - $vrlex->[0][$gbl]{"x$lex"} = 123: value ok 14869 - exists $vrlex->[0][$gbl]{"x$lex"}: no exception ok 14870 - exists $vrlex->[0][$gbl]{"x$lex"}: value ok 14871 - delete $vrlex->[0][$gbl]{"x$lex"}: no exception ok 14872 - delete $vrlex->[0][$gbl]{"x$lex"}: value ok 14873 - $vrgbl->[0][$gbl]{"x$lex"}: no exception ok 14874 - $vrgbl->[0][$gbl]{"x$lex"}: value ok 14875 - $vrgbl->[0][$gbl]{"x$lex"} = 123: no exception ok 14876 - $vrgbl->[0][$gbl]{"x$lex"} = 123: value ok 14877 - exists $vrgbl->[0][$gbl]{"x$lex"}: no exception ok 14878 - exists $vrgbl->[0][$gbl]{"x$lex"}: value ok 14879 - delete $vrgbl->[0][$gbl]{"x$lex"}: no exception ok 14880 - delete $vrgbl->[0][$gbl]{"x$lex"}: value ok 14881 - $vlex[$lex][$gbl]{"x$lex"}: no exception ok 14882 - $vlex[$lex][$gbl]{"x$lex"}: value ok 14883 - $vlex[$lex][$gbl]{"x$lex"} = 123: no exception ok 14884 - $vlex[$lex][$gbl]{"x$lex"} = 123: value ok 14885 - exists $vlex[$lex][$gbl]{"x$lex"}: no exception ok 14886 - exists $vlex[$lex][$gbl]{"x$lex"}: value ok 14887 - delete $vlex[$lex][$gbl]{"x$lex"}: no exception ok 14888 - delete $vlex[$lex][$gbl]{"x$lex"}: value ok 14889 - $vgbl[$lex][$gbl]{"x$lex"}: no exception ok 14890 - $vgbl[$lex][$gbl]{"x$lex"}: value ok 14891 - $vgbl[$lex][$gbl]{"x$lex"} = 123: no exception ok 14892 - $vgbl[$lex][$gbl]{"x$lex"} = 123: value ok 14893 - exists $vgbl[$lex][$gbl]{"x$lex"}: no exception ok 14894 - exists $vgbl[$lex][$gbl]{"x$lex"}: value ok 14895 - delete $vgbl[$lex][$gbl]{"x$lex"}: no exception ok 14896 - delete $vgbl[$lex][$gbl]{"x$lex"}: value ok 14897 - $vrlex->[$lex][$gbl]{"x$lex"}: no exception ok 14898 - $vrlex->[$lex][$gbl]{"x$lex"}: value ok 14899 - $vrlex->[$lex][$gbl]{"x$lex"} = 123: no exception ok 14900 - $vrlex->[$lex][$gbl]{"x$lex"} = 123: value ok 14901 - exists $vrlex->[$lex][$gbl]{"x$lex"}: no exception ok 14902 - exists $vrlex->[$lex][$gbl]{"x$lex"}: value ok 14903 - delete $vrlex->[$lex][$gbl]{"x$lex"}: no exception ok 14904 - delete $vrlex->[$lex][$gbl]{"x$lex"}: value ok 14905 - $vrgbl->[$lex][$gbl]{"x$lex"}: no exception ok 14906 - $vrgbl->[$lex][$gbl]{"x$lex"}: value ok 14907 - $vrgbl->[$lex][$gbl]{"x$lex"} = 123: no exception ok 14908 - $vrgbl->[$lex][$gbl]{"x$lex"} = 123: value ok 14909 - exists $vrgbl->[$lex][$gbl]{"x$lex"}: no exception ok 14910 - exists $vrgbl->[$lex][$gbl]{"x$lex"}: value ok 14911 - delete $vrgbl->[$lex][$gbl]{"x$lex"}: no exception ok 14912 - delete $vrgbl->[$lex][$gbl]{"x$lex"}: value ok 14913 - $vlex[$gbl][$gbl]{"x$lex"}: no exception ok 14914 - $vlex[$gbl][$gbl]{"x$lex"}: value ok 14915 - $vlex[$gbl][$gbl]{"x$lex"} = 123: no exception ok 14916 - $vlex[$gbl][$gbl]{"x$lex"} = 123: value ok 14917 - exists $vlex[$gbl][$gbl]{"x$lex"}: no exception ok 14918 - exists $vlex[$gbl][$gbl]{"x$lex"}: value ok 14919 - delete $vlex[$gbl][$gbl]{"x$lex"}: no exception ok 14920 - delete $vlex[$gbl][$gbl]{"x$lex"}: value ok 14921 - $vgbl[$gbl][$gbl]{"x$lex"}: no exception ok 14922 - $vgbl[$gbl][$gbl]{"x$lex"}: value ok 14923 - $vgbl[$gbl][$gbl]{"x$lex"} = 123: no exception ok 14924 - $vgbl[$gbl][$gbl]{"x$lex"} = 123: value ok 14925 - exists $vgbl[$gbl][$gbl]{"x$lex"}: no exception ok 14926 - exists $vgbl[$gbl][$gbl]{"x$lex"}: value ok 14927 - delete $vgbl[$gbl][$gbl]{"x$lex"}: no exception ok 14928 - delete $vgbl[$gbl][$gbl]{"x$lex"}: value ok 14929 - $vrlex->[$gbl][$gbl]{"x$lex"}: no exception ok 14930 - $vrlex->[$gbl][$gbl]{"x$lex"}: value ok 14931 - $vrlex->[$gbl][$gbl]{"x$lex"} = 123: no exception ok 14932 - $vrlex->[$gbl][$gbl]{"x$lex"} = 123: value ok 14933 - exists $vrlex->[$gbl][$gbl]{"x$lex"}: no exception ok 14934 - exists $vrlex->[$gbl][$gbl]{"x$lex"}: value ok 14935 - delete $vrlex->[$gbl][$gbl]{"x$lex"}: no exception ok 14936 - delete $vrlex->[$gbl][$gbl]{"x$lex"}: value ok 14937 - $vrgbl->[$gbl][$gbl]{"x$lex"}: no exception ok 14938 - $vrgbl->[$gbl][$gbl]{"x$lex"}: value ok 14939 - $vrgbl->[$gbl][$gbl]{"x$lex"} = 123: no exception ok 14940 - $vrgbl->[$gbl][$gbl]{"x$lex"} = 123: value ok 14941 - exists $vrgbl->[$gbl][$gbl]{"x$lex"}: no exception ok 14942 - exists $vrgbl->[$gbl][$gbl]{"x$lex"}: value ok 14943 - delete $vrgbl->[$gbl][$gbl]{"x$lex"}: no exception ok 14944 - delete $vrgbl->[$gbl][$gbl]{"x$lex"}: value ok 14945 - $vlex[$lex+1][$gbl]{"x$lex"}: no exception ok 14946 - $vlex[$lex+1][$gbl]{"x$lex"}: value ok 14947 - $vlex[$lex+1][$gbl]{"x$lex"} = 123: no exception ok 14948 - $vlex[$lex+1][$gbl]{"x$lex"} = 123: value ok 14949 - exists $vlex[$lex+1][$gbl]{"x$lex"}: no exception ok 14950 - exists $vlex[$lex+1][$gbl]{"x$lex"}: value ok 14951 - delete $vlex[$lex+1][$gbl]{"x$lex"}: no exception ok 14952 - delete $vlex[$lex+1][$gbl]{"x$lex"}: value ok 14953 - $vgbl[$lex+1][$gbl]{"x$lex"}: no exception ok 14954 - $vgbl[$lex+1][$gbl]{"x$lex"}: value ok 14955 - $vgbl[$lex+1][$gbl]{"x$lex"} = 123: no exception ok 14956 - $vgbl[$lex+1][$gbl]{"x$lex"} = 123: value ok 14957 - exists $vgbl[$lex+1][$gbl]{"x$lex"}: no exception ok 14958 - exists $vgbl[$lex+1][$gbl]{"x$lex"}: value ok 14959 - delete $vgbl[$lex+1][$gbl]{"x$lex"}: no exception ok 14960 - delete $vgbl[$lex+1][$gbl]{"x$lex"}: value ok 14961 - $vrlex->[$lex+1][$gbl]{"x$lex"}: no exception ok 14962 - $vrlex->[$lex+1][$gbl]{"x$lex"}: value ok 14963 - $vrlex->[$lex+1][$gbl]{"x$lex"} = 123: no exception ok 14964 - $vrlex->[$lex+1][$gbl]{"x$lex"} = 123: value ok 14965 - exists $vrlex->[$lex+1][$gbl]{"x$lex"}: no exception ok 14966 - exists $vrlex->[$lex+1][$gbl]{"x$lex"}: value ok 14967 - delete $vrlex->[$lex+1][$gbl]{"x$lex"}: no exception ok 14968 - delete $vrlex->[$lex+1][$gbl]{"x$lex"}: value ok 14969 - $vrgbl->[$lex+1][$gbl]{"x$lex"}: no exception ok 14970 - $vrgbl->[$lex+1][$gbl]{"x$lex"}: value ok 14971 - $vrgbl->[$lex+1][$gbl]{"x$lex"} = 123: no exception ok 14972 - $vrgbl->[$lex+1][$gbl]{"x$lex"} = 123: value ok 14973 - exists $vrgbl->[$lex+1][$gbl]{"x$lex"}: no exception ok 14974 - exists $vrgbl->[$lex+1][$gbl]{"x$lex"}: value ok 14975 - delete $vrgbl->[$lex+1][$gbl]{"x$lex"}: no exception ok 14976 - delete $vrgbl->[$lex+1][$gbl]{"x$lex"}: value ok 14977 - $vlex{foo}[$gbl]{"x$lex"}: no exception ok 14978 - $vlex{foo}[$gbl]{"x$lex"}: value ok 14979 - $vlex{foo}[$gbl]{"x$lex"} = 123: no exception ok 14980 - $vlex{foo}[$gbl]{"x$lex"} = 123: value ok 14981 - exists $vlex{foo}[$gbl]{"x$lex"}: no exception ok 14982 - exists $vlex{foo}[$gbl]{"x$lex"}: value ok 14983 - delete $vlex{foo}[$gbl]{"x$lex"}: no exception ok 14984 - delete $vlex{foo}[$gbl]{"x$lex"}: value ok 14985 - $vgbl{foo}[$gbl]{"x$lex"}: no exception ok 14986 - $vgbl{foo}[$gbl]{"x$lex"}: value ok 14987 - $vgbl{foo}[$gbl]{"x$lex"} = 123: no exception ok 14988 - $vgbl{foo}[$gbl]{"x$lex"} = 123: value ok 14989 - exists $vgbl{foo}[$gbl]{"x$lex"}: no exception ok 14990 - exists $vgbl{foo}[$gbl]{"x$lex"}: value ok 14991 - delete $vgbl{foo}[$gbl]{"x$lex"}: no exception ok 14992 - delete $vgbl{foo}[$gbl]{"x$lex"}: value ok 14993 - $vrlex->{foo}[$gbl]{"x$lex"}: no exception ok 14994 - $vrlex->{foo}[$gbl]{"x$lex"}: value ok 14995 - $vrlex->{foo}[$gbl]{"x$lex"} = 123: no exception ok 14996 - $vrlex->{foo}[$gbl]{"x$lex"} = 123: value ok 14997 - exists $vrlex->{foo}[$gbl]{"x$lex"}: no exception ok 14998 - exists $vrlex->{foo}[$gbl]{"x$lex"}: value ok 14999 - delete $vrlex->{foo}[$gbl]{"x$lex"}: no exception ok 15000 - delete $vrlex->{foo}[$gbl]{"x$lex"}: value ok 15001 - $vrgbl->{foo}[$gbl]{"x$lex"}: no exception ok 15002 - $vrgbl->{foo}[$gbl]{"x$lex"}: value ok 15003 - $vrgbl->{foo}[$gbl]{"x$lex"} = 123: no exception ok 15004 - $vrgbl->{foo}[$gbl]{"x$lex"} = 123: value ok 15005 - exists $vrgbl->{foo}[$gbl]{"x$lex"}: no exception ok 15006 - exists $vrgbl->{foo}[$gbl]{"x$lex"}: value ok 15007 - delete $vrgbl->{foo}[$gbl]{"x$lex"}: no exception ok 15008 - delete $vrgbl->{foo}[$gbl]{"x$lex"}: value ok 15009 - $vlex{$lex}[$gbl]{"x$lex"}: no exception ok 15010 - $vlex{$lex}[$gbl]{"x$lex"}: value ok 15011 - $vlex{$lex}[$gbl]{"x$lex"} = 123: no exception ok 15012 - $vlex{$lex}[$gbl]{"x$lex"} = 123: value ok 15013 - exists $vlex{$lex}[$gbl]{"x$lex"}: no exception ok 15014 - exists $vlex{$lex}[$gbl]{"x$lex"}: value ok 15015 - delete $vlex{$lex}[$gbl]{"x$lex"}: no exception ok 15016 - delete $vlex{$lex}[$gbl]{"x$lex"}: value ok 15017 - $vgbl{$lex}[$gbl]{"x$lex"}: no exception ok 15018 - $vgbl{$lex}[$gbl]{"x$lex"}: value ok 15019 - $vgbl{$lex}[$gbl]{"x$lex"} = 123: no exception ok 15020 - $vgbl{$lex}[$gbl]{"x$lex"} = 123: value ok 15021 - exists $vgbl{$lex}[$gbl]{"x$lex"}: no exception ok 15022 - exists $vgbl{$lex}[$gbl]{"x$lex"}: value ok 15023 - delete $vgbl{$lex}[$gbl]{"x$lex"}: no exception ok 15024 - delete $vgbl{$lex}[$gbl]{"x$lex"}: value ok 15025 - $vrlex->{$lex}[$gbl]{"x$lex"}: no exception ok 15026 - $vrlex->{$lex}[$gbl]{"x$lex"}: value ok 15027 - $vrlex->{$lex}[$gbl]{"x$lex"} = 123: no exception ok 15028 - $vrlex->{$lex}[$gbl]{"x$lex"} = 123: value ok 15029 - exists $vrlex->{$lex}[$gbl]{"x$lex"}: no exception ok 15030 - exists $vrlex->{$lex}[$gbl]{"x$lex"}: value ok 15031 - delete $vrlex->{$lex}[$gbl]{"x$lex"}: no exception ok 15032 - delete $vrlex->{$lex}[$gbl]{"x$lex"}: value ok 15033 - $vrgbl->{$lex}[$gbl]{"x$lex"}: no exception ok 15034 - $vrgbl->{$lex}[$gbl]{"x$lex"}: value ok 15035 - $vrgbl->{$lex}[$gbl]{"x$lex"} = 123: no exception ok 15036 - $vrgbl->{$lex}[$gbl]{"x$lex"} = 123: value ok 15037 - exists $vrgbl->{$lex}[$gbl]{"x$lex"}: no exception ok 15038 - exists $vrgbl->{$lex}[$gbl]{"x$lex"}: value ok 15039 - delete $vrgbl->{$lex}[$gbl]{"x$lex"}: no exception ok 15040 - delete $vrgbl->{$lex}[$gbl]{"x$lex"}: value ok 15041 - $vlex{$gbl}[$gbl]{"x$lex"}: no exception ok 15042 - $vlex{$gbl}[$gbl]{"x$lex"}: value ok 15043 - $vlex{$gbl}[$gbl]{"x$lex"} = 123: no exception ok 15044 - $vlex{$gbl}[$gbl]{"x$lex"} = 123: value ok 15045 - exists $vlex{$gbl}[$gbl]{"x$lex"}: no exception ok 15046 - exists $vlex{$gbl}[$gbl]{"x$lex"}: value ok 15047 - delete $vlex{$gbl}[$gbl]{"x$lex"}: no exception ok 15048 - delete $vlex{$gbl}[$gbl]{"x$lex"}: value ok 15049 - $vgbl{$gbl}[$gbl]{"x$lex"}: no exception ok 15050 - $vgbl{$gbl}[$gbl]{"x$lex"}: value ok 15051 - $vgbl{$gbl}[$gbl]{"x$lex"} = 123: no exception ok 15052 - $vgbl{$gbl}[$gbl]{"x$lex"} = 123: value ok 15053 - exists $vgbl{$gbl}[$gbl]{"x$lex"}: no exception ok 15054 - exists $vgbl{$gbl}[$gbl]{"x$lex"}: value ok 15055 - delete $vgbl{$gbl}[$gbl]{"x$lex"}: no exception ok 15056 - delete $vgbl{$gbl}[$gbl]{"x$lex"}: value ok 15057 - $vrlex->{$gbl}[$gbl]{"x$lex"}: no exception ok 15058 - $vrlex->{$gbl}[$gbl]{"x$lex"}: value ok 15059 - $vrlex->{$gbl}[$gbl]{"x$lex"} = 123: no exception ok 15060 - $vrlex->{$gbl}[$gbl]{"x$lex"} = 123: value ok 15061 - exists $vrlex->{$gbl}[$gbl]{"x$lex"}: no exception ok 15062 - exists $vrlex->{$gbl}[$gbl]{"x$lex"}: value ok 15063 - delete $vrlex->{$gbl}[$gbl]{"x$lex"}: no exception ok 15064 - delete $vrlex->{$gbl}[$gbl]{"x$lex"}: value ok 15065 - $vrgbl->{$gbl}[$gbl]{"x$lex"}: no exception ok 15066 - $vrgbl->{$gbl}[$gbl]{"x$lex"}: value ok 15067 - $vrgbl->{$gbl}[$gbl]{"x$lex"} = 123: no exception ok 15068 - $vrgbl->{$gbl}[$gbl]{"x$lex"} = 123: value ok 15069 - exists $vrgbl->{$gbl}[$gbl]{"x$lex"}: no exception ok 15070 - exists $vrgbl->{$gbl}[$gbl]{"x$lex"}: value ok 15071 - delete $vrgbl->{$gbl}[$gbl]{"x$lex"}: no exception ok 15072 - delete $vrgbl->{$gbl}[$gbl]{"x$lex"}: value ok 15073 - $vlex{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15074 - $vlex{"x$lex"}[$gbl]{"x$lex"}: value ok 15075 - $vlex{"x$lex"}[$gbl]{"x$lex"} = 123: no exception ok 15076 - $vlex{"x$lex"}[$gbl]{"x$lex"} = 123: value ok 15077 - exists $vlex{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15078 - exists $vlex{"x$lex"}[$gbl]{"x$lex"}: value ok 15079 - delete $vlex{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15080 - delete $vlex{"x$lex"}[$gbl]{"x$lex"}: value ok 15081 - $vgbl{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15082 - $vgbl{"x$lex"}[$gbl]{"x$lex"}: value ok 15083 - $vgbl{"x$lex"}[$gbl]{"x$lex"} = 123: no exception ok 15084 - $vgbl{"x$lex"}[$gbl]{"x$lex"} = 123: value ok 15085 - exists $vgbl{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15086 - exists $vgbl{"x$lex"}[$gbl]{"x$lex"}: value ok 15087 - delete $vgbl{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15088 - delete $vgbl{"x$lex"}[$gbl]{"x$lex"}: value ok 15089 - $vrlex->{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15090 - $vrlex->{"x$lex"}[$gbl]{"x$lex"}: value ok 15091 - $vrlex->{"x$lex"}[$gbl]{"x$lex"} = 123: no exception ok 15092 - $vrlex->{"x$lex"}[$gbl]{"x$lex"} = 123: value ok 15093 - exists $vrlex->{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15094 - exists $vrlex->{"x$lex"}[$gbl]{"x$lex"}: value ok 15095 - delete $vrlex->{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15096 - delete $vrlex->{"x$lex"}[$gbl]{"x$lex"}: value ok 15097 - $vrgbl->{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15098 - $vrgbl->{"x$lex"}[$gbl]{"x$lex"}: value ok 15099 - $vrgbl->{"x$lex"}[$gbl]{"x$lex"} = 123: no exception ok 15100 - $vrgbl->{"x$lex"}[$gbl]{"x$lex"} = 123: value ok 15101 - exists $vrgbl->{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15102 - exists $vrgbl->{"x$lex"}[$gbl]{"x$lex"}: value ok 15103 - delete $vrgbl->{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15104 - delete $vrgbl->{"x$lex"}[$gbl]{"x$lex"}: value ok 15105 - $vlex[0][$lex+1]{"x$lex"}: no exception ok 15106 - $vlex[0][$lex+1]{"x$lex"}: value ok 15107 - $vlex[0][$lex+1]{"x$lex"} = 123: no exception ok 15108 - $vlex[0][$lex+1]{"x$lex"} = 123: value ok 15109 - exists $vlex[0][$lex+1]{"x$lex"}: no exception ok 15110 - exists $vlex[0][$lex+1]{"x$lex"}: value ok 15111 - delete $vlex[0][$lex+1]{"x$lex"}: no exception ok 15112 - delete $vlex[0][$lex+1]{"x$lex"}: value ok 15113 - $vgbl[0][$lex+1]{"x$lex"}: no exception ok 15114 - $vgbl[0][$lex+1]{"x$lex"}: value ok 15115 - $vgbl[0][$lex+1]{"x$lex"} = 123: no exception ok 15116 - $vgbl[0][$lex+1]{"x$lex"} = 123: value ok 15117 - exists $vgbl[0][$lex+1]{"x$lex"}: no exception ok 15118 - exists $vgbl[0][$lex+1]{"x$lex"}: value ok 15119 - delete $vgbl[0][$lex+1]{"x$lex"}: no exception ok 15120 - delete $vgbl[0][$lex+1]{"x$lex"}: value ok 15121 - $vrlex->[0][$lex+1]{"x$lex"}: no exception ok 15122 - $vrlex->[0][$lex+1]{"x$lex"}: value ok 15123 - $vrlex->[0][$lex+1]{"x$lex"} = 123: no exception ok 15124 - $vrlex->[0][$lex+1]{"x$lex"} = 123: value ok 15125 - exists $vrlex->[0][$lex+1]{"x$lex"}: no exception ok 15126 - exists $vrlex->[0][$lex+1]{"x$lex"}: value ok 15127 - delete $vrlex->[0][$lex+1]{"x$lex"}: no exception ok 15128 - delete $vrlex->[0][$lex+1]{"x$lex"}: value ok 15129 - $vrgbl->[0][$lex+1]{"x$lex"}: no exception ok 15130 - $vrgbl->[0][$lex+1]{"x$lex"}: value ok 15131 - $vrgbl->[0][$lex+1]{"x$lex"} = 123: no exception ok 15132 - $vrgbl->[0][$lex+1]{"x$lex"} = 123: value ok 15133 - exists $vrgbl->[0][$lex+1]{"x$lex"}: no exception ok 15134 - exists $vrgbl->[0][$lex+1]{"x$lex"}: value ok 15135 - delete $vrgbl->[0][$lex+1]{"x$lex"}: no exception ok 15136 - delete $vrgbl->[0][$lex+1]{"x$lex"}: value ok 15137 - $vlex[$lex][$lex+1]{"x$lex"}: no exception ok 15138 - $vlex[$lex][$lex+1]{"x$lex"}: value ok 15139 - $vlex[$lex][$lex+1]{"x$lex"} = 123: no exception ok 15140 - $vlex[$lex][$lex+1]{"x$lex"} = 123: value ok 15141 - exists $vlex[$lex][$lex+1]{"x$lex"}: no exception ok 15142 - exists $vlex[$lex][$lex+1]{"x$lex"}: value ok 15143 - delete $vlex[$lex][$lex+1]{"x$lex"}: no exception ok 15144 - delete $vlex[$lex][$lex+1]{"x$lex"}: value ok 15145 - $vgbl[$lex][$lex+1]{"x$lex"}: no exception ok 15146 - $vgbl[$lex][$lex+1]{"x$lex"}: value ok 15147 - $vgbl[$lex][$lex+1]{"x$lex"} = 123: no exception ok 15148 - $vgbl[$lex][$lex+1]{"x$lex"} = 123: value ok 15149 - exists $vgbl[$lex][$lex+1]{"x$lex"}: no exception ok 15150 - exists $vgbl[$lex][$lex+1]{"x$lex"}: value ok 15151 - delete $vgbl[$lex][$lex+1]{"x$lex"}: no exception ok 15152 - delete $vgbl[$lex][$lex+1]{"x$lex"}: value ok 15153 - $vrlex->[$lex][$lex+1]{"x$lex"}: no exception ok 15154 - $vrlex->[$lex][$lex+1]{"x$lex"}: value ok 15155 - $vrlex->[$lex][$lex+1]{"x$lex"} = 123: no exception ok 15156 - $vrlex->[$lex][$lex+1]{"x$lex"} = 123: value ok 15157 - exists $vrlex->[$lex][$lex+1]{"x$lex"}: no exception ok 15158 - exists $vrlex->[$lex][$lex+1]{"x$lex"}: value ok 15159 - delete $vrlex->[$lex][$lex+1]{"x$lex"}: no exception ok 15160 - delete $vrlex->[$lex][$lex+1]{"x$lex"}: value ok 15161 - $vrgbl->[$lex][$lex+1]{"x$lex"}: no exception ok 15162 - $vrgbl->[$lex][$lex+1]{"x$lex"}: value ok 15163 - $vrgbl->[$lex][$lex+1]{"x$lex"} = 123: no exception ok 15164 - $vrgbl->[$lex][$lex+1]{"x$lex"} = 123: value ok 15165 - exists $vrgbl->[$lex][$lex+1]{"x$lex"}: no exception ok 15166 - exists $vrgbl->[$lex][$lex+1]{"x$lex"}: value ok 15167 - delete $vrgbl->[$lex][$lex+1]{"x$lex"}: no exception ok 15168 - delete $vrgbl->[$lex][$lex+1]{"x$lex"}: value ok 15169 - $vlex[$gbl][$lex+1]{"x$lex"}: no exception ok 15170 - $vlex[$gbl][$lex+1]{"x$lex"}: value ok 15171 - $vlex[$gbl][$lex+1]{"x$lex"} = 123: no exception ok 15172 - $vlex[$gbl][$lex+1]{"x$lex"} = 123: value ok 15173 - exists $vlex[$gbl][$lex+1]{"x$lex"}: no exception ok 15174 - exists $vlex[$gbl][$lex+1]{"x$lex"}: value ok 15175 - delete $vlex[$gbl][$lex+1]{"x$lex"}: no exception ok 15176 - delete $vlex[$gbl][$lex+1]{"x$lex"}: value ok 15177 - $vgbl[$gbl][$lex+1]{"x$lex"}: no exception ok 15178 - $vgbl[$gbl][$lex+1]{"x$lex"}: value ok 15179 - $vgbl[$gbl][$lex+1]{"x$lex"} = 123: no exception ok 15180 - $vgbl[$gbl][$lex+1]{"x$lex"} = 123: value ok 15181 - exists $vgbl[$gbl][$lex+1]{"x$lex"}: no exception ok 15182 - exists $vgbl[$gbl][$lex+1]{"x$lex"}: value ok 15183 - delete $vgbl[$gbl][$lex+1]{"x$lex"}: no exception ok 15184 - delete $vgbl[$gbl][$lex+1]{"x$lex"}: value ok 15185 - $vrlex->[$gbl][$lex+1]{"x$lex"}: no exception ok 15186 - $vrlex->[$gbl][$lex+1]{"x$lex"}: value ok 15187 - $vrlex->[$gbl][$lex+1]{"x$lex"} = 123: no exception ok 15188 - $vrlex->[$gbl][$lex+1]{"x$lex"} = 123: value ok 15189 - exists $vrlex->[$gbl][$lex+1]{"x$lex"}: no exception ok 15190 - exists $vrlex->[$gbl][$lex+1]{"x$lex"}: value ok 15191 - delete $vrlex->[$gbl][$lex+1]{"x$lex"}: no exception ok 15192 - delete $vrlex->[$gbl][$lex+1]{"x$lex"}: value ok 15193 - $vrgbl->[$gbl][$lex+1]{"x$lex"}: no exception ok 15194 - $vrgbl->[$gbl][$lex+1]{"x$lex"}: value ok 15195 - $vrgbl->[$gbl][$lex+1]{"x$lex"} = 123: no exception ok 15196 - $vrgbl->[$gbl][$lex+1]{"x$lex"} = 123: value ok 15197 - exists $vrgbl->[$gbl][$lex+1]{"x$lex"}: no exception ok 15198 - exists $vrgbl->[$gbl][$lex+1]{"x$lex"}: value ok 15199 - delete $vrgbl->[$gbl][$lex+1]{"x$lex"}: no exception ok 15200 - delete $vrgbl->[$gbl][$lex+1]{"x$lex"}: value ok 15201 - $vlex[$lex+1][$lex+1]{"x$lex"}: no exception ok 15202 - $vlex[$lex+1][$lex+1]{"x$lex"}: value ok 15203 - $vlex[$lex+1][$lex+1]{"x$lex"} = 123: no exception ok 15204 - $vlex[$lex+1][$lex+1]{"x$lex"} = 123: value ok 15205 - exists $vlex[$lex+1][$lex+1]{"x$lex"}: no exception ok 15206 - exists $vlex[$lex+1][$lex+1]{"x$lex"}: value ok 15207 - delete $vlex[$lex+1][$lex+1]{"x$lex"}: no exception ok 15208 - delete $vlex[$lex+1][$lex+1]{"x$lex"}: value ok 15209 - $vgbl[$lex+1][$lex+1]{"x$lex"}: no exception ok 15210 - $vgbl[$lex+1][$lex+1]{"x$lex"}: value ok 15211 - $vgbl[$lex+1][$lex+1]{"x$lex"} = 123: no exception ok 15212 - $vgbl[$lex+1][$lex+1]{"x$lex"} = 123: value ok 15213 - exists $vgbl[$lex+1][$lex+1]{"x$lex"}: no exception ok 15214 - exists $vgbl[$lex+1][$lex+1]{"x$lex"}: value ok 15215 - delete $vgbl[$lex+1][$lex+1]{"x$lex"}: no exception ok 15216 - delete $vgbl[$lex+1][$lex+1]{"x$lex"}: value ok 15217 - $vrlex->[$lex+1][$lex+1]{"x$lex"}: no exception ok 15218 - $vrlex->[$lex+1][$lex+1]{"x$lex"}: value ok 15219 - $vrlex->[$lex+1][$lex+1]{"x$lex"} = 123: no exception ok 15220 - $vrlex->[$lex+1][$lex+1]{"x$lex"} = 123: value ok 15221 - exists $vrlex->[$lex+1][$lex+1]{"x$lex"}: no exception ok 15222 - exists $vrlex->[$lex+1][$lex+1]{"x$lex"}: value ok 15223 - delete $vrlex->[$lex+1][$lex+1]{"x$lex"}: no exception ok 15224 - delete $vrlex->[$lex+1][$lex+1]{"x$lex"}: value ok 15225 - $vrgbl->[$lex+1][$lex+1]{"x$lex"}: no exception ok 15226 - $vrgbl->[$lex+1][$lex+1]{"x$lex"}: value ok 15227 - $vrgbl->[$lex+1][$lex+1]{"x$lex"} = 123: no exception ok 15228 - $vrgbl->[$lex+1][$lex+1]{"x$lex"} = 123: value ok 15229 - exists $vrgbl->[$lex+1][$lex+1]{"x$lex"}: no exception ok 15230 - exists $vrgbl->[$lex+1][$lex+1]{"x$lex"}: value ok 15231 - delete $vrgbl->[$lex+1][$lex+1]{"x$lex"}: no exception ok 15232 - delete $vrgbl->[$lex+1][$lex+1]{"x$lex"}: value ok 15233 - $vlex{foo}[$lex+1]{"x$lex"}: no exception ok 15234 - $vlex{foo}[$lex+1]{"x$lex"}: value ok 15235 - $vlex{foo}[$lex+1]{"x$lex"} = 123: no exception ok 15236 - $vlex{foo}[$lex+1]{"x$lex"} = 123: value ok 15237 - exists $vlex{foo}[$lex+1]{"x$lex"}: no exception ok 15238 - exists $vlex{foo}[$lex+1]{"x$lex"}: value ok 15239 - delete $vlex{foo}[$lex+1]{"x$lex"}: no exception ok 15240 - delete $vlex{foo}[$lex+1]{"x$lex"}: value ok 15241 - $vgbl{foo}[$lex+1]{"x$lex"}: no exception ok 15242 - $vgbl{foo}[$lex+1]{"x$lex"}: value ok 15243 - $vgbl{foo}[$lex+1]{"x$lex"} = 123: no exception ok 15244 - $vgbl{foo}[$lex+1]{"x$lex"} = 123: value ok 15245 - exists $vgbl{foo}[$lex+1]{"x$lex"}: no exception ok 15246 - exists $vgbl{foo}[$lex+1]{"x$lex"}: value ok 15247 - delete $vgbl{foo}[$lex+1]{"x$lex"}: no exception ok 15248 - delete $vgbl{foo}[$lex+1]{"x$lex"}: value ok 15249 - $vrlex->{foo}[$lex+1]{"x$lex"}: no exception ok 15250 - $vrlex->{foo}[$lex+1]{"x$lex"}: value ok 15251 - $vrlex->{foo}[$lex+1]{"x$lex"} = 123: no exception ok 15252 - $vrlex->{foo}[$lex+1]{"x$lex"} = 123: value ok 15253 - exists $vrlex->{foo}[$lex+1]{"x$lex"}: no exception ok 15254 - exists $vrlex->{foo}[$lex+1]{"x$lex"}: value ok 15255 - delete $vrlex->{foo}[$lex+1]{"x$lex"}: no exception ok 15256 - delete $vrlex->{foo}[$lex+1]{"x$lex"}: value ok 15257 - $vrgbl->{foo}[$lex+1]{"x$lex"}: no exception ok 15258 - $vrgbl->{foo}[$lex+1]{"x$lex"}: value ok 15259 - $vrgbl->{foo}[$lex+1]{"x$lex"} = 123: no exception ok 15260 - $vrgbl->{foo}[$lex+1]{"x$lex"} = 123: value ok 15261 - exists $vrgbl->{foo}[$lex+1]{"x$lex"}: no exception ok 15262 - exists $vrgbl->{foo}[$lex+1]{"x$lex"}: value ok 15263 - delete $vrgbl->{foo}[$lex+1]{"x$lex"}: no exception ok 15264 - delete $vrgbl->{foo}[$lex+1]{"x$lex"}: value ok 15265 - $vlex{$lex}[$lex+1]{"x$lex"}: no exception ok 15266 - $vlex{$lex}[$lex+1]{"x$lex"}: value ok 15267 - $vlex{$lex}[$lex+1]{"x$lex"} = 123: no exception ok 15268 - $vlex{$lex}[$lex+1]{"x$lex"} = 123: value ok 15269 - exists $vlex{$lex}[$lex+1]{"x$lex"}: no exception ok 15270 - exists $vlex{$lex}[$lex+1]{"x$lex"}: value ok 15271 - delete $vlex{$lex}[$lex+1]{"x$lex"}: no exception ok 15272 - delete $vlex{$lex}[$lex+1]{"x$lex"}: value ok 15273 - $vgbl{$lex}[$lex+1]{"x$lex"}: no exception ok 15274 - $vgbl{$lex}[$lex+1]{"x$lex"}: value ok 15275 - $vgbl{$lex}[$lex+1]{"x$lex"} = 123: no exception ok 15276 - $vgbl{$lex}[$lex+1]{"x$lex"} = 123: value ok 15277 - exists $vgbl{$lex}[$lex+1]{"x$lex"}: no exception ok 15278 - exists $vgbl{$lex}[$lex+1]{"x$lex"}: value ok 15279 - delete $vgbl{$lex}[$lex+1]{"x$lex"}: no exception ok 15280 - delete $vgbl{$lex}[$lex+1]{"x$lex"}: value ok 15281 - $vrlex->{$lex}[$lex+1]{"x$lex"}: no exception ok 15282 - $vrlex->{$lex}[$lex+1]{"x$lex"}: value ok 15283 - $vrlex->{$lex}[$lex+1]{"x$lex"} = 123: no exception ok 15284 - $vrlex->{$lex}[$lex+1]{"x$lex"} = 123: value ok 15285 - exists $vrlex->{$lex}[$lex+1]{"x$lex"}: no exception ok 15286 - exists $vrlex->{$lex}[$lex+1]{"x$lex"}: value ok 15287 - delete $vrlex->{$lex}[$lex+1]{"x$lex"}: no exception ok 15288 - delete $vrlex->{$lex}[$lex+1]{"x$lex"}: value ok 15289 - $vrgbl->{$lex}[$lex+1]{"x$lex"}: no exception ok 15290 - $vrgbl->{$lex}[$lex+1]{"x$lex"}: value ok 15291 - $vrgbl->{$lex}[$lex+1]{"x$lex"} = 123: no exception ok 15292 - $vrgbl->{$lex}[$lex+1]{"x$lex"} = 123: value ok 15293 - exists $vrgbl->{$lex}[$lex+1]{"x$lex"}: no exception ok 15294 - exists $vrgbl->{$lex}[$lex+1]{"x$lex"}: value ok 15295 - delete $vrgbl->{$lex}[$lex+1]{"x$lex"}: no exception ok 15296 - delete $vrgbl->{$lex}[$lex+1]{"x$lex"}: value ok 15297 - $vlex{$gbl}[$lex+1]{"x$lex"}: no exception ok 15298 - $vlex{$gbl}[$lex+1]{"x$lex"}: value ok 15299 - $vlex{$gbl}[$lex+1]{"x$lex"} = 123: no exception ok 15300 - $vlex{$gbl}[$lex+1]{"x$lex"} = 123: value ok 15301 - exists $vlex{$gbl}[$lex+1]{"x$lex"}: no exception ok 15302 - exists $vlex{$gbl}[$lex+1]{"x$lex"}: value ok 15303 - delete $vlex{$gbl}[$lex+1]{"x$lex"}: no exception ok 15304 - delete $vlex{$gbl}[$lex+1]{"x$lex"}: value ok 15305 - $vgbl{$gbl}[$lex+1]{"x$lex"}: no exception ok 15306 - $vgbl{$gbl}[$lex+1]{"x$lex"}: value ok 15307 - $vgbl{$gbl}[$lex+1]{"x$lex"} = 123: no exception ok 15308 - $vgbl{$gbl}[$lex+1]{"x$lex"} = 123: value ok 15309 - exists $vgbl{$gbl}[$lex+1]{"x$lex"}: no exception ok 15310 - exists $vgbl{$gbl}[$lex+1]{"x$lex"}: value ok 15311 - delete $vgbl{$gbl}[$lex+1]{"x$lex"}: no exception ok 15312 - delete $vgbl{$gbl}[$lex+1]{"x$lex"}: value ok 15313 - $vrlex->{$gbl}[$lex+1]{"x$lex"}: no exception ok 15314 - $vrlex->{$gbl}[$lex+1]{"x$lex"}: value ok 15315 - $vrlex->{$gbl}[$lex+1]{"x$lex"} = 123: no exception ok 15316 - $vrlex->{$gbl}[$lex+1]{"x$lex"} = 123: value ok 15317 - exists $vrlex->{$gbl}[$lex+1]{"x$lex"}: no exception ok 15318 - exists $vrlex->{$gbl}[$lex+1]{"x$lex"}: value ok 15319 - delete $vrlex->{$gbl}[$lex+1]{"x$lex"}: no exception ok 15320 - delete $vrlex->{$gbl}[$lex+1]{"x$lex"}: value ok 15321 - $vrgbl->{$gbl}[$lex+1]{"x$lex"}: no exception ok 15322 - $vrgbl->{$gbl}[$lex+1]{"x$lex"}: value ok 15323 - $vrgbl->{$gbl}[$lex+1]{"x$lex"} = 123: no exception ok 15324 - $vrgbl->{$gbl}[$lex+1]{"x$lex"} = 123: value ok 15325 - exists $vrgbl->{$gbl}[$lex+1]{"x$lex"}: no exception ok 15326 - exists $vrgbl->{$gbl}[$lex+1]{"x$lex"}: value ok 15327 - delete $vrgbl->{$gbl}[$lex+1]{"x$lex"}: no exception ok 15328 - delete $vrgbl->{$gbl}[$lex+1]{"x$lex"}: value ok 15329 - $vlex{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15330 - $vlex{"x$lex"}[$lex+1]{"x$lex"}: value ok 15331 - $vlex{"x$lex"}[$lex+1]{"x$lex"} = 123: no exception ok 15332 - $vlex{"x$lex"}[$lex+1]{"x$lex"} = 123: value ok 15333 - exists $vlex{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15334 - exists $vlex{"x$lex"}[$lex+1]{"x$lex"}: value ok 15335 - delete $vlex{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15336 - delete $vlex{"x$lex"}[$lex+1]{"x$lex"}: value ok 15337 - $vgbl{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15338 - $vgbl{"x$lex"}[$lex+1]{"x$lex"}: value ok 15339 - $vgbl{"x$lex"}[$lex+1]{"x$lex"} = 123: no exception ok 15340 - $vgbl{"x$lex"}[$lex+1]{"x$lex"} = 123: value ok 15341 - exists $vgbl{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15342 - exists $vgbl{"x$lex"}[$lex+1]{"x$lex"}: value ok 15343 - delete $vgbl{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15344 - delete $vgbl{"x$lex"}[$lex+1]{"x$lex"}: value ok 15345 - $vrlex->{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15346 - $vrlex->{"x$lex"}[$lex+1]{"x$lex"}: value ok 15347 - $vrlex->{"x$lex"}[$lex+1]{"x$lex"} = 123: no exception ok 15348 - $vrlex->{"x$lex"}[$lex+1]{"x$lex"} = 123: value ok 15349 - exists $vrlex->{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15350 - exists $vrlex->{"x$lex"}[$lex+1]{"x$lex"}: value ok 15351 - delete $vrlex->{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15352 - delete $vrlex->{"x$lex"}[$lex+1]{"x$lex"}: value ok 15353 - $vrgbl->{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15354 - $vrgbl->{"x$lex"}[$lex+1]{"x$lex"}: value ok 15355 - $vrgbl->{"x$lex"}[$lex+1]{"x$lex"} = 123: no exception ok 15356 - $vrgbl->{"x$lex"}[$lex+1]{"x$lex"} = 123: value ok 15357 - exists $vrgbl->{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15358 - exists $vrgbl->{"x$lex"}[$lex+1]{"x$lex"}: value ok 15359 - delete $vrgbl->{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15360 - delete $vrgbl->{"x$lex"}[$lex+1]{"x$lex"}: value ok 15361 - $vlex[0]{foo}{"x$lex"}: no exception ok 15362 - $vlex[0]{foo}{"x$lex"}: value ok 15363 - $vlex[0]{foo}{"x$lex"} = 123: no exception ok 15364 - $vlex[0]{foo}{"x$lex"} = 123: value ok 15365 - exists $vlex[0]{foo}{"x$lex"}: no exception ok 15366 - exists $vlex[0]{foo}{"x$lex"}: value ok 15367 - delete $vlex[0]{foo}{"x$lex"}: no exception ok 15368 - delete $vlex[0]{foo}{"x$lex"}: value ok 15369 - $vgbl[0]{foo}{"x$lex"}: no exception ok 15370 - $vgbl[0]{foo}{"x$lex"}: value ok 15371 - $vgbl[0]{foo}{"x$lex"} = 123: no exception ok 15372 - $vgbl[0]{foo}{"x$lex"} = 123: value ok 15373 - exists $vgbl[0]{foo}{"x$lex"}: no exception ok 15374 - exists $vgbl[0]{foo}{"x$lex"}: value ok 15375 - delete $vgbl[0]{foo}{"x$lex"}: no exception ok 15376 - delete $vgbl[0]{foo}{"x$lex"}: value ok 15377 - $vrlex->[0]{foo}{"x$lex"}: no exception ok 15378 - $vrlex->[0]{foo}{"x$lex"}: value ok 15379 - $vrlex->[0]{foo}{"x$lex"} = 123: no exception ok 15380 - $vrlex->[0]{foo}{"x$lex"} = 123: value ok 15381 - exists $vrlex->[0]{foo}{"x$lex"}: no exception ok 15382 - exists $vrlex->[0]{foo}{"x$lex"}: value ok 15383 - delete $vrlex->[0]{foo}{"x$lex"}: no exception ok 15384 - delete $vrlex->[0]{foo}{"x$lex"}: value ok 15385 - $vrgbl->[0]{foo}{"x$lex"}: no exception ok 15386 - $vrgbl->[0]{foo}{"x$lex"}: value ok 15387 - $vrgbl->[0]{foo}{"x$lex"} = 123: no exception ok 15388 - $vrgbl->[0]{foo}{"x$lex"} = 123: value ok 15389 - exists $vrgbl->[0]{foo}{"x$lex"}: no exception ok 15390 - exists $vrgbl->[0]{foo}{"x$lex"}: value ok 15391 - delete $vrgbl->[0]{foo}{"x$lex"}: no exception ok 15392 - delete $vrgbl->[0]{foo}{"x$lex"}: value ok 15393 - $vlex[$lex]{foo}{"x$lex"}: no exception ok 15394 - $vlex[$lex]{foo}{"x$lex"}: value ok 15395 - $vlex[$lex]{foo}{"x$lex"} = 123: no exception ok 15396 - $vlex[$lex]{foo}{"x$lex"} = 123: value ok 15397 - exists $vlex[$lex]{foo}{"x$lex"}: no exception ok 15398 - exists $vlex[$lex]{foo}{"x$lex"}: value ok 15399 - delete $vlex[$lex]{foo}{"x$lex"}: no exception ok 15400 - delete $vlex[$lex]{foo}{"x$lex"}: value ok 15401 - $vgbl[$lex]{foo}{"x$lex"}: no exception ok 15402 - $vgbl[$lex]{foo}{"x$lex"}: value ok 15403 - $vgbl[$lex]{foo}{"x$lex"} = 123: no exception ok 15404 - $vgbl[$lex]{foo}{"x$lex"} = 123: value ok 15405 - exists $vgbl[$lex]{foo}{"x$lex"}: no exception ok 15406 - exists $vgbl[$lex]{foo}{"x$lex"}: value ok 15407 - delete $vgbl[$lex]{foo}{"x$lex"}: no exception ok 15408 - delete $vgbl[$lex]{foo}{"x$lex"}: value ok 15409 - $vrlex->[$lex]{foo}{"x$lex"}: no exception ok 15410 - $vrlex->[$lex]{foo}{"x$lex"}: value ok 15411 - $vrlex->[$lex]{foo}{"x$lex"} = 123: no exception ok 15412 - $vrlex->[$lex]{foo}{"x$lex"} = 123: value ok 15413 - exists $vrlex->[$lex]{foo}{"x$lex"}: no exception ok 15414 - exists $vrlex->[$lex]{foo}{"x$lex"}: value ok 15415 - delete $vrlex->[$lex]{foo}{"x$lex"}: no exception ok 15416 - delete $vrlex->[$lex]{foo}{"x$lex"}: value ok 15417 - $vrgbl->[$lex]{foo}{"x$lex"}: no exception ok 15418 - $vrgbl->[$lex]{foo}{"x$lex"}: value ok 15419 - $vrgbl->[$lex]{foo}{"x$lex"} = 123: no exception ok 15420 - $vrgbl->[$lex]{foo}{"x$lex"} = 123: value ok 15421 - exists $vrgbl->[$lex]{foo}{"x$lex"}: no exception ok 15422 - exists $vrgbl->[$lex]{foo}{"x$lex"}: value ok 15423 - delete $vrgbl->[$lex]{foo}{"x$lex"}: no exception ok 15424 - delete $vrgbl->[$lex]{foo}{"x$lex"}: value ok 15425 - $vlex[$gbl]{foo}{"x$lex"}: no exception ok 15426 - $vlex[$gbl]{foo}{"x$lex"}: value ok 15427 - $vlex[$gbl]{foo}{"x$lex"} = 123: no exception ok 15428 - $vlex[$gbl]{foo}{"x$lex"} = 123: value ok 15429 - exists $vlex[$gbl]{foo}{"x$lex"}: no exception ok 15430 - exists $vlex[$gbl]{foo}{"x$lex"}: value ok 15431 - delete $vlex[$gbl]{foo}{"x$lex"}: no exception ok 15432 - delete $vlex[$gbl]{foo}{"x$lex"}: value ok 15433 - $vgbl[$gbl]{foo}{"x$lex"}: no exception ok 15434 - $vgbl[$gbl]{foo}{"x$lex"}: value ok 15435 - $vgbl[$gbl]{foo}{"x$lex"} = 123: no exception ok 15436 - $vgbl[$gbl]{foo}{"x$lex"} = 123: value ok 15437 - exists $vgbl[$gbl]{foo}{"x$lex"}: no exception ok 15438 - exists $vgbl[$gbl]{foo}{"x$lex"}: value ok 15439 - delete $vgbl[$gbl]{foo}{"x$lex"}: no exception ok 15440 - delete $vgbl[$gbl]{foo}{"x$lex"}: value ok 15441 - $vrlex->[$gbl]{foo}{"x$lex"}: no exception ok 15442 - $vrlex->[$gbl]{foo}{"x$lex"}: value ok 15443 - $vrlex->[$gbl]{foo}{"x$lex"} = 123: no exception ok 15444 - $vrlex->[$gbl]{foo}{"x$lex"} = 123: value ok 15445 - exists $vrlex->[$gbl]{foo}{"x$lex"}: no exception ok 15446 - exists $vrlex->[$gbl]{foo}{"x$lex"}: value ok 15447 - delete $vrlex->[$gbl]{foo}{"x$lex"}: no exception ok 15448 - delete $vrlex->[$gbl]{foo}{"x$lex"}: value ok 15449 - $vrgbl->[$gbl]{foo}{"x$lex"}: no exception ok 15450 - $vrgbl->[$gbl]{foo}{"x$lex"}: value ok 15451 - $vrgbl->[$gbl]{foo}{"x$lex"} = 123: no exception ok 15452 - $vrgbl->[$gbl]{foo}{"x$lex"} = 123: value ok 15453 - exists $vrgbl->[$gbl]{foo}{"x$lex"}: no exception ok 15454 - exists $vrgbl->[$gbl]{foo}{"x$lex"}: value ok 15455 - delete $vrgbl->[$gbl]{foo}{"x$lex"}: no exception ok 15456 - delete $vrgbl->[$gbl]{foo}{"x$lex"}: value ok 15457 - $vlex[$lex+1]{foo}{"x$lex"}: no exception ok 15458 - $vlex[$lex+1]{foo}{"x$lex"}: value ok 15459 - $vlex[$lex+1]{foo}{"x$lex"} = 123: no exception ok 15460 - $vlex[$lex+1]{foo}{"x$lex"} = 123: value ok 15461 - exists $vlex[$lex+1]{foo}{"x$lex"}: no exception ok 15462 - exists $vlex[$lex+1]{foo}{"x$lex"}: value ok 15463 - delete $vlex[$lex+1]{foo}{"x$lex"}: no exception ok 15464 - delete $vlex[$lex+1]{foo}{"x$lex"}: value ok 15465 - $vgbl[$lex+1]{foo}{"x$lex"}: no exception ok 15466 - $vgbl[$lex+1]{foo}{"x$lex"}: value ok 15467 - $vgbl[$lex+1]{foo}{"x$lex"} = 123: no exception ok 15468 - $vgbl[$lex+1]{foo}{"x$lex"} = 123: value ok 15469 - exists $vgbl[$lex+1]{foo}{"x$lex"}: no exception ok 15470 - exists $vgbl[$lex+1]{foo}{"x$lex"}: value ok 15471 - delete $vgbl[$lex+1]{foo}{"x$lex"}: no exception ok 15472 - delete $vgbl[$lex+1]{foo}{"x$lex"}: value ok 15473 - $vrlex->[$lex+1]{foo}{"x$lex"}: no exception ok 15474 - $vrlex->[$lex+1]{foo}{"x$lex"}: value ok 15475 - $vrlex->[$lex+1]{foo}{"x$lex"} = 123: no exception ok 15476 - $vrlex->[$lex+1]{foo}{"x$lex"} = 123: value ok 15477 - exists $vrlex->[$lex+1]{foo}{"x$lex"}: no exception ok 15478 - exists $vrlex->[$lex+1]{foo}{"x$lex"}: value ok 15479 - delete $vrlex->[$lex+1]{foo}{"x$lex"}: no exception ok 15480 - delete $vrlex->[$lex+1]{foo}{"x$lex"}: value ok 15481 - $vrgbl->[$lex+1]{foo}{"x$lex"}: no exception ok 15482 - $vrgbl->[$lex+1]{foo}{"x$lex"}: value ok 15483 - $vrgbl->[$lex+1]{foo}{"x$lex"} = 123: no exception ok 15484 - $vrgbl->[$lex+1]{foo}{"x$lex"} = 123: value ok 15485 - exists $vrgbl->[$lex+1]{foo}{"x$lex"}: no exception ok 15486 - exists $vrgbl->[$lex+1]{foo}{"x$lex"}: value ok 15487 - delete $vrgbl->[$lex+1]{foo}{"x$lex"}: no exception ok 15488 - delete $vrgbl->[$lex+1]{foo}{"x$lex"}: value ok 15489 - $vlex{foo}{foo}{"x$lex"}: no exception ok 15490 - $vlex{foo}{foo}{"x$lex"}: value ok 15491 - $vlex{foo}{foo}{"x$lex"} = 123: no exception ok 15492 - $vlex{foo}{foo}{"x$lex"} = 123: value ok 15493 - exists $vlex{foo}{foo}{"x$lex"}: no exception ok 15494 - exists $vlex{foo}{foo}{"x$lex"}: value ok 15495 - delete $vlex{foo}{foo}{"x$lex"}: no exception ok 15496 - delete $vlex{foo}{foo}{"x$lex"}: value ok 15497 - $vgbl{foo}{foo}{"x$lex"}: no exception ok 15498 - $vgbl{foo}{foo}{"x$lex"}: value ok 15499 - $vgbl{foo}{foo}{"x$lex"} = 123: no exception ok 15500 - $vgbl{foo}{foo}{"x$lex"} = 123: value ok 15501 - exists $vgbl{foo}{foo}{"x$lex"}: no exception ok 15502 - exists $vgbl{foo}{foo}{"x$lex"}: value ok 15503 - delete $vgbl{foo}{foo}{"x$lex"}: no exception ok 15504 - delete $vgbl{foo}{foo}{"x$lex"}: value ok 15505 - $vrlex->{foo}{foo}{"x$lex"}: no exception ok 15506 - $vrlex->{foo}{foo}{"x$lex"}: value ok 15507 - $vrlex->{foo}{foo}{"x$lex"} = 123: no exception ok 15508 - $vrlex->{foo}{foo}{"x$lex"} = 123: value ok 15509 - exists $vrlex->{foo}{foo}{"x$lex"}: no exception ok 15510 - exists $vrlex->{foo}{foo}{"x$lex"}: value ok 15511 - delete $vrlex->{foo}{foo}{"x$lex"}: no exception ok 15512 - delete $vrlex->{foo}{foo}{"x$lex"}: value ok 15513 - $vrgbl->{foo}{foo}{"x$lex"}: no exception ok 15514 - $vrgbl->{foo}{foo}{"x$lex"}: value ok 15515 - $vrgbl->{foo}{foo}{"x$lex"} = 123: no exception ok 15516 - $vrgbl->{foo}{foo}{"x$lex"} = 123: value ok 15517 - exists $vrgbl->{foo}{foo}{"x$lex"}: no exception ok 15518 - exists $vrgbl->{foo}{foo}{"x$lex"}: value ok 15519 - delete $vrgbl->{foo}{foo}{"x$lex"}: no exception ok 15520 - delete $vrgbl->{foo}{foo}{"x$lex"}: value ok 15521 - $vlex{$lex}{foo}{"x$lex"}: no exception ok 15522 - $vlex{$lex}{foo}{"x$lex"}: value ok 15523 - $vlex{$lex}{foo}{"x$lex"} = 123: no exception ok 15524 - $vlex{$lex}{foo}{"x$lex"} = 123: value ok 15525 - exists $vlex{$lex}{foo}{"x$lex"}: no exception ok 15526 - exists $vlex{$lex}{foo}{"x$lex"}: value ok 15527 - delete $vlex{$lex}{foo}{"x$lex"}: no exception ok 15528 - delete $vlex{$lex}{foo}{"x$lex"}: value ok 15529 - $vgbl{$lex}{foo}{"x$lex"}: no exception ok 15530 - $vgbl{$lex}{foo}{"x$lex"}: value ok 15531 - $vgbl{$lex}{foo}{"x$lex"} = 123: no exception ok 15532 - $vgbl{$lex}{foo}{"x$lex"} = 123: value ok 15533 - exists $vgbl{$lex}{foo}{"x$lex"}: no exception ok 15534 - exists $vgbl{$lex}{foo}{"x$lex"}: value ok 15535 - delete $vgbl{$lex}{foo}{"x$lex"}: no exception ok 15536 - delete $vgbl{$lex}{foo}{"x$lex"}: value ok 15537 - $vrlex->{$lex}{foo}{"x$lex"}: no exception ok 15538 - $vrlex->{$lex}{foo}{"x$lex"}: value ok 15539 - $vrlex->{$lex}{foo}{"x$lex"} = 123: no exception ok 15540 - $vrlex->{$lex}{foo}{"x$lex"} = 123: value ok 15541 - exists $vrlex->{$lex}{foo}{"x$lex"}: no exception ok 15542 - exists $vrlex->{$lex}{foo}{"x$lex"}: value ok 15543 - delete $vrlex->{$lex}{foo}{"x$lex"}: no exception ok 15544 - delete $vrlex->{$lex}{foo}{"x$lex"}: value ok 15545 - $vrgbl->{$lex}{foo}{"x$lex"}: no exception ok 15546 - $vrgbl->{$lex}{foo}{"x$lex"}: value ok 15547 - $vrgbl->{$lex}{foo}{"x$lex"} = 123: no exception ok 15548 - $vrgbl->{$lex}{foo}{"x$lex"} = 123: value ok 15549 - exists $vrgbl->{$lex}{foo}{"x$lex"}: no exception ok 15550 - exists $vrgbl->{$lex}{foo}{"x$lex"}: value ok 15551 - delete $vrgbl->{$lex}{foo}{"x$lex"}: no exception ok 15552 - delete $vrgbl->{$lex}{foo}{"x$lex"}: value ok 15553 - $vlex{$gbl}{foo}{"x$lex"}: no exception ok 15554 - $vlex{$gbl}{foo}{"x$lex"}: value ok 15555 - $vlex{$gbl}{foo}{"x$lex"} = 123: no exception ok 15556 - $vlex{$gbl}{foo}{"x$lex"} = 123: value ok 15557 - exists $vlex{$gbl}{foo}{"x$lex"}: no exception ok 15558 - exists $vlex{$gbl}{foo}{"x$lex"}: value ok 15559 - delete $vlex{$gbl}{foo}{"x$lex"}: no exception ok 15560 - delete $vlex{$gbl}{foo}{"x$lex"}: value ok 15561 - $vgbl{$gbl}{foo}{"x$lex"}: no exception ok 15562 - $vgbl{$gbl}{foo}{"x$lex"}: value ok 15563 - $vgbl{$gbl}{foo}{"x$lex"} = 123: no exception ok 15564 - $vgbl{$gbl}{foo}{"x$lex"} = 123: value ok 15565 - exists $vgbl{$gbl}{foo}{"x$lex"}: no exception ok 15566 - exists $vgbl{$gbl}{foo}{"x$lex"}: value ok 15567 - delete $vgbl{$gbl}{foo}{"x$lex"}: no exception ok 15568 - delete $vgbl{$gbl}{foo}{"x$lex"}: value ok 15569 - $vrlex->{$gbl}{foo}{"x$lex"}: no exception ok 15570 - $vrlex->{$gbl}{foo}{"x$lex"}: value ok 15571 - $vrlex->{$gbl}{foo}{"x$lex"} = 123: no exception ok 15572 - $vrlex->{$gbl}{foo}{"x$lex"} = 123: value ok 15573 - exists $vrlex->{$gbl}{foo}{"x$lex"}: no exception ok 15574 - exists $vrlex->{$gbl}{foo}{"x$lex"}: value ok 15575 - delete $vrlex->{$gbl}{foo}{"x$lex"}: no exception ok 15576 - delete $vrlex->{$gbl}{foo}{"x$lex"}: value ok 15577 - $vrgbl->{$gbl}{foo}{"x$lex"}: no exception ok 15578 - $vrgbl->{$gbl}{foo}{"x$lex"}: value ok 15579 - $vrgbl->{$gbl}{foo}{"x$lex"} = 123: no exception ok 15580 - $vrgbl->{$gbl}{foo}{"x$lex"} = 123: value ok 15581 - exists $vrgbl->{$gbl}{foo}{"x$lex"}: no exception ok 15582 - exists $vrgbl->{$gbl}{foo}{"x$lex"}: value ok 15583 - delete $vrgbl->{$gbl}{foo}{"x$lex"}: no exception ok 15584 - delete $vrgbl->{$gbl}{foo}{"x$lex"}: value ok 15585 - $vlex{"x$lex"}{foo}{"x$lex"}: no exception ok 15586 - $vlex{"x$lex"}{foo}{"x$lex"}: value ok 15587 - $vlex{"x$lex"}{foo}{"x$lex"} = 123: no exception ok 15588 - $vlex{"x$lex"}{foo}{"x$lex"} = 123: value ok 15589 - exists $vlex{"x$lex"}{foo}{"x$lex"}: no exception ok 15590 - exists $vlex{"x$lex"}{foo}{"x$lex"}: value ok 15591 - delete $vlex{"x$lex"}{foo}{"x$lex"}: no exception ok 15592 - delete $vlex{"x$lex"}{foo}{"x$lex"}: value ok 15593 - $vgbl{"x$lex"}{foo}{"x$lex"}: no exception ok 15594 - $vgbl{"x$lex"}{foo}{"x$lex"}: value ok 15595 - $vgbl{"x$lex"}{foo}{"x$lex"} = 123: no exception ok 15596 - $vgbl{"x$lex"}{foo}{"x$lex"} = 123: value ok 15597 - exists $vgbl{"x$lex"}{foo}{"x$lex"}: no exception ok 15598 - exists $vgbl{"x$lex"}{foo}{"x$lex"}: value ok 15599 - delete $vgbl{"x$lex"}{foo}{"x$lex"}: no exception ok 15600 - delete $vgbl{"x$lex"}{foo}{"x$lex"}: value ok 15601 - $vrlex->{"x$lex"}{foo}{"x$lex"}: no exception ok 15602 - $vrlex->{"x$lex"}{foo}{"x$lex"}: value ok 15603 - $vrlex->{"x$lex"}{foo}{"x$lex"} = 123: no exception ok 15604 - $vrlex->{"x$lex"}{foo}{"x$lex"} = 123: value ok 15605 - exists $vrlex->{"x$lex"}{foo}{"x$lex"}: no exception ok 15606 - exists $vrlex->{"x$lex"}{foo}{"x$lex"}: value ok 15607 - delete $vrlex->{"x$lex"}{foo}{"x$lex"}: no exception ok 15608 - delete $vrlex->{"x$lex"}{foo}{"x$lex"}: value ok 15609 - $vrgbl->{"x$lex"}{foo}{"x$lex"}: no exception ok 15610 - $vrgbl->{"x$lex"}{foo}{"x$lex"}: value ok 15611 - $vrgbl->{"x$lex"}{foo}{"x$lex"} = 123: no exception ok 15612 - $vrgbl->{"x$lex"}{foo}{"x$lex"} = 123: value ok 15613 - exists $vrgbl->{"x$lex"}{foo}{"x$lex"}: no exception ok 15614 - exists $vrgbl->{"x$lex"}{foo}{"x$lex"}: value ok 15615 - delete $vrgbl->{"x$lex"}{foo}{"x$lex"}: no exception ok 15616 - delete $vrgbl->{"x$lex"}{foo}{"x$lex"}: value ok 15617 - $vlex[0]{$lex}{"x$lex"}: no exception ok 15618 - $vlex[0]{$lex}{"x$lex"}: value ok 15619 - $vlex[0]{$lex}{"x$lex"} = 123: no exception ok 15620 - $vlex[0]{$lex}{"x$lex"} = 123: value ok 15621 - exists $vlex[0]{$lex}{"x$lex"}: no exception ok 15622 - exists $vlex[0]{$lex}{"x$lex"}: value ok 15623 - delete $vlex[0]{$lex}{"x$lex"}: no exception ok 15624 - delete $vlex[0]{$lex}{"x$lex"}: value ok 15625 - $vgbl[0]{$lex}{"x$lex"}: no exception ok 15626 - $vgbl[0]{$lex}{"x$lex"}: value ok 15627 - $vgbl[0]{$lex}{"x$lex"} = 123: no exception ok 15628 - $vgbl[0]{$lex}{"x$lex"} = 123: value ok 15629 - exists $vgbl[0]{$lex}{"x$lex"}: no exception ok 15630 - exists $vgbl[0]{$lex}{"x$lex"}: value ok 15631 - delete $vgbl[0]{$lex}{"x$lex"}: no exception ok 15632 - delete $vgbl[0]{$lex}{"x$lex"}: value ok 15633 - $vrlex->[0]{$lex}{"x$lex"}: no exception ok 15634 - $vrlex->[0]{$lex}{"x$lex"}: value ok 15635 - $vrlex->[0]{$lex}{"x$lex"} = 123: no exception ok 15636 - $vrlex->[0]{$lex}{"x$lex"} = 123: value ok 15637 - exists $vrlex->[0]{$lex}{"x$lex"}: no exception ok 15638 - exists $vrlex->[0]{$lex}{"x$lex"}: value ok 15639 - delete $vrlex->[0]{$lex}{"x$lex"}: no exception ok 15640 - delete $vrlex->[0]{$lex}{"x$lex"}: value ok 15641 - $vrgbl->[0]{$lex}{"x$lex"}: no exception ok 15642 - $vrgbl->[0]{$lex}{"x$lex"}: value ok 15643 - $vrgbl->[0]{$lex}{"x$lex"} = 123: no exception ok 15644 - $vrgbl->[0]{$lex}{"x$lex"} = 123: value ok 15645 - exists $vrgbl->[0]{$lex}{"x$lex"}: no exception ok 15646 - exists $vrgbl->[0]{$lex}{"x$lex"}: value ok 15647 - delete $vrgbl->[0]{$lex}{"x$lex"}: no exception ok 15648 - delete $vrgbl->[0]{$lex}{"x$lex"}: value ok 15649 - $vlex[$lex]{$lex}{"x$lex"}: no exception ok 15650 - $vlex[$lex]{$lex}{"x$lex"}: value ok 15651 - $vlex[$lex]{$lex}{"x$lex"} = 123: no exception ok 15652 - $vlex[$lex]{$lex}{"x$lex"} = 123: value ok 15653 - exists $vlex[$lex]{$lex}{"x$lex"}: no exception ok 15654 - exists $vlex[$lex]{$lex}{"x$lex"}: value ok 15655 - delete $vlex[$lex]{$lex}{"x$lex"}: no exception ok 15656 - delete $vlex[$lex]{$lex}{"x$lex"}: value ok 15657 - $vgbl[$lex]{$lex}{"x$lex"}: no exception ok 15658 - $vgbl[$lex]{$lex}{"x$lex"}: value ok 15659 - $vgbl[$lex]{$lex}{"x$lex"} = 123: no exception ok 15660 - $vgbl[$lex]{$lex}{"x$lex"} = 123: value ok 15661 - exists $vgbl[$lex]{$lex}{"x$lex"}: no exception ok 15662 - exists $vgbl[$lex]{$lex}{"x$lex"}: value ok 15663 - delete $vgbl[$lex]{$lex}{"x$lex"}: no exception ok 15664 - delete $vgbl[$lex]{$lex}{"x$lex"}: value ok 15665 - $vrlex->[$lex]{$lex}{"x$lex"}: no exception ok 15666 - $vrlex->[$lex]{$lex}{"x$lex"}: value ok 15667 - $vrlex->[$lex]{$lex}{"x$lex"} = 123: no exception ok 15668 - $vrlex->[$lex]{$lex}{"x$lex"} = 123: value ok 15669 - exists $vrlex->[$lex]{$lex}{"x$lex"}: no exception ok 15670 - exists $vrlex->[$lex]{$lex}{"x$lex"}: value ok 15671 - delete $vrlex->[$lex]{$lex}{"x$lex"}: no exception ok 15672 - delete $vrlex->[$lex]{$lex}{"x$lex"}: value ok 15673 - $vrgbl->[$lex]{$lex}{"x$lex"}: no exception ok 15674 - $vrgbl->[$lex]{$lex}{"x$lex"}: value ok 15675 - $vrgbl->[$lex]{$lex}{"x$lex"} = 123: no exception ok 15676 - $vrgbl->[$lex]{$lex}{"x$lex"} = 123: value ok 15677 - exists $vrgbl->[$lex]{$lex}{"x$lex"}: no exception ok 15678 - exists $vrgbl->[$lex]{$lex}{"x$lex"}: value ok 15679 - delete $vrgbl->[$lex]{$lex}{"x$lex"}: no exception ok 15680 - delete $vrgbl->[$lex]{$lex}{"x$lex"}: value ok 15681 - $vlex[$gbl]{$lex}{"x$lex"}: no exception ok 15682 - $vlex[$gbl]{$lex}{"x$lex"}: value ok 15683 - $vlex[$gbl]{$lex}{"x$lex"} = 123: no exception ok 15684 - $vlex[$gbl]{$lex}{"x$lex"} = 123: value ok 15685 - exists $vlex[$gbl]{$lex}{"x$lex"}: no exception ok 15686 - exists $vlex[$gbl]{$lex}{"x$lex"}: value ok 15687 - delete $vlex[$gbl]{$lex}{"x$lex"}: no exception ok 15688 - delete $vlex[$gbl]{$lex}{"x$lex"}: value ok 15689 - $vgbl[$gbl]{$lex}{"x$lex"}: no exception ok 15690 - $vgbl[$gbl]{$lex}{"x$lex"}: value ok 15691 - $vgbl[$gbl]{$lex}{"x$lex"} = 123: no exception ok 15692 - $vgbl[$gbl]{$lex}{"x$lex"} = 123: value ok 15693 - exists $vgbl[$gbl]{$lex}{"x$lex"}: no exception ok 15694 - exists $vgbl[$gbl]{$lex}{"x$lex"}: value ok 15695 - delete $vgbl[$gbl]{$lex}{"x$lex"}: no exception ok 15696 - delete $vgbl[$gbl]{$lex}{"x$lex"}: value ok 15697 - $vrlex->[$gbl]{$lex}{"x$lex"}: no exception ok 15698 - $vrlex->[$gbl]{$lex}{"x$lex"}: value ok 15699 - $vrlex->[$gbl]{$lex}{"x$lex"} = 123: no exception ok 15700 - $vrlex->[$gbl]{$lex}{"x$lex"} = 123: value ok 15701 - exists $vrlex->[$gbl]{$lex}{"x$lex"}: no exception ok 15702 - exists $vrlex->[$gbl]{$lex}{"x$lex"}: value ok 15703 - delete $vrlex->[$gbl]{$lex}{"x$lex"}: no exception ok 15704 - delete $vrlex->[$gbl]{$lex}{"x$lex"}: value ok 15705 - $vrgbl->[$gbl]{$lex}{"x$lex"}: no exception ok 15706 - $vrgbl->[$gbl]{$lex}{"x$lex"}: value ok 15707 - $vrgbl->[$gbl]{$lex}{"x$lex"} = 123: no exception ok 15708 - $vrgbl->[$gbl]{$lex}{"x$lex"} = 123: value ok 15709 - exists $vrgbl->[$gbl]{$lex}{"x$lex"}: no exception ok 15710 - exists $vrgbl->[$gbl]{$lex}{"x$lex"}: value ok 15711 - delete $vrgbl->[$gbl]{$lex}{"x$lex"}: no exception ok 15712 - delete $vrgbl->[$gbl]{$lex}{"x$lex"}: value ok 15713 - $vlex[$lex+1]{$lex}{"x$lex"}: no exception ok 15714 - $vlex[$lex+1]{$lex}{"x$lex"}: value ok 15715 - $vlex[$lex+1]{$lex}{"x$lex"} = 123: no exception ok 15716 - $vlex[$lex+1]{$lex}{"x$lex"} = 123: value ok 15717 - exists $vlex[$lex+1]{$lex}{"x$lex"}: no exception ok 15718 - exists $vlex[$lex+1]{$lex}{"x$lex"}: value ok 15719 - delete $vlex[$lex+1]{$lex}{"x$lex"}: no exception ok 15720 - delete $vlex[$lex+1]{$lex}{"x$lex"}: value ok 15721 - $vgbl[$lex+1]{$lex}{"x$lex"}: no exception ok 15722 - $vgbl[$lex+1]{$lex}{"x$lex"}: value ok 15723 - $vgbl[$lex+1]{$lex}{"x$lex"} = 123: no exception ok 15724 - $vgbl[$lex+1]{$lex}{"x$lex"} = 123: value ok 15725 - exists $vgbl[$lex+1]{$lex}{"x$lex"}: no exception ok 15726 - exists $vgbl[$lex+1]{$lex}{"x$lex"}: value ok 15727 - delete $vgbl[$lex+1]{$lex}{"x$lex"}: no exception ok 15728 - delete $vgbl[$lex+1]{$lex}{"x$lex"}: value ok 15729 - $vrlex->[$lex+1]{$lex}{"x$lex"}: no exception ok 15730 - $vrlex->[$lex+1]{$lex}{"x$lex"}: value ok 15731 - $vrlex->[$lex+1]{$lex}{"x$lex"} = 123: no exception ok 15732 - $vrlex->[$lex+1]{$lex}{"x$lex"} = 123: value ok 15733 - exists $vrlex->[$lex+1]{$lex}{"x$lex"}: no exception ok 15734 - exists $vrlex->[$lex+1]{$lex}{"x$lex"}: value ok 15735 - delete $vrlex->[$lex+1]{$lex}{"x$lex"}: no exception ok 15736 - delete $vrlex->[$lex+1]{$lex}{"x$lex"}: value ok 15737 - $vrgbl->[$lex+1]{$lex}{"x$lex"}: no exception ok 15738 - $vrgbl->[$lex+1]{$lex}{"x$lex"}: value ok 15739 - $vrgbl->[$lex+1]{$lex}{"x$lex"} = 123: no exception ok 15740 - $vrgbl->[$lex+1]{$lex}{"x$lex"} = 123: value ok 15741 - exists $vrgbl->[$lex+1]{$lex}{"x$lex"}: no exception ok 15742 - exists $vrgbl->[$lex+1]{$lex}{"x$lex"}: value ok 15743 - delete $vrgbl->[$lex+1]{$lex}{"x$lex"}: no exception ok 15744 - delete $vrgbl->[$lex+1]{$lex}{"x$lex"}: value ok 15745 - $vlex{foo}{$lex}{"x$lex"}: no exception ok 15746 - $vlex{foo}{$lex}{"x$lex"}: value ok 15747 - $vlex{foo}{$lex}{"x$lex"} = 123: no exception ok 15748 - $vlex{foo}{$lex}{"x$lex"} = 123: value ok 15749 - exists $vlex{foo}{$lex}{"x$lex"}: no exception ok 15750 - exists $vlex{foo}{$lex}{"x$lex"}: value ok 15751 - delete $vlex{foo}{$lex}{"x$lex"}: no exception ok 15752 - delete $vlex{foo}{$lex}{"x$lex"}: value ok 15753 - $vgbl{foo}{$lex}{"x$lex"}: no exception ok 15754 - $vgbl{foo}{$lex}{"x$lex"}: value ok 15755 - $vgbl{foo}{$lex}{"x$lex"} = 123: no exception ok 15756 - $vgbl{foo}{$lex}{"x$lex"} = 123: value ok 15757 - exists $vgbl{foo}{$lex}{"x$lex"}: no exception ok 15758 - exists $vgbl{foo}{$lex}{"x$lex"}: value ok 15759 - delete $vgbl{foo}{$lex}{"x$lex"}: no exception ok 15760 - delete $vgbl{foo}{$lex}{"x$lex"}: value ok 15761 - $vrlex->{foo}{$lex}{"x$lex"}: no exception ok 15762 - $vrlex->{foo}{$lex}{"x$lex"}: value ok 15763 - $vrlex->{foo}{$lex}{"x$lex"} = 123: no exception ok 15764 - $vrlex->{foo}{$lex}{"x$lex"} = 123: value ok 15765 - exists $vrlex->{foo}{$lex}{"x$lex"}: no exception ok 15766 - exists $vrlex->{foo}{$lex}{"x$lex"}: value ok 15767 - delete $vrlex->{foo}{$lex}{"x$lex"}: no exception ok 15768 - delete $vrlex->{foo}{$lex}{"x$lex"}: value ok 15769 - $vrgbl->{foo}{$lex}{"x$lex"}: no exception ok 15770 - $vrgbl->{foo}{$lex}{"x$lex"}: value ok 15771 - $vrgbl->{foo}{$lex}{"x$lex"} = 123: no exception ok 15772 - $vrgbl->{foo}{$lex}{"x$lex"} = 123: value ok 15773 - exists $vrgbl->{foo}{$lex}{"x$lex"}: no exception ok 15774 - exists $vrgbl->{foo}{$lex}{"x$lex"}: value ok 15775 - delete $vrgbl->{foo}{$lex}{"x$lex"}: no exception ok 15776 - delete $vrgbl->{foo}{$lex}{"x$lex"}: value ok 15777 - $vlex{$lex}{$lex}{"x$lex"}: no exception ok 15778 - $vlex{$lex}{$lex}{"x$lex"}: value ok 15779 - $vlex{$lex}{$lex}{"x$lex"} = 123: no exception ok 15780 - $vlex{$lex}{$lex}{"x$lex"} = 123: value ok 15781 - exists $vlex{$lex}{$lex}{"x$lex"}: no exception ok 15782 - exists $vlex{$lex}{$lex}{"x$lex"}: value ok 15783 - delete $vlex{$lex}{$lex}{"x$lex"}: no exception ok 15784 - delete $vlex{$lex}{$lex}{"x$lex"}: value ok 15785 - $vgbl{$lex}{$lex}{"x$lex"}: no exception ok 15786 - $vgbl{$lex}{$lex}{"x$lex"}: value ok 15787 - $vgbl{$lex}{$lex}{"x$lex"} = 123: no exception ok 15788 - $vgbl{$lex}{$lex}{"x$lex"} = 123: value ok 15789 - exists $vgbl{$lex}{$lex}{"x$lex"}: no exception ok 15790 - exists $vgbl{$lex}{$lex}{"x$lex"}: value ok 15791 - delete $vgbl{$lex}{$lex}{"x$lex"}: no exception ok 15792 - delete $vgbl{$lex}{$lex}{"x$lex"}: value ok 15793 - $vrlex->{$lex}{$lex}{"x$lex"}: no exception ok 15794 - $vrlex->{$lex}{$lex}{"x$lex"}: value ok 15795 - $vrlex->{$lex}{$lex}{"x$lex"} = 123: no exception ok 15796 - $vrlex->{$lex}{$lex}{"x$lex"} = 123: value ok 15797 - exists $vrlex->{$lex}{$lex}{"x$lex"}: no exception ok 15798 - exists $vrlex->{$lex}{$lex}{"x$lex"}: value ok 15799 - delete $vrlex->{$lex}{$lex}{"x$lex"}: no exception ok 15800 - delete $vrlex->{$lex}{$lex}{"x$lex"}: value ok 15801 - $vrgbl->{$lex}{$lex}{"x$lex"}: no exception ok 15802 - $vrgbl->{$lex}{$lex}{"x$lex"}: value ok 15803 - $vrgbl->{$lex}{$lex}{"x$lex"} = 123: no exception ok 15804 - $vrgbl->{$lex}{$lex}{"x$lex"} = 123: value ok 15805 - exists $vrgbl->{$lex}{$lex}{"x$lex"}: no exception ok 15806 - exists $vrgbl->{$lex}{$lex}{"x$lex"}: value ok 15807 - delete $vrgbl->{$lex}{$lex}{"x$lex"}: no exception ok 15808 - delete $vrgbl->{$lex}{$lex}{"x$lex"}: value ok 15809 - $vlex{$gbl}{$lex}{"x$lex"}: no exception ok 15810 - $vlex{$gbl}{$lex}{"x$lex"}: value ok 15811 - $vlex{$gbl}{$lex}{"x$lex"} = 123: no exception ok 15812 - $vlex{$gbl}{$lex}{"x$lex"} = 123: value ok 15813 - exists $vlex{$gbl}{$lex}{"x$lex"}: no exception ok 15814 - exists $vlex{$gbl}{$lex}{"x$lex"}: value ok 15815 - delete $vlex{$gbl}{$lex}{"x$lex"}: no exception ok 15816 - delete $vlex{$gbl}{$lex}{"x$lex"}: value ok 15817 - $vgbl{$gbl}{$lex}{"x$lex"}: no exception ok 15818 - $vgbl{$gbl}{$lex}{"x$lex"}: value ok 15819 - $vgbl{$gbl}{$lex}{"x$lex"} = 123: no exception ok 15820 - $vgbl{$gbl}{$lex}{"x$lex"} = 123: value ok 15821 - exists $vgbl{$gbl}{$lex}{"x$lex"}: no exception ok 15822 - exists $vgbl{$gbl}{$lex}{"x$lex"}: value ok 15823 - delete $vgbl{$gbl}{$lex}{"x$lex"}: no exception ok 15824 - delete $vgbl{$gbl}{$lex}{"x$lex"}: value ok 15825 - $vrlex->{$gbl}{$lex}{"x$lex"}: no exception ok 15826 - $vrlex->{$gbl}{$lex}{"x$lex"}: value ok 15827 - $vrlex->{$gbl}{$lex}{"x$lex"} = 123: no exception ok 15828 - $vrlex->{$gbl}{$lex}{"x$lex"} = 123: value ok 15829 - exists $vrlex->{$gbl}{$lex}{"x$lex"}: no exception ok 15830 - exists $vrlex->{$gbl}{$lex}{"x$lex"}: value ok 15831 - delete $vrlex->{$gbl}{$lex}{"x$lex"}: no exception ok 15832 - delete $vrlex->{$gbl}{$lex}{"x$lex"}: value ok 15833 - $vrgbl->{$gbl}{$lex}{"x$lex"}: no exception ok 15834 - $vrgbl->{$gbl}{$lex}{"x$lex"}: value ok 15835 - $vrgbl->{$gbl}{$lex}{"x$lex"} = 123: no exception ok 15836 - $vrgbl->{$gbl}{$lex}{"x$lex"} = 123: value ok 15837 - exists $vrgbl->{$gbl}{$lex}{"x$lex"}: no exception ok 15838 - exists $vrgbl->{$gbl}{$lex}{"x$lex"}: value ok 15839 - delete $vrgbl->{$gbl}{$lex}{"x$lex"}: no exception ok 15840 - delete $vrgbl->{$gbl}{$lex}{"x$lex"}: value ok 15841 - $vlex{"x$lex"}{$lex}{"x$lex"}: no exception ok 15842 - $vlex{"x$lex"}{$lex}{"x$lex"}: value ok 15843 - $vlex{"x$lex"}{$lex}{"x$lex"} = 123: no exception ok 15844 - $vlex{"x$lex"}{$lex}{"x$lex"} = 123: value ok 15845 - exists $vlex{"x$lex"}{$lex}{"x$lex"}: no exception ok 15846 - exists $vlex{"x$lex"}{$lex}{"x$lex"}: value ok 15847 - delete $vlex{"x$lex"}{$lex}{"x$lex"}: no exception ok 15848 - delete $vlex{"x$lex"}{$lex}{"x$lex"}: value ok 15849 - $vgbl{"x$lex"}{$lex}{"x$lex"}: no exception ok 15850 - $vgbl{"x$lex"}{$lex}{"x$lex"}: value ok 15851 - $vgbl{"x$lex"}{$lex}{"x$lex"} = 123: no exception ok 15852 - $vgbl{"x$lex"}{$lex}{"x$lex"} = 123: value ok 15853 - exists $vgbl{"x$lex"}{$lex}{"x$lex"}: no exception ok 15854 - exists $vgbl{"x$lex"}{$lex}{"x$lex"}: value ok 15855 - delete $vgbl{"x$lex"}{$lex}{"x$lex"}: no exception ok 15856 - delete $vgbl{"x$lex"}{$lex}{"x$lex"}: value ok 15857 - $vrlex->{"x$lex"}{$lex}{"x$lex"}: no exception ok 15858 - $vrlex->{"x$lex"}{$lex}{"x$lex"}: value ok 15859 - $vrlex->{"x$lex"}{$lex}{"x$lex"} = 123: no exception ok 15860 - $vrlex->{"x$lex"}{$lex}{"x$lex"} = 123: value ok 15861 - exists $vrlex->{"x$lex"}{$lex}{"x$lex"}: no exception ok 15862 - exists $vrlex->{"x$lex"}{$lex}{"x$lex"}: value ok 15863 - delete $vrlex->{"x$lex"}{$lex}{"x$lex"}: no exception ok 15864 - delete $vrlex->{"x$lex"}{$lex}{"x$lex"}: value ok 15865 - $vrgbl->{"x$lex"}{$lex}{"x$lex"}: no exception ok 15866 - $vrgbl->{"x$lex"}{$lex}{"x$lex"}: value ok 15867 - $vrgbl->{"x$lex"}{$lex}{"x$lex"} = 123: no exception ok 15868 - $vrgbl->{"x$lex"}{$lex}{"x$lex"} = 123: value ok 15869 - exists $vrgbl->{"x$lex"}{$lex}{"x$lex"}: no exception ok 15870 - exists $vrgbl->{"x$lex"}{$lex}{"x$lex"}: value ok 15871 - delete $vrgbl->{"x$lex"}{$lex}{"x$lex"}: no exception ok 15872 - delete $vrgbl->{"x$lex"}{$lex}{"x$lex"}: value ok 15873 - $vlex[0]{$gbl}{"x$lex"}: no exception ok 15874 - $vlex[0]{$gbl}{"x$lex"}: value ok 15875 - $vlex[0]{$gbl}{"x$lex"} = 123: no exception ok 15876 - $vlex[0]{$gbl}{"x$lex"} = 123: value ok 15877 - exists $vlex[0]{$gbl}{"x$lex"}: no exception ok 15878 - exists $vlex[0]{$gbl}{"x$lex"}: value ok 15879 - delete $vlex[0]{$gbl}{"x$lex"}: no exception ok 15880 - delete $vlex[0]{$gbl}{"x$lex"}: value ok 15881 - $vgbl[0]{$gbl}{"x$lex"}: no exception ok 15882 - $vgbl[0]{$gbl}{"x$lex"}: value ok 15883 - $vgbl[0]{$gbl}{"x$lex"} = 123: no exception ok 15884 - $vgbl[0]{$gbl}{"x$lex"} = 123: value ok 15885 - exists $vgbl[0]{$gbl}{"x$lex"}: no exception ok 15886 - exists $vgbl[0]{$gbl}{"x$lex"}: value ok 15887 - delete $vgbl[0]{$gbl}{"x$lex"}: no exception ok 15888 - delete $vgbl[0]{$gbl}{"x$lex"}: value ok 15889 - $vrlex->[0]{$gbl}{"x$lex"}: no exception ok 15890 - $vrlex->[0]{$gbl}{"x$lex"}: value ok 15891 - $vrlex->[0]{$gbl}{"x$lex"} = 123: no exception ok 15892 - $vrlex->[0]{$gbl}{"x$lex"} = 123: value ok 15893 - exists $vrlex->[0]{$gbl}{"x$lex"}: no exception ok 15894 - exists $vrlex->[0]{$gbl}{"x$lex"}: value ok 15895 - delete $vrlex->[0]{$gbl}{"x$lex"}: no exception ok 15896 - delete $vrlex->[0]{$gbl}{"x$lex"}: value ok 15897 - $vrgbl->[0]{$gbl}{"x$lex"}: no exception ok 15898 - $vrgbl->[0]{$gbl}{"x$lex"}: value ok 15899 - $vrgbl->[0]{$gbl}{"x$lex"} = 123: no exception ok 15900 - $vrgbl->[0]{$gbl}{"x$lex"} = 123: value ok 15901 - exists $vrgbl->[0]{$gbl}{"x$lex"}: no exception ok 15902 - exists $vrgbl->[0]{$gbl}{"x$lex"}: value ok 15903 - delete $vrgbl->[0]{$gbl}{"x$lex"}: no exception ok 15904 - delete $vrgbl->[0]{$gbl}{"x$lex"}: value ok 15905 - $vlex[$lex]{$gbl}{"x$lex"}: no exception ok 15906 - $vlex[$lex]{$gbl}{"x$lex"}: value ok 15907 - $vlex[$lex]{$gbl}{"x$lex"} = 123: no exception ok 15908 - $vlex[$lex]{$gbl}{"x$lex"} = 123: value ok 15909 - exists $vlex[$lex]{$gbl}{"x$lex"}: no exception ok 15910 - exists $vlex[$lex]{$gbl}{"x$lex"}: value ok 15911 - delete $vlex[$lex]{$gbl}{"x$lex"}: no exception ok 15912 - delete $vlex[$lex]{$gbl}{"x$lex"}: value ok 15913 - $vgbl[$lex]{$gbl}{"x$lex"}: no exception ok 15914 - $vgbl[$lex]{$gbl}{"x$lex"}: value ok 15915 - $vgbl[$lex]{$gbl}{"x$lex"} = 123: no exception ok 15916 - $vgbl[$lex]{$gbl}{"x$lex"} = 123: value ok 15917 - exists $vgbl[$lex]{$gbl}{"x$lex"}: no exception ok 15918 - exists $vgbl[$lex]{$gbl}{"x$lex"}: value ok 15919 - delete $vgbl[$lex]{$gbl}{"x$lex"}: no exception ok 15920 - delete $vgbl[$lex]{$gbl}{"x$lex"}: value ok 15921 - $vrlex->[$lex]{$gbl}{"x$lex"}: no exception ok 15922 - $vrlex->[$lex]{$gbl}{"x$lex"}: value ok 15923 - $vrlex->[$lex]{$gbl}{"x$lex"} = 123: no exception ok 15924 - $vrlex->[$lex]{$gbl}{"x$lex"} = 123: value ok 15925 - exists $vrlex->[$lex]{$gbl}{"x$lex"}: no exception ok 15926 - exists $vrlex->[$lex]{$gbl}{"x$lex"}: value ok 15927 - delete $vrlex->[$lex]{$gbl}{"x$lex"}: no exception ok 15928 - delete $vrlex->[$lex]{$gbl}{"x$lex"}: value ok 15929 - $vrgbl->[$lex]{$gbl}{"x$lex"}: no exception ok 15930 - $vrgbl->[$lex]{$gbl}{"x$lex"}: value ok 15931 - $vrgbl->[$lex]{$gbl}{"x$lex"} = 123: no exception ok 15932 - $vrgbl->[$lex]{$gbl}{"x$lex"} = 123: value ok 15933 - exists $vrgbl->[$lex]{$gbl}{"x$lex"}: no exception ok 15934 - exists $vrgbl->[$lex]{$gbl}{"x$lex"}: value ok 15935 - delete $vrgbl->[$lex]{$gbl}{"x$lex"}: no exception ok 15936 - delete $vrgbl->[$lex]{$gbl}{"x$lex"}: value ok 15937 - $vlex[$gbl]{$gbl}{"x$lex"}: no exception ok 15938 - $vlex[$gbl]{$gbl}{"x$lex"}: value ok 15939 - $vlex[$gbl]{$gbl}{"x$lex"} = 123: no exception ok 15940 - $vlex[$gbl]{$gbl}{"x$lex"} = 123: value ok 15941 - exists $vlex[$gbl]{$gbl}{"x$lex"}: no exception ok 15942 - exists $vlex[$gbl]{$gbl}{"x$lex"}: value ok 15943 - delete $vlex[$gbl]{$gbl}{"x$lex"}: no exception ok 15944 - delete $vlex[$gbl]{$gbl}{"x$lex"}: value ok 15945 - $vgbl[$gbl]{$gbl}{"x$lex"}: no exception ok 15946 - $vgbl[$gbl]{$gbl}{"x$lex"}: value ok 15947 - $vgbl[$gbl]{$gbl}{"x$lex"} = 123: no exception ok 15948 - $vgbl[$gbl]{$gbl}{"x$lex"} = 123: value ok 15949 - exists $vgbl[$gbl]{$gbl}{"x$lex"}: no exception ok 15950 - exists $vgbl[$gbl]{$gbl}{"x$lex"}: value ok 15951 - delete $vgbl[$gbl]{$gbl}{"x$lex"}: no exception ok 15952 - delete $vgbl[$gbl]{$gbl}{"x$lex"}: value ok 15953 - $vrlex->[$gbl]{$gbl}{"x$lex"}: no exception ok 15954 - $vrlex->[$gbl]{$gbl}{"x$lex"}: value ok 15955 - $vrlex->[$gbl]{$gbl}{"x$lex"} = 123: no exception ok 15956 - $vrlex->[$gbl]{$gbl}{"x$lex"} = 123: value ok 15957 - exists $vrlex->[$gbl]{$gbl}{"x$lex"}: no exception ok 15958 - exists $vrlex->[$gbl]{$gbl}{"x$lex"}: value ok 15959 - delete $vrlex->[$gbl]{$gbl}{"x$lex"}: no exception ok 15960 - delete $vrlex->[$gbl]{$gbl}{"x$lex"}: value ok 15961 - $vrgbl->[$gbl]{$gbl}{"x$lex"}: no exception ok 15962 - $vrgbl->[$gbl]{$gbl}{"x$lex"}: value ok 15963 - $vrgbl->[$gbl]{$gbl}{"x$lex"} = 123: no exception ok 15964 - $vrgbl->[$gbl]{$gbl}{"x$lex"} = 123: value ok 15965 - exists $vrgbl->[$gbl]{$gbl}{"x$lex"}: no exception ok 15966 - exists $vrgbl->[$gbl]{$gbl}{"x$lex"}: value ok 15967 - delete $vrgbl->[$gbl]{$gbl}{"x$lex"}: no exception ok 15968 - delete $vrgbl->[$gbl]{$gbl}{"x$lex"}: value ok 15969 - $vlex[$lex+1]{$gbl}{"x$lex"}: no exception ok 15970 - $vlex[$lex+1]{$gbl}{"x$lex"}: value ok 15971 - $vlex[$lex+1]{$gbl}{"x$lex"} = 123: no exception ok 15972 - $vlex[$lex+1]{$gbl}{"x$lex"} = 123: value ok 15973 - exists $vlex[$lex+1]{$gbl}{"x$lex"}: no exception ok 15974 - exists $vlex[$lex+1]{$gbl}{"x$lex"}: value ok 15975 - delete $vlex[$lex+1]{$gbl}{"x$lex"}: no exception ok 15976 - delete $vlex[$lex+1]{$gbl}{"x$lex"}: value ok 15977 - $vgbl[$lex+1]{$gbl}{"x$lex"}: no exception ok 15978 - $vgbl[$lex+1]{$gbl}{"x$lex"}: value ok 15979 - $vgbl[$lex+1]{$gbl}{"x$lex"} = 123: no exception ok 15980 - $vgbl[$lex+1]{$gbl}{"x$lex"} = 123: value ok 15981 - exists $vgbl[$lex+1]{$gbl}{"x$lex"}: no exception ok 15982 - exists $vgbl[$lex+1]{$gbl}{"x$lex"}: value ok 15983 - delete $vgbl[$lex+1]{$gbl}{"x$lex"}: no exception ok 15984 - delete $vgbl[$lex+1]{$gbl}{"x$lex"}: value ok 15985 - $vrlex->[$lex+1]{$gbl}{"x$lex"}: no exception ok 15986 - $vrlex->[$lex+1]{$gbl}{"x$lex"}: value ok 15987 - $vrlex->[$lex+1]{$gbl}{"x$lex"} = 123: no exception ok 15988 - $vrlex->[$lex+1]{$gbl}{"x$lex"} = 123: value ok 15989 - exists $vrlex->[$lex+1]{$gbl}{"x$lex"}: no exception ok 15990 - exists $vrlex->[$lex+1]{$gbl}{"x$lex"}: value ok 15991 - delete $vrlex->[$lex+1]{$gbl}{"x$lex"}: no exception ok 15992 - delete $vrlex->[$lex+1]{$gbl}{"x$lex"}: value ok 15993 - $vrgbl->[$lex+1]{$gbl}{"x$lex"}: no exception ok 15994 - $vrgbl->[$lex+1]{$gbl}{"x$lex"}: value ok 15995 - $vrgbl->[$lex+1]{$gbl}{"x$lex"} = 123: no exception ok 15996 - $vrgbl->[$lex+1]{$gbl}{"x$lex"} = 123: value ok 15997 - exists $vrgbl->[$lex+1]{$gbl}{"x$lex"}: no exception ok 15998 - exists $vrgbl->[$lex+1]{$gbl}{"x$lex"}: value ok 15999 - delete $vrgbl->[$lex+1]{$gbl}{"x$lex"}: no exception ok 16000 - delete $vrgbl->[$lex+1]{$gbl}{"x$lex"}: value ok 16001 - $vlex{foo}{$gbl}{"x$lex"}: no exception ok 16002 - $vlex{foo}{$gbl}{"x$lex"}: value ok 16003 - $vlex{foo}{$gbl}{"x$lex"} = 123: no exception ok 16004 - $vlex{foo}{$gbl}{"x$lex"} = 123: value ok 16005 - exists $vlex{foo}{$gbl}{"x$lex"}: no exception ok 16006 - exists $vlex{foo}{$gbl}{"x$lex"}: value ok 16007 - delete $vlex{foo}{$gbl}{"x$lex"}: no exception ok 16008 - delete $vlex{foo}{$gbl}{"x$lex"}: value ok 16009 - $vgbl{foo}{$gbl}{"x$lex"}: no exception ok 16010 - $vgbl{foo}{$gbl}{"x$lex"}: value ok 16011 - $vgbl{foo}{$gbl}{"x$lex"} = 123: no exception ok 16012 - $vgbl{foo}{$gbl}{"x$lex"} = 123: value ok 16013 - exists $vgbl{foo}{$gbl}{"x$lex"}: no exception ok 16014 - exists $vgbl{foo}{$gbl}{"x$lex"}: value ok 16015 - delete $vgbl{foo}{$gbl}{"x$lex"}: no exception ok 16016 - delete $vgbl{foo}{$gbl}{"x$lex"}: value ok 16017 - $vrlex->{foo}{$gbl}{"x$lex"}: no exception ok 16018 - $vrlex->{foo}{$gbl}{"x$lex"}: value ok 16019 - $vrlex->{foo}{$gbl}{"x$lex"} = 123: no exception ok 16020 - $vrlex->{foo}{$gbl}{"x$lex"} = 123: value ok 16021 - exists $vrlex->{foo}{$gbl}{"x$lex"}: no exception ok 16022 - exists $vrlex->{foo}{$gbl}{"x$lex"}: value ok 16023 - delete $vrlex->{foo}{$gbl}{"x$lex"}: no exception ok 16024 - delete $vrlex->{foo}{$gbl}{"x$lex"}: value ok 16025 - $vrgbl->{foo}{$gbl}{"x$lex"}: no exception ok 16026 - $vrgbl->{foo}{$gbl}{"x$lex"}: value ok 16027 - $vrgbl->{foo}{$gbl}{"x$lex"} = 123: no exception ok 16028 - $vrgbl->{foo}{$gbl}{"x$lex"} = 123: value ok 16029 - exists $vrgbl->{foo}{$gbl}{"x$lex"}: no exception ok 16030 - exists $vrgbl->{foo}{$gbl}{"x$lex"}: value ok 16031 - delete $vrgbl->{foo}{$gbl}{"x$lex"}: no exception ok 16032 - delete $vrgbl->{foo}{$gbl}{"x$lex"}: value ok 16033 - $vlex{$lex}{$gbl}{"x$lex"}: no exception ok 16034 - $vlex{$lex}{$gbl}{"x$lex"}: value ok 16035 - $vlex{$lex}{$gbl}{"x$lex"} = 123: no exception ok 16036 - $vlex{$lex}{$gbl}{"x$lex"} = 123: value ok 16037 - exists $vlex{$lex}{$gbl}{"x$lex"}: no exception ok 16038 - exists $vlex{$lex}{$gbl}{"x$lex"}: value ok 16039 - delete $vlex{$lex}{$gbl}{"x$lex"}: no exception ok 16040 - delete $vlex{$lex}{$gbl}{"x$lex"}: value ok 16041 - $vgbl{$lex}{$gbl}{"x$lex"}: no exception ok 16042 - $vgbl{$lex}{$gbl}{"x$lex"}: value ok 16043 - $vgbl{$lex}{$gbl}{"x$lex"} = 123: no exception ok 16044 - $vgbl{$lex}{$gbl}{"x$lex"} = 123: value ok 16045 - exists $vgbl{$lex}{$gbl}{"x$lex"}: no exception ok 16046 - exists $vgbl{$lex}{$gbl}{"x$lex"}: value ok 16047 - delete $vgbl{$lex}{$gbl}{"x$lex"}: no exception ok 16048 - delete $vgbl{$lex}{$gbl}{"x$lex"}: value ok 16049 - $vrlex->{$lex}{$gbl}{"x$lex"}: no exception ok 16050 - $vrlex->{$lex}{$gbl}{"x$lex"}: value ok 16051 - $vrlex->{$lex}{$gbl}{"x$lex"} = 123: no exception ok 16052 - $vrlex->{$lex}{$gbl}{"x$lex"} = 123: value ok 16053 - exists $vrlex->{$lex}{$gbl}{"x$lex"}: no exception ok 16054 - exists $vrlex->{$lex}{$gbl}{"x$lex"}: value ok 16055 - delete $vrlex->{$lex}{$gbl}{"x$lex"}: no exception ok 16056 - delete $vrlex->{$lex}{$gbl}{"x$lex"}: value ok 16057 - $vrgbl->{$lex}{$gbl}{"x$lex"}: no exception ok 16058 - $vrgbl->{$lex}{$gbl}{"x$lex"}: value ok 16059 - $vrgbl->{$lex}{$gbl}{"x$lex"} = 123: no exception ok 16060 - $vrgbl->{$lex}{$gbl}{"x$lex"} = 123: value ok 16061 - exists $vrgbl->{$lex}{$gbl}{"x$lex"}: no exception ok 16062 - exists $vrgbl->{$lex}{$gbl}{"x$lex"}: value ok 16063 - delete $vrgbl->{$lex}{$gbl}{"x$lex"}: no exception ok 16064 - delete $vrgbl->{$lex}{$gbl}{"x$lex"}: value ok 16065 - $vlex{$gbl}{$gbl}{"x$lex"}: no exception ok 16066 - $vlex{$gbl}{$gbl}{"x$lex"}: value ok 16067 - $vlex{$gbl}{$gbl}{"x$lex"} = 123: no exception ok 16068 - $vlex{$gbl}{$gbl}{"x$lex"} = 123: value ok 16069 - exists $vlex{$gbl}{$gbl}{"x$lex"}: no exception ok 16070 - exists $vlex{$gbl}{$gbl}{"x$lex"}: value ok 16071 - delete $vlex{$gbl}{$gbl}{"x$lex"}: no exception ok 16072 - delete $vlex{$gbl}{$gbl}{"x$lex"}: value ok 16073 - $vgbl{$gbl}{$gbl}{"x$lex"}: no exception ok 16074 - $vgbl{$gbl}{$gbl}{"x$lex"}: value ok 16075 - $vgbl{$gbl}{$gbl}{"x$lex"} = 123: no exception ok 16076 - $vgbl{$gbl}{$gbl}{"x$lex"} = 123: value ok 16077 - exists $vgbl{$gbl}{$gbl}{"x$lex"}: no exception ok 16078 - exists $vgbl{$gbl}{$gbl}{"x$lex"}: value ok 16079 - delete $vgbl{$gbl}{$gbl}{"x$lex"}: no exception ok 16080 - delete $vgbl{$gbl}{$gbl}{"x$lex"}: value ok 16081 - $vrlex->{$gbl}{$gbl}{"x$lex"}: no exception ok 16082 - $vrlex->{$gbl}{$gbl}{"x$lex"}: value ok 16083 - $vrlex->{$gbl}{$gbl}{"x$lex"} = 123: no exception ok 16084 - $vrlex->{$gbl}{$gbl}{"x$lex"} = 123: value ok 16085 - exists $vrlex->{$gbl}{$gbl}{"x$lex"}: no exception ok 16086 - exists $vrlex->{$gbl}{$gbl}{"x$lex"}: value ok 16087 - delete $vrlex->{$gbl}{$gbl}{"x$lex"}: no exception ok 16088 - delete $vrlex->{$gbl}{$gbl}{"x$lex"}: value ok 16089 - $vrgbl->{$gbl}{$gbl}{"x$lex"}: no exception ok 16090 - $vrgbl->{$gbl}{$gbl}{"x$lex"}: value ok 16091 - $vrgbl->{$gbl}{$gbl}{"x$lex"} = 123: no exception ok 16092 - $vrgbl->{$gbl}{$gbl}{"x$lex"} = 123: value ok 16093 - exists $vrgbl->{$gbl}{$gbl}{"x$lex"}: no exception ok 16094 - exists $vrgbl->{$gbl}{$gbl}{"x$lex"}: value ok 16095 - delete $vrgbl->{$gbl}{$gbl}{"x$lex"}: no exception ok 16096 - delete $vrgbl->{$gbl}{$gbl}{"x$lex"}: value ok 16097 - $vlex{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16098 - $vlex{"x$lex"}{$gbl}{"x$lex"}: value ok 16099 - $vlex{"x$lex"}{$gbl}{"x$lex"} = 123: no exception ok 16100 - $vlex{"x$lex"}{$gbl}{"x$lex"} = 123: value ok 16101 - exists $vlex{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16102 - exists $vlex{"x$lex"}{$gbl}{"x$lex"}: value ok 16103 - delete $vlex{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16104 - delete $vlex{"x$lex"}{$gbl}{"x$lex"}: value ok 16105 - $vgbl{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16106 - $vgbl{"x$lex"}{$gbl}{"x$lex"}: value ok 16107 - $vgbl{"x$lex"}{$gbl}{"x$lex"} = 123: no exception ok 16108 - $vgbl{"x$lex"}{$gbl}{"x$lex"} = 123: value ok 16109 - exists $vgbl{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16110 - exists $vgbl{"x$lex"}{$gbl}{"x$lex"}: value ok 16111 - delete $vgbl{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16112 - delete $vgbl{"x$lex"}{$gbl}{"x$lex"}: value ok 16113 - $vrlex->{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16114 - $vrlex->{"x$lex"}{$gbl}{"x$lex"}: value ok 16115 - $vrlex->{"x$lex"}{$gbl}{"x$lex"} = 123: no exception ok 16116 - $vrlex->{"x$lex"}{$gbl}{"x$lex"} = 123: value ok 16117 - exists $vrlex->{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16118 - exists $vrlex->{"x$lex"}{$gbl}{"x$lex"}: value ok 16119 - delete $vrlex->{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16120 - delete $vrlex->{"x$lex"}{$gbl}{"x$lex"}: value ok 16121 - $vrgbl->{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16122 - $vrgbl->{"x$lex"}{$gbl}{"x$lex"}: value ok 16123 - $vrgbl->{"x$lex"}{$gbl}{"x$lex"} = 123: no exception ok 16124 - $vrgbl->{"x$lex"}{$gbl}{"x$lex"} = 123: value ok 16125 - exists $vrgbl->{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16126 - exists $vrgbl->{"x$lex"}{$gbl}{"x$lex"}: value ok 16127 - delete $vrgbl->{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16128 - delete $vrgbl->{"x$lex"}{$gbl}{"x$lex"}: value ok 16129 - $vlex[0]{"x$lex"}{"x$lex"}: no exception ok 16130 - $vlex[0]{"x$lex"}{"x$lex"}: value ok 16131 - $vlex[0]{"x$lex"}{"x$lex"} = 123: no exception ok 16132 - $vlex[0]{"x$lex"}{"x$lex"} = 123: value ok 16133 - exists $vlex[0]{"x$lex"}{"x$lex"}: no exception ok 16134 - exists $vlex[0]{"x$lex"}{"x$lex"}: value ok 16135 - delete $vlex[0]{"x$lex"}{"x$lex"}: no exception ok 16136 - delete $vlex[0]{"x$lex"}{"x$lex"}: value ok 16137 - $vgbl[0]{"x$lex"}{"x$lex"}: no exception ok 16138 - $vgbl[0]{"x$lex"}{"x$lex"}: value ok 16139 - $vgbl[0]{"x$lex"}{"x$lex"} = 123: no exception ok 16140 - $vgbl[0]{"x$lex"}{"x$lex"} = 123: value ok 16141 - exists $vgbl[0]{"x$lex"}{"x$lex"}: no exception ok 16142 - exists $vgbl[0]{"x$lex"}{"x$lex"}: value ok 16143 - delete $vgbl[0]{"x$lex"}{"x$lex"}: no exception ok 16144 - delete $vgbl[0]{"x$lex"}{"x$lex"}: value ok 16145 - $vrlex->[0]{"x$lex"}{"x$lex"}: no exception ok 16146 - $vrlex->[0]{"x$lex"}{"x$lex"}: value ok 16147 - $vrlex->[0]{"x$lex"}{"x$lex"} = 123: no exception ok 16148 - $vrlex->[0]{"x$lex"}{"x$lex"} = 123: value ok 16149 - exists $vrlex->[0]{"x$lex"}{"x$lex"}: no exception ok 16150 - exists $vrlex->[0]{"x$lex"}{"x$lex"}: value ok 16151 - delete $vrlex->[0]{"x$lex"}{"x$lex"}: no exception ok 16152 - delete $vrlex->[0]{"x$lex"}{"x$lex"}: value ok 16153 - $vrgbl->[0]{"x$lex"}{"x$lex"}: no exception ok 16154 - $vrgbl->[0]{"x$lex"}{"x$lex"}: value ok 16155 - $vrgbl->[0]{"x$lex"}{"x$lex"} = 123: no exception ok 16156 - $vrgbl->[0]{"x$lex"}{"x$lex"} = 123: value ok 16157 - exists $vrgbl->[0]{"x$lex"}{"x$lex"}: no exception ok 16158 - exists $vrgbl->[0]{"x$lex"}{"x$lex"}: value ok 16159 - delete $vrgbl->[0]{"x$lex"}{"x$lex"}: no exception ok 16160 - delete $vrgbl->[0]{"x$lex"}{"x$lex"}: value ok 16161 - $vlex[$lex]{"x$lex"}{"x$lex"}: no exception ok 16162 - $vlex[$lex]{"x$lex"}{"x$lex"}: value ok 16163 - $vlex[$lex]{"x$lex"}{"x$lex"} = 123: no exception ok 16164 - $vlex[$lex]{"x$lex"}{"x$lex"} = 123: value ok 16165 - exists $vlex[$lex]{"x$lex"}{"x$lex"}: no exception ok 16166 - exists $vlex[$lex]{"x$lex"}{"x$lex"}: value ok 16167 - delete $vlex[$lex]{"x$lex"}{"x$lex"}: no exception ok 16168 - delete $vlex[$lex]{"x$lex"}{"x$lex"}: value ok 16169 - $vgbl[$lex]{"x$lex"}{"x$lex"}: no exception ok 16170 - $vgbl[$lex]{"x$lex"}{"x$lex"}: value ok 16171 - $vgbl[$lex]{"x$lex"}{"x$lex"} = 123: no exception ok 16172 - $vgbl[$lex]{"x$lex"}{"x$lex"} = 123: value ok 16173 - exists $vgbl[$lex]{"x$lex"}{"x$lex"}: no exception ok 16174 - exists $vgbl[$lex]{"x$lex"}{"x$lex"}: value ok 16175 - delete $vgbl[$lex]{"x$lex"}{"x$lex"}: no exception ok 16176 - delete $vgbl[$lex]{"x$lex"}{"x$lex"}: value ok 16177 - $vrlex->[$lex]{"x$lex"}{"x$lex"}: no exception ok 16178 - $vrlex->[$lex]{"x$lex"}{"x$lex"}: value ok 16179 - $vrlex->[$lex]{"x$lex"}{"x$lex"} = 123: no exception ok 16180 - $vrlex->[$lex]{"x$lex"}{"x$lex"} = 123: value ok 16181 - exists $vrlex->[$lex]{"x$lex"}{"x$lex"}: no exception ok 16182 - exists $vrlex->[$lex]{"x$lex"}{"x$lex"}: value ok 16183 - delete $vrlex->[$lex]{"x$lex"}{"x$lex"}: no exception ok 16184 - delete $vrlex->[$lex]{"x$lex"}{"x$lex"}: value ok 16185 - $vrgbl->[$lex]{"x$lex"}{"x$lex"}: no exception ok 16186 - $vrgbl->[$lex]{"x$lex"}{"x$lex"}: value ok 16187 - $vrgbl->[$lex]{"x$lex"}{"x$lex"} = 123: no exception ok 16188 - $vrgbl->[$lex]{"x$lex"}{"x$lex"} = 123: value ok 16189 - exists $vrgbl->[$lex]{"x$lex"}{"x$lex"}: no exception ok 16190 - exists $vrgbl->[$lex]{"x$lex"}{"x$lex"}: value ok 16191 - delete $vrgbl->[$lex]{"x$lex"}{"x$lex"}: no exception ok 16192 - delete $vrgbl->[$lex]{"x$lex"}{"x$lex"}: value ok 16193 - $vlex[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16194 - $vlex[$gbl]{"x$lex"}{"x$lex"}: value ok 16195 - $vlex[$gbl]{"x$lex"}{"x$lex"} = 123: no exception ok 16196 - $vlex[$gbl]{"x$lex"}{"x$lex"} = 123: value ok 16197 - exists $vlex[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16198 - exists $vlex[$gbl]{"x$lex"}{"x$lex"}: value ok 16199 - delete $vlex[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16200 - delete $vlex[$gbl]{"x$lex"}{"x$lex"}: value ok 16201 - $vgbl[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16202 - $vgbl[$gbl]{"x$lex"}{"x$lex"}: value ok 16203 - $vgbl[$gbl]{"x$lex"}{"x$lex"} = 123: no exception ok 16204 - $vgbl[$gbl]{"x$lex"}{"x$lex"} = 123: value ok 16205 - exists $vgbl[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16206 - exists $vgbl[$gbl]{"x$lex"}{"x$lex"}: value ok 16207 - delete $vgbl[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16208 - delete $vgbl[$gbl]{"x$lex"}{"x$lex"}: value ok 16209 - $vrlex->[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16210 - $vrlex->[$gbl]{"x$lex"}{"x$lex"}: value ok 16211 - $vrlex->[$gbl]{"x$lex"}{"x$lex"} = 123: no exception ok 16212 - $vrlex->[$gbl]{"x$lex"}{"x$lex"} = 123: value ok 16213 - exists $vrlex->[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16214 - exists $vrlex->[$gbl]{"x$lex"}{"x$lex"}: value ok 16215 - delete $vrlex->[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16216 - delete $vrlex->[$gbl]{"x$lex"}{"x$lex"}: value ok 16217 - $vrgbl->[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16218 - $vrgbl->[$gbl]{"x$lex"}{"x$lex"}: value ok 16219 - $vrgbl->[$gbl]{"x$lex"}{"x$lex"} = 123: no exception ok 16220 - $vrgbl->[$gbl]{"x$lex"}{"x$lex"} = 123: value ok 16221 - exists $vrgbl->[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16222 - exists $vrgbl->[$gbl]{"x$lex"}{"x$lex"}: value ok 16223 - delete $vrgbl->[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16224 - delete $vrgbl->[$gbl]{"x$lex"}{"x$lex"}: value ok 16225 - $vlex[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16226 - $vlex[$lex+1]{"x$lex"}{"x$lex"}: value ok 16227 - $vlex[$lex+1]{"x$lex"}{"x$lex"} = 123: no exception ok 16228 - $vlex[$lex+1]{"x$lex"}{"x$lex"} = 123: value ok 16229 - exists $vlex[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16230 - exists $vlex[$lex+1]{"x$lex"}{"x$lex"}: value ok 16231 - delete $vlex[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16232 - delete $vlex[$lex+1]{"x$lex"}{"x$lex"}: value ok 16233 - $vgbl[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16234 - $vgbl[$lex+1]{"x$lex"}{"x$lex"}: value ok 16235 - $vgbl[$lex+1]{"x$lex"}{"x$lex"} = 123: no exception ok 16236 - $vgbl[$lex+1]{"x$lex"}{"x$lex"} = 123: value ok 16237 - exists $vgbl[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16238 - exists $vgbl[$lex+1]{"x$lex"}{"x$lex"}: value ok 16239 - delete $vgbl[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16240 - delete $vgbl[$lex+1]{"x$lex"}{"x$lex"}: value ok 16241 - $vrlex->[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16242 - $vrlex->[$lex+1]{"x$lex"}{"x$lex"}: value ok 16243 - $vrlex->[$lex+1]{"x$lex"}{"x$lex"} = 123: no exception ok 16244 - $vrlex->[$lex+1]{"x$lex"}{"x$lex"} = 123: value ok 16245 - exists $vrlex->[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16246 - exists $vrlex->[$lex+1]{"x$lex"}{"x$lex"}: value ok 16247 - delete $vrlex->[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16248 - delete $vrlex->[$lex+1]{"x$lex"}{"x$lex"}: value ok 16249 - $vrgbl->[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16250 - $vrgbl->[$lex+1]{"x$lex"}{"x$lex"}: value ok 16251 - $vrgbl->[$lex+1]{"x$lex"}{"x$lex"} = 123: no exception ok 16252 - $vrgbl->[$lex+1]{"x$lex"}{"x$lex"} = 123: value ok 16253 - exists $vrgbl->[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16254 - exists $vrgbl->[$lex+1]{"x$lex"}{"x$lex"}: value ok 16255 - delete $vrgbl->[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16256 - delete $vrgbl->[$lex+1]{"x$lex"}{"x$lex"}: value ok 16257 - $vlex{foo}{"x$lex"}{"x$lex"}: no exception ok 16258 - $vlex{foo}{"x$lex"}{"x$lex"}: value ok 16259 - $vlex{foo}{"x$lex"}{"x$lex"} = 123: no exception ok 16260 - $vlex{foo}{"x$lex"}{"x$lex"} = 123: value ok 16261 - exists $vlex{foo}{"x$lex"}{"x$lex"}: no exception ok 16262 - exists $vlex{foo}{"x$lex"}{"x$lex"}: value ok 16263 - delete $vlex{foo}{"x$lex"}{"x$lex"}: no exception ok 16264 - delete $vlex{foo}{"x$lex"}{"x$lex"}: value ok 16265 - $vgbl{foo}{"x$lex"}{"x$lex"}: no exception ok 16266 - $vgbl{foo}{"x$lex"}{"x$lex"}: value ok 16267 - $vgbl{foo}{"x$lex"}{"x$lex"} = 123: no exception ok 16268 - $vgbl{foo}{"x$lex"}{"x$lex"} = 123: value ok 16269 - exists $vgbl{foo}{"x$lex"}{"x$lex"}: no exception ok 16270 - exists $vgbl{foo}{"x$lex"}{"x$lex"}: value ok 16271 - delete $vgbl{foo}{"x$lex"}{"x$lex"}: no exception ok 16272 - delete $vgbl{foo}{"x$lex"}{"x$lex"}: value ok 16273 - $vrlex->{foo}{"x$lex"}{"x$lex"}: no exception ok 16274 - $vrlex->{foo}{"x$lex"}{"x$lex"}: value ok 16275 - $vrlex->{foo}{"x$lex"}{"x$lex"} = 123: no exception ok 16276 - $vrlex->{foo}{"x$lex"}{"x$lex"} = 123: value ok 16277 - exists $vrlex->{foo}{"x$lex"}{"x$lex"}: no exception ok 16278 - exists $vrlex->{foo}{"x$lex"}{"x$lex"}: value ok 16279 - delete $vrlex->{foo}{"x$lex"}{"x$lex"}: no exception ok 16280 - delete $vrlex->{foo}{"x$lex"}{"x$lex"}: value ok 16281 - $vrgbl->{foo}{"x$lex"}{"x$lex"}: no exception ok 16282 - $vrgbl->{foo}{"x$lex"}{"x$lex"}: value ok 16283 - $vrgbl->{foo}{"x$lex"}{"x$lex"} = 123: no exception ok 16284 - $vrgbl->{foo}{"x$lex"}{"x$lex"} = 123: value ok 16285 - exists $vrgbl->{foo}{"x$lex"}{"x$lex"}: no exception ok 16286 - exists $vrgbl->{foo}{"x$lex"}{"x$lex"}: value ok 16287 - delete $vrgbl->{foo}{"x$lex"}{"x$lex"}: no exception ok 16288 - delete $vrgbl->{foo}{"x$lex"}{"x$lex"}: value ok 16289 - $vlex{$lex}{"x$lex"}{"x$lex"}: no exception ok 16290 - $vlex{$lex}{"x$lex"}{"x$lex"}: value ok 16291 - $vlex{$lex}{"x$lex"}{"x$lex"} = 123: no exception ok 16292 - $vlex{$lex}{"x$lex"}{"x$lex"} = 123: value ok 16293 - exists $vlex{$lex}{"x$lex"}{"x$lex"}: no exception ok 16294 - exists $vlex{$lex}{"x$lex"}{"x$lex"}: value ok 16295 - delete $vlex{$lex}{"x$lex"}{"x$lex"}: no exception ok 16296 - delete $vlex{$lex}{"x$lex"}{"x$lex"}: value ok 16297 - $vgbl{$lex}{"x$lex"}{"x$lex"}: no exception ok 16298 - $vgbl{$lex}{"x$lex"}{"x$lex"}: value ok 16299 - $vgbl{$lex}{"x$lex"}{"x$lex"} = 123: no exception ok 16300 - $vgbl{$lex}{"x$lex"}{"x$lex"} = 123: value ok 16301 - exists $vgbl{$lex}{"x$lex"}{"x$lex"}: no exception ok 16302 - exists $vgbl{$lex}{"x$lex"}{"x$lex"}: value ok 16303 - delete $vgbl{$lex}{"x$lex"}{"x$lex"}: no exception ok 16304 - delete $vgbl{$lex}{"x$lex"}{"x$lex"}: value ok 16305 - $vrlex->{$lex}{"x$lex"}{"x$lex"}: no exception ok 16306 - $vrlex->{$lex}{"x$lex"}{"x$lex"}: value ok 16307 - $vrlex->{$lex}{"x$lex"}{"x$lex"} = 123: no exception ok 16308 - $vrlex->{$lex}{"x$lex"}{"x$lex"} = 123: value ok 16309 - exists $vrlex->{$lex}{"x$lex"}{"x$lex"}: no exception ok 16310 - exists $vrlex->{$lex}{"x$lex"}{"x$lex"}: value ok 16311 - delete $vrlex->{$lex}{"x$lex"}{"x$lex"}: no exception ok 16312 - delete $vrlex->{$lex}{"x$lex"}{"x$lex"}: value ok 16313 - $vrgbl->{$lex}{"x$lex"}{"x$lex"}: no exception ok 16314 - $vrgbl->{$lex}{"x$lex"}{"x$lex"}: value ok 16315 - $vrgbl->{$lex}{"x$lex"}{"x$lex"} = 123: no exception ok 16316 - $vrgbl->{$lex}{"x$lex"}{"x$lex"} = 123: value ok 16317 - exists $vrgbl->{$lex}{"x$lex"}{"x$lex"}: no exception ok 16318 - exists $vrgbl->{$lex}{"x$lex"}{"x$lex"}: value ok 16319 - delete $vrgbl->{$lex}{"x$lex"}{"x$lex"}: no exception ok 16320 - delete $vrgbl->{$lex}{"x$lex"}{"x$lex"}: value ok 16321 - $vlex{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16322 - $vlex{$gbl}{"x$lex"}{"x$lex"}: value ok 16323 - $vlex{$gbl}{"x$lex"}{"x$lex"} = 123: no exception ok 16324 - $vlex{$gbl}{"x$lex"}{"x$lex"} = 123: value ok 16325 - exists $vlex{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16326 - exists $vlex{$gbl}{"x$lex"}{"x$lex"}: value ok 16327 - delete $vlex{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16328 - delete $vlex{$gbl}{"x$lex"}{"x$lex"}: value ok 16329 - $vgbl{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16330 - $vgbl{$gbl}{"x$lex"}{"x$lex"}: value ok 16331 - $vgbl{$gbl}{"x$lex"}{"x$lex"} = 123: no exception ok 16332 - $vgbl{$gbl}{"x$lex"}{"x$lex"} = 123: value ok 16333 - exists $vgbl{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16334 - exists $vgbl{$gbl}{"x$lex"}{"x$lex"}: value ok 16335 - delete $vgbl{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16336 - delete $vgbl{$gbl}{"x$lex"}{"x$lex"}: value ok 16337 - $vrlex->{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16338 - $vrlex->{$gbl}{"x$lex"}{"x$lex"}: value ok 16339 - $vrlex->{$gbl}{"x$lex"}{"x$lex"} = 123: no exception ok 16340 - $vrlex->{$gbl}{"x$lex"}{"x$lex"} = 123: value ok 16341 - exists $vrlex->{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16342 - exists $vrlex->{$gbl}{"x$lex"}{"x$lex"}: value ok 16343 - delete $vrlex->{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16344 - delete $vrlex->{$gbl}{"x$lex"}{"x$lex"}: value ok 16345 - $vrgbl->{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16346 - $vrgbl->{$gbl}{"x$lex"}{"x$lex"}: value ok 16347 - $vrgbl->{$gbl}{"x$lex"}{"x$lex"} = 123: no exception ok 16348 - $vrgbl->{$gbl}{"x$lex"}{"x$lex"} = 123: value ok 16349 - exists $vrgbl->{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16350 - exists $vrgbl->{$gbl}{"x$lex"}{"x$lex"}: value ok 16351 - delete $vrgbl->{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16352 - delete $vrgbl->{$gbl}{"x$lex"}{"x$lex"}: value ok 16353 - $vlex{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16354 - $vlex{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16355 - $vlex{"x$lex"}{"x$lex"}{"x$lex"} = 123: no exception ok 16356 - $vlex{"x$lex"}{"x$lex"}{"x$lex"} = 123: value ok 16357 - exists $vlex{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16358 - exists $vlex{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16359 - delete $vlex{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16360 - delete $vlex{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16361 - $vgbl{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16362 - $vgbl{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16363 - $vgbl{"x$lex"}{"x$lex"}{"x$lex"} = 123: no exception ok 16364 - $vgbl{"x$lex"}{"x$lex"}{"x$lex"} = 123: value ok 16365 - exists $vgbl{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16366 - exists $vgbl{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16367 - delete $vgbl{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16368 - delete $vgbl{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16369 - $vrlex->{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16370 - $vrlex->{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16371 - $vrlex->{"x$lex"}{"x$lex"}{"x$lex"} = 123: no exception ok 16372 - $vrlex->{"x$lex"}{"x$lex"}{"x$lex"} = 123: value ok 16373 - exists $vrlex->{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16374 - exists $vrlex->{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16375 - delete $vrlex->{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16376 - delete $vrlex->{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16377 - $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16378 - $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16379 - $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"} = 123: no exception ok 16380 - $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"} = 123: value ok 16381 - exists $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16382 - exists $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16383 - delete $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16384 - delete $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"}: value ok # Using threads 2.40 # Using threads::shared 1.69 t/50-threads.t ........... ok 1 - fetch does not autovivify at thread 1 run 1 ok 2 - exists does not autovivify at thread 1 run 1 ok 3 - delete does not autovivify at thread 1 run 1 ok 4 - fetch in eval does not croak at thread 1 run 1 ok 5 - fetch in eval does not autovivify at thread 1 run 1 ok 6 - exists in eval does not croak at thread 1 run 1 ok 7 - exists in eval does not autovivify at thread 1 run 1 ok 8 - delete in eval does not croak at thread 1 run 1 ok 9 - delete in eval does not autovivify at thread 1 run 1 ok 10 - fetch does not autovivify at thread 1 run 2 ok 11 - exists does not autovivify at thread 1 run 2 ok 12 - delete does not autovivify at thread 1 run 2 ok 13 - fetch in eval does not croak at thread 1 run 2 ok 14 - fetch in eval does not autovivify at thread 1 run 2 ok 15 - exists in eval does not croak at thread 1 run 2 ok 16 - exists in eval does not autovivify at thread 1 run 2 ok 17 - delete in eval does not croak at thread 1 run 2 ok 18 - delete in eval does not autovivify at thread 1 run 2 ok 19 - fetch does not autovivify at thread 2 run 1 ok 20 - exists does not autovivify at thread 2 run 1 ok 21 - delete does not autovivify at thread 2 run 1 ok 22 - fetch in eval does not croak at thread 2 run 1 ok 23 - fetch in eval does not autovivify at thread 2 run 1 ok 24 - exists in eval does not croak at thread 2 run 1 ok 25 - exists in eval does not autovivify at thread 2 run 1 ok 26 - delete in eval does not croak at thread 2 run 1 ok 27 - delete in eval does not autovivify at thread 2 run 1 ok 28 - fetch does not autovivify at thread 2 run 2 ok 29 - exists does not autovivify at thread 2 run 2 ok 30 - delete does not autovivify at thread 2 run 2 ok 31 - fetch in eval does not croak at thread 2 run 2 ok 32 - fetch in eval does not autovivify at thread 2 run 2 ok 33 - exists in eval does not croak at thread 2 run 2 ok 34 - exists in eval does not autovivify at thread 2 run 2 ok 35 - delete in eval does not croak at thread 2 run 2 ok 36 - delete in eval does not autovivify at thread 2 run 2 ok 37 - fetch does not autovivify at thread 3 run 1 ok 38 - exists does not autovivify at thread 3 run 1 ok 39 - delete does not autovivify at thread 3 run 1 ok 40 - fetch in eval does not croak at thread 3 run 1 ok 41 - fetch in eval does not autovivify at thread 3 run 1 ok 42 - exists in eval does not croak at thread 3 run 1 ok 43 - exists in eval does not autovivify at thread 3 run 1 ok 44 - delete in eval does not croak at thread 3 run 1 ok 45 - delete in eval does not autovivify at thread 3 run 1 ok 46 - fetch does not autovivify at thread 3 run 2 ok 47 - exists does not autovivify at thread 3 run 2 ok 48 - delete does not autovivify at thread 3 run 2 ok 49 - fetch in eval does not croak at thread 3 run 2 ok 50 - fetch in eval does not autovivify at thread 3 run 2 ok 51 - exists in eval does not croak at thread 3 run 2 ok 52 - exists in eval does not autovivify at thread 3 run 2 ok 53 - delete in eval does not croak at thread 3 run 2 ok 54 - delete in eval does not autovivify at thread 3 run 2 ok 55 - fetch does not autovivify at thread 4 run 1 ok 56 - exists does not autovivify at thread 4 run 1 ok 57 - delete does not autovivify at thread 4 run 1 ok 58 - fetch in eval does not croak at thread 4 run 1 ok 59 - fetch in eval does not autovivify at thread 4 run 1 ok 60 - exists in eval does not croak at thread 4 run 1 ok 61 - exists in eval does not autovivify at thread 4 run 1 ok 62 - delete in eval does not croak at thread 4 run 1 ok 63 - delete in eval does not autovivify at thread 4 run 1 ok 64 - fetch does not autovivify at thread 4 run 2 ok 65 - exists does not autovivify at thread 4 run 2 ok 66 - delete does not autovivify at thread 4 run 2 ok 67 - fetch in eval does not croak at thread 4 run 2 ok 68 - fetch in eval does not autovivify at thread 4 run 2 ok 69 - exists in eval does not croak at thread 4 run 2 ok 70 - exists in eval does not autovivify at thread 4 run 2 ok 71 - delete in eval does not croak at thread 4 run 2 ok 72 - delete in eval does not autovivify at thread 4 run 2 ok 73 - fetch does not autovivify at thread 5 run 1 ok 74 - exists does not autovivify at thread 5 run 1 ok 75 - delete does not autovivify at thread 5 run 1 ok 76 - fetch in eval does not croak at thread 5 run 1 ok 77 - fetch in eval does not autovivify at thread 5 run 1 ok 78 - exists in eval does not croak at thread 5 run 1 ok 79 - exists in eval does not autovivify at thread 5 run 1 ok 80 - delete in eval does not croak at thread 5 run 1 ok 81 - delete in eval does not autovivify at thread 5 run 1 ok 82 - fetch does not autovivify at thread 5 run 2 ok 83 - exists does not autovivify at thread 5 run 2 ok 84 - delete does not autovivify at thread 5 run 2 ok 85 - fetch in eval does not croak at thread 5 run 2 ok 86 - fetch in eval does not autovivify at thread 5 run 2 ok 87 - exists in eval does not croak at thread 5 run 2 ok 88 - exists in eval does not autovivify at thread 5 run 2 ok 89 - delete in eval does not croak at thread 5 run 2 ok 90 - delete in eval does not autovivify at thread 5 run 2 ok 91 - fetch does not autovivify at thread 6 run 1 ok 92 - exists does not autovivify at thread 6 run 1 ok 93 - delete does not autovivify at thread 6 run 1 ok 94 - fetch in eval does not croak at thread 6 run 1 ok 95 - fetch in eval does not autovivify at thread 6 run 1 ok 96 - exists in eval does not croak at thread 6 run 1 ok 97 - exists in eval does not autovivify at thread 6 run 1 ok 98 - delete in eval does not croak at thread 6 run 1 ok 99 - delete in eval does not autovivify at thread 6 run 1 ok 100 - fetch does not autovivify at thread 6 run 2 ok 101 - exists does not autovivify at thread 6 run 2 ok 102 - delete does not autovivify at thread 6 run 2 ok 103 - fetch in eval does not croak at thread 6 run 2 ok 104 - fetch in eval does not autovivify at thread 6 run 2 ok 105 - exists in eval does not croak at thread 6 run 2 ok 106 - exists in eval does not autovivify at thread 6 run 2 ok 107 - delete in eval does not croak at thread 6 run 2 ok 108 - delete in eval does not autovivify at thread 6 run 2 ok 109 - fetch does not autovivify at thread 7 run 1 ok 110 - exists does not autovivify at thread 7 run 1 ok 111 - delete does not autovivify at thread 7 run 1 ok 112 - fetch in eval does not croak at thread 7 run 1 ok 113 - fetch in eval does not autovivify at thread 7 run 1 ok 114 - exists in eval does not croak at thread 7 run 1 ok 115 - exists in eval does not autovivify at thread 7 run 1 ok 116 - delete in eval does not croak at thread 7 run 1 ok 117 - delete in eval does not autovivify at thread 7 run 1 ok 118 - fetch does not autovivify at thread 7 run 2 ok 119 - exists does not autovivify at thread 7 run 2 ok 120 - delete does not autovivify at thread 7 run 2 ok 121 - fetch in eval does not croak at thread 7 run 2 ok 122 - fetch in eval does not autovivify at thread 7 run 2 ok 123 - exists in eval does not croak at thread 7 run 2 ok 124 - exists in eval does not autovivify at thread 7 run 2 ok 125 - delete in eval does not croak at thread 7 run 2 ok 126 - delete in eval does not autovivify at thread 7 run 2 ok 127 - fetch does not autovivify at thread 8 run 1 ok 128 - exists does not autovivify at thread 8 run 1 ok 129 - delete does not autovivify at thread 8 run 1 ok 130 - fetch in eval does not croak at thread 8 run 1 ok 131 - fetch in eval does not autovivify at thread 8 run 1 ok 132 - exists in eval does not croak at thread 8 run 1 ok 133 - exists in eval does not autovivify at thread 8 run 1 ok 134 - delete in eval does not croak at thread 8 run 1 ok 135 - delete in eval does not autovivify at thread 8 run 1 ok 136 - fetch does not autovivify at thread 8 run 2 ok 137 - exists does not autovivify at thread 8 run 2 ok 138 - delete does not autovivify at thread 8 run 2 ok 139 - fetch in eval does not croak at thread 8 run 2 ok 140 - fetch in eval does not autovivify at thread 8 run 2 ok 141 - exists in eval does not croak at thread 8 run 2 ok 142 - exists in eval does not autovivify at thread 8 run 2 ok 143 - delete in eval does not croak at thread 8 run 2 ok 144 - delete in eval does not autovivify at thread 8 run 2 ok 145 - fetch does not autovivify at thread 9 run 1 ok 146 - exists does not autovivify at thread 9 run 1 ok 147 - delete does not autovivify at thread 9 run 1 ok 148 - fetch in eval does not croak at thread 9 run 1 ok 149 - fetch in eval does not autovivify at thread 9 run 1 ok 150 - exists in eval does not croak at thread 9 run 1 ok 151 - exists in eval does not autovivify at thread 9 run 1 ok 152 - delete in eval does not croak at thread 9 run 1 ok 153 - delete in eval does not autovivify at thread 9 run 1 ok 154 - fetch does not autovivify at thread 9 run 2 ok 155 - exists does not autovivify at thread 9 run 2 ok 156 - delete does not autovivify at thread 9 run 2 ok 157 - fetch in eval does not croak at thread 9 run 2 ok 158 - fetch in eval does not autovivify at thread 9 run 2 ok 159 - exists in eval does not croak at thread 9 run 2 ok 160 - exists in eval does not autovivify at thread 9 run 2 ok 161 - delete in eval does not croak at thread 9 run 2 ok 162 - delete in eval does not autovivify at thread 9 run 2 ok 163 - fetch does not autovivify at thread 10 run 1 ok 164 - exists does not autovivify at thread 10 run 1 ok 165 - delete does not autovivify at thread 10 run 1 ok 166 - fetch in eval does not croak at thread 10 run 1 ok 167 - fetch in eval does not autovivify at thread 10 run 1 ok 168 - exists in eval does not croak at thread 10 run 1 ok 169 - exists in eval does not autovivify at thread 10 run 1 ok 170 - delete in eval does not croak at thread 10 run 1 ok 171 - delete in eval does not autovivify at thread 10 run 1 ok 172 - fetch does not autovivify at thread 10 run 2 ok 173 - exists does not autovivify at thread 10 run 2 ok 174 - delete does not autovivify at thread 10 run 2 ok 175 - fetch in eval does not croak at thread 10 run 2 ok 176 - fetch in eval does not autovivify at thread 10 run 2 ok 177 - exists in eval does not croak at thread 10 run 2 ok 178 - exists in eval does not autovivify at thread 10 run 2 ok 179 - delete in eval does not croak at thread 10 run 2 ok 180 - delete in eval does not autovivify at thread 10 run 2 ok 181 - done 1..181 ok # Using threads 2.40 # Using threads::shared 1.69 t/51-threads-teardown.t .. 1..2 ok 1 - loading the pragma in a thread and using it outside doesn't segfault ok 2 - autovivification can be loaded in eval STRING during global destruction at the end of a thread ok All tests successful. Files=18, Tests=44617, 5 wallclock secs ( 1.16 usr 0.15 sys + 2.94 cusr 0.34 csys = 4.59 CPU) Result: PASS make[1]: Leaving directory '/<>' create-stamp debian/debhelper-build-stamp fakeroot debian/rules binary-arch dh binary-arch dh_testroot -a dh_prep -a dh_auto_install --destdir=debian/libautovivification-perl/ -a make -j2 install DESTDIR=/<>/debian/libautovivification-perl AM_UPDATE_INFO_DIR=no PREFIX=/usr make[1]: Entering directory '/<>' "/usr/bin/perl" -MExtUtils::Command::MM -e 'cp_nonempty' -- autovivification.bs blib/arch/auto/autovivification/autovivification.bs 644 Manifying 1 pod document Files found in blib/arch: installing files in blib/lib into architecture dependent library tree Installing /<>/debian/libautovivification-perl/usr/lib/x86_64-linux-gnu/perl5/5.40/auto/autovivification/autovivification.so Installing /<>/debian/libautovivification-perl/usr/lib/x86_64-linux-gnu/perl5/5.40/autovivification.pm Installing /<>/debian/libautovivification-perl/usr/share/man/man3/autovivification.3pm make[1]: Leaving directory '/<>' dh_installdocs -a dh_installchangelogs -a debian/rules override_dh_installexamples make[1]: Entering directory '/<>' dh_installexamples sed -i '1s|^#!perl|#!/usr/bin/perl|' /<>/debian/libautovivification-perl/usr/share/doc/libautovivification-perl/examples/* make[1]: Leaving directory '/<>' dh_installman -a dh_perl -a dh_link -a dh_strip_nondeterminism -a dh_compress -a dh_fixperms -a dh_missing -a dh_dwz -a dh_strip -a dh_makeshlibs -a dh_shlibdeps -a dpkg-shlibdeps: warning: diversions involved - output may be incorrect diversion by libc6 from: /lib64/ld-linux-x86-64.so.2 dpkg-shlibdeps: warning: diversions involved - output may be incorrect diversion by libc6 to: /lib64/ld-linux-x86-64.so.2.usr-is-merged dh_installdeb -a dh_gencontrol -a dh_md5sums -a dh_builddeb -a dpkg-deb: building package 'libautovivification-perl-dbgsym' in '../libautovivification-perl-dbgsym_0.18-2+b4_amd64.deb'. dpkg-deb: building package 'libautovivification-perl' in '../libautovivification-perl_0.18-2+b4_amd64.deb'. dpkg-genbuildinfo --build=any -O../libautovivification-perl_0.18-2+b4_amd64.buildinfo dpkg-genchanges --build=any -mDebian Perl autobuilder -O../libautovivification-perl_0.18-2+b4_amd64.changes dpkg-genchanges: info: binary-only arch-specific upload (source code and arch-indep packages not included) dpkg-source -Zxz --after-build . dpkg-buildpackage: info: binary-only upload (no source included) -------------------------------------------------------------------------------- Build finished at 2024-09-14T11:57:41Z Finished -------- I: Built successfully +------------------------------------------------------------------------------+ | Changes | +------------------------------------------------------------------------------+ libautovivification-perl_0.18-2+b4_amd64.changes: ------------------------------------------------- Format: 1.8 Date: Sat, 14 Sep 2024 11:57:32 +0000 Source: libautovivification-perl (0.18-2) Binary: libautovivification-perl libautovivification-perl-dbgsym Binary-Only: yes Architecture: amd64 Version: 0.18-2+b4 Distribution: perl-5.40 Urgency: low Maintainer: Debian Perl autobuilder Changed-By: Debian Perl autobuilder Description: libautovivification-perl - pragma for lexically disabling autovivification Changes: libautovivification-perl (0.18-2+b4) perl-5.40; urgency=low, binary-only=yes . * Binary-only non-maintainer upload for amd64; no source changes. * Rebuild for Perl 5.40 Checksums-Sha1: eea7ce9f177f16529b2d263666d3898b2863d2d3 60264 libautovivification-perl-dbgsym_0.18-2+b4_amd64.deb afa75796e8a9ba154966387e18a54d374f007dd0 5537 libautovivification-perl_0.18-2+b4_amd64.buildinfo df3ad13dd50ddc1221b72fa65db627c2afcd72a2 25188 libautovivification-perl_0.18-2+b4_amd64.deb Checksums-Sha256: 4015c4dfdaf1d667f75deecd09c96a31c4951d98dd92cb4810d0c8b7617fe5fc 60264 libautovivification-perl-dbgsym_0.18-2+b4_amd64.deb 4256fd63b752006627ed19fe2c8623615c4b64e35cdfd2722a52375f105cee7b 5537 libautovivification-perl_0.18-2+b4_amd64.buildinfo 00ddf25eb1384252b0cc3e31181917e51a836d51f91f862ba2aca126b76c4fa3 25188 libautovivification-perl_0.18-2+b4_amd64.deb Files: ec4d49f072bbe6354cad84f02fdb9838 60264 debug optional libautovivification-perl-dbgsym_0.18-2+b4_amd64.deb 596cd7b859fabd502a94ee00fce5d2b2 5537 perl optional libautovivification-perl_0.18-2+b4_amd64.buildinfo 2a7327ae042dd10c66b67a5c0adb5067 25188 perl optional libautovivification-perl_0.18-2+b4_amd64.deb +------------------------------------------------------------------------------+ | Buildinfo | +------------------------------------------------------------------------------+ Format: 1.0 Source: libautovivification-perl (0.18-2) Binary: libautovivification-perl libautovivification-perl-dbgsym Architecture: amd64 Version: 0.18-2+b4 Binary-Only-Changes: libautovivification-perl (0.18-2+b4) perl-5.40; urgency=low, binary-only=yes . * Binary-only non-maintainer upload for amd64; no source changes. * Rebuild for Perl 5.40 . -- Debian Perl autobuilder Sat, 14 Sep 2024 11:57:32 +0000 Checksums-Md5: ec4d49f072bbe6354cad84f02fdb9838 60264 libautovivification-perl-dbgsym_0.18-2+b4_amd64.deb 2a7327ae042dd10c66b67a5c0adb5067 25188 libautovivification-perl_0.18-2+b4_amd64.deb Checksums-Sha1: eea7ce9f177f16529b2d263666d3898b2863d2d3 60264 libautovivification-perl-dbgsym_0.18-2+b4_amd64.deb df3ad13dd50ddc1221b72fa65db627c2afcd72a2 25188 libautovivification-perl_0.18-2+b4_amd64.deb Checksums-Sha256: 4015c4dfdaf1d667f75deecd09c96a31c4951d98dd92cb4810d0c8b7617fe5fc 60264 libautovivification-perl-dbgsym_0.18-2+b4_amd64.deb 00ddf25eb1384252b0cc3e31181917e51a836d51f91f862ba2aca126b76c4fa3 25188 libautovivification-perl_0.18-2+b4_amd64.deb Build-Origin: Debian Build-Architecture: amd64 Build-Date: Sat, 14 Sep 2024 11:57:41 +0000 Build-Path: /<> Build-Tainted-By: merged-usr-via-aliased-dirs usr-local-has-programs Installed-Build-Depends: autoconf (= 2.72-3), automake (= 1:1.16.5-1.3), autopoint (= 0.22.5-2), autotools-dev (= 20220109.1), base-files (= 13.5), base-passwd (= 3.6.4), bash (= 5.2.32-1+b1), binutils (= 2.43.1-4), binutils-common (= 2.43.1-4), binutils-x86-64-linux-gnu (= 2.43.1-4), bsdextrautils (= 2.40.2-8), bsdutils (= 1:2.40.2-8), build-essential (= 12.10), bzip2 (= 1.0.8-6), coreutils (= 9.4-3.1), cpp (= 4:14.1.0-2), cpp-13 (= 13.3.0-6), cpp-13-x86-64-linux-gnu (= 13.3.0-6), cpp-14 (= 14.2.0-4), cpp-14-x86-64-linux-gnu (= 14.2.0-4), cpp-x86-64-linux-gnu (= 4:14.1.0-2), dash (= 0.5.12-9), debconf (= 1.5.87), debhelper (= 13.20), debianutils (= 5.20), dh-autoreconf (= 20), dh-strip-nondeterminism (= 1.14.0-1), diffutils (= 1:3.10-1), dpkg (= 1.22.11), dpkg-dev (= 1.22.11), dwz (= 0.15-1+b1), file (= 1:5.45-3), findutils (= 4.10.0-3), g++ (= 4:14.1.0-2), g++-14 (= 14.2.0-4), g++-14-x86-64-linux-gnu (= 14.2.0-4), g++-x86-64-linux-gnu (= 4:14.1.0-2), gcc (= 4:14.1.0-2), gcc-13 (= 13.3.0-6), gcc-13-base (= 13.3.0-6), gcc-13-x86-64-linux-gnu (= 13.3.0-6), gcc-14 (= 14.2.0-4), gcc-14-base (= 14.2.0-4), gcc-14-x86-64-linux-gnu (= 14.2.0-4), gcc-x86-64-linux-gnu (= 4:14.1.0-2), gettext (= 0.22.5-2), gettext-base (= 0.22.5-2), grep (= 3.11-4), groff-base (= 1.23.0-5), gzip (= 1.12-1.1), hostname (= 3.23+nmu2), init-system-helpers (= 1.66), intltool-debian (= 0.35.0+20060710.6), libacl1 (= 2.3.2-2), libarchive-zip-perl (= 1.68-1), libasan8 (= 14.2.0-4), libatomic1 (= 14.2.0-4), libattr1 (= 1:2.5.2-1), libaudit-common (= 1:4.0.1-1), libaudit1 (= 1:4.0.1-1), libbinutils (= 2.43.1-4), libblkid1 (= 2.40.2-8), libbz2-1.0 (= 1.0.8-6), libc-bin (= 2.40-2), libc-dev-bin (= 2.40-2), libc6 (= 2.40-2), libc6-dev (= 2.40-2), libcap-ng0 (= 0.8.5-2), libcap2 (= 1:2.66-5), libcc1-0 (= 14.2.0-4), libcrypt-dev (= 1:4.4.36-5), libcrypt1 (= 1:4.4.36-5), libctf-nobfd0 (= 2.43.1-4), libctf0 (= 2.43.1-4), libdb5.3t64 (= 5.3.28+dfsg2-7), libdebconfclient0 (= 0.272), libdebhelper-perl (= 13.20), libdpkg-perl (= 1.22.11), libelf1t64 (= 0.191-2), libfile-stripnondeterminism-perl (= 1.14.0-1), libgcc-13-dev (= 13.3.0-6), libgcc-14-dev (= 14.2.0-4), libgcc-s1 (= 14.2.0-4), libgdbm-compat4t64 (= 1.24-2), libgdbm6t64 (= 1.24-2), libgmp10 (= 2:6.3.0+dfsg-2+b1), libgomp1 (= 14.2.0-4), libgprofng0 (= 2.43.1-4), libhwasan0 (= 14.2.0-4), libicu72 (= 72.1-5), libisl23 (= 0.27-1), libitm1 (= 14.2.0-4), libjansson4 (= 2.14-2+b2), liblsan0 (= 14.2.0-4), liblzma5 (= 5.6.2-2), libmagic-mgc (= 1:5.45-3), libmagic1t64 (= 1:5.45-3), libmd0 (= 1.1.0-2), libmount1 (= 2.40.2-8), libmpc3 (= 1.3.1-1+b2), libmpfr6 (= 4.2.1-1+b1), libpam-modules (= 1.5.3-7), libpam-modules-bin (= 1.5.3-7), libpam-runtime (= 1.5.3-7), libpam0g (= 1.5.3-7), libpcre2-8-0 (= 10.42-4+b1), libperl-dev (= 5.40.0-5), libperl5.40 (= 5.40.0-5), libpipeline1 (= 1.5.8-1), libquadmath0 (= 14.2.0-4), libseccomp2 (= 2.5.5-1+b1), libselinux1 (= 3.7-3), libsframe1 (= 2.43.1-4), libsmartcols1 (= 2.40.2-8), libssl3t64 (= 3.3.2-1), libstdc++-14-dev (= 14.2.0-4), libstdc++6 (= 14.2.0-4), libsystemd0 (= 256.6-1), libtinfo6 (= 6.5-2), libtool (= 2.4.7-7), libtsan2 (= 14.2.0-4), libubsan1 (= 14.2.0-4), libuchardet0 (= 0.0.8-1+b1), libudev1 (= 256.6-1), libunistring5 (= 1.2-1), libuuid1 (= 2.40.2-8), libxml2 (= 2.12.7+dfsg-3+b1), libzstd1 (= 1.5.6+dfsg-1), linux-libc-dev (= 6.10.9-1), m4 (= 1.4.19-4), make (= 4.3-4.1), man-db (= 2.13.0-1), mawk (= 1.3.4.20240905-1), ncurses-base (= 6.5-2), ncurses-bin (= 6.5-2), openssl-provider-legacy (= 3.3.2-1), patch (= 2.7.6-7), perl (= 5.40.0-5), perl-base (= 5.40.0-5), perl-modules-5.40 (= 5.40.0-5), po-debconf (= 1.0.21+nmu1), rpcsvc-proto (= 1.4.3-1), sed (= 4.9-2), sensible-utils (= 0.0.24), sysvinit-utils (= 3.10-2), tar (= 1.35+dfsg-3), usr-is-merged (= 39), util-linux (= 2.40.2-8), xz-utils (= 5.6.2-2), zlib1g (= 1:1.3.dfsg+really1.3.1-1) Environment: DEB_BUILD_OPTIONS="parallel=2" LANG="C.UTF-8" LC_COLLATE="C.UTF-8" LC_CTYPE="C.UTF-8" LD_LIBRARY_PATH="/usr/lib/libeatmydata" SOURCE_DATE_EPOCH="1726315052" +------------------------------------------------------------------------------+ | Package contents | +------------------------------------------------------------------------------+ libautovivification-perl-dbgsym_0.18-2+b4_amd64.deb --------------------------------------------------- new Debian package, version 2.0. size 60264 bytes: control archive=564 bytes. 459 bytes, 13 lines control 106 bytes, 1 lines md5sums Package: libautovivification-perl-dbgsym Source: libautovivification-perl (0.18-2) Version: 0.18-2+b4 Auto-Built-Package: debug-symbols Architecture: amd64 Maintainer: Debian Perl Group Installed-Size: 74 Depends: libautovivification-perl (= 0.18-2+b4) Section: debug Priority: optional Multi-Arch: same Description: debug symbols for libautovivification-perl Build-Ids: 1d784b228c1957f29c3479cdee15ca97e645f78e drwxr-xr-x root/root 0 2024-09-14 11:57 ./ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/lib/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/lib/debug/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/lib/debug/.build-id/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/lib/debug/.build-id/1d/ -rw-r--r-- root/root 65504 2024-09-14 11:57 ./usr/lib/debug/.build-id/1d/784b228c1957f29c3479cdee15ca97e645f78e.debug drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/share/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/share/doc/ lrwxrwxrwx root/root 0 2024-09-14 11:57 ./usr/share/doc/libautovivification-perl-dbgsym -> libautovivification-perl libautovivification-perl_0.18-2+b4_amd64.deb -------------------------------------------- new Debian package, version 2.0. size 25188 bytes: control archive=1100 bytes. 874 bytes, 19 lines control 827 bytes, 9 lines md5sums Package: libautovivification-perl Source: libautovivification-perl (0.18-2) Version: 0.18-2+b4 Architecture: amd64 Maintainer: Debian Perl Group Installed-Size: 74 Depends: perl (>= 5.40.0-5), perlapi-5.40.0, libc6 (>= 2.4) Section: perl Priority: optional Multi-Arch: same Homepage: https://metacpan.org/release/autovivification Description: pragma for lexically disabling autovivification autovivication is a Perl pragma that enables developers to control whether variables can be created automatically on their first use, rather than requiring them to be defined beforehand. While occasionally useful, this behaviour can result in subtle bugs that are difficult to debug. . This pragma lets you disable autovivification for some constructs and can optionally also emit a warning or error when it would have happened. drwxr-xr-x root/root 0 2024-09-14 11:57 ./ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/lib/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/lib/x86_64-linux-gnu/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/lib/x86_64-linux-gnu/perl5/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/lib/x86_64-linux-gnu/perl5/5.40/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/lib/x86_64-linux-gnu/perl5/5.40/auto/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/lib/x86_64-linux-gnu/perl5/5.40/auto/autovivification/ -rw-r--r-- root/root 34656 2024-09-14 11:57 ./usr/lib/x86_64-linux-gnu/perl5/5.40/auto/autovivification/autovivification.so -rw-r--r-- root/root 7648 2017-11-04 15:14 ./usr/lib/x86_64-linux-gnu/perl5/5.40/autovivification.pm drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/share/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/share/doc/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/share/doc/libautovivification-perl/ -rw-r--r-- root/root 215 2024-09-14 11:57 ./usr/share/doc/libautovivification-perl/changelog.Debian.amd64.gz -rw-r--r-- root/root 925 2024-09-14 11:57 ./usr/share/doc/libautovivification-perl/changelog.Debian.gz -rw-r--r-- root/root 3313 2017-11-04 15:18 ./usr/share/doc/libautovivification-perl/changelog.gz -rw-r--r-- root/root 1601 2022-06-08 19:23 ./usr/share/doc/libautovivification-perl/copyright drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/share/doc/libautovivification-perl/examples/ -rw-r--r-- root/root 2023 2024-09-14 11:57 ./usr/share/doc/libautovivification-perl/examples/bench.pl -rw-r--r-- root/root 2335 2024-09-14 11:57 ./usr/share/doc/libautovivification-perl/examples/hash2array.pl drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/share/man/ drwxr-xr-x root/root 0 2024-09-14 11:57 ./usr/share/man/man3/ -rw-r--r-- root/root 3534 2024-09-14 11:57 ./usr/share/man/man3/autovivification.3pm.gz +------------------------------------------------------------------------------+ | Post Build | +------------------------------------------------------------------------------+ +------------------------------------------------------------------------------+ | Cleanup | +------------------------------------------------------------------------------+ Purging /<> Not cleaning session: cloned chroot in use +------------------------------------------------------------------------------+ | Summary | +------------------------------------------------------------------------------+ Build Architecture: amd64 Build Type: any Build-Space: 1432 Build-Time: 9 Distribution: perl-5.40 Host Architecture: amd64 Install-Time: 4 Job: /srv/debomatic/incoming/libautovivification-perl_0.18-2.dsc Machine Architecture: amd64 Package: libautovivification-perl Package-Time: 17 Source-Version: 0.18-2 Space: 1432 Status: successful Version: 0.18-2+b4 -------------------------------------------------------------------------------- Finished at 2024-09-14T11:57:41Z Build needed 00:00:17, 1432k disk space