(Still back at Perl 5.6.1, and VMS V7.2-2), I can get an access violation from Perl by
giving the "glob" function a really long argument, which also would return a lot of
files. For example, rename a copy of Perl to a very deep directory location (I did it
on an ODS-5 volume) and do the equivalent of a glob on PERL_ROOT:[LIB]:
$ set ver
$ @ temp
$ PERL -e "PRINT (glob
'$1$DUA1400:[RE_TOEDEL.VERY_VERY_LONG_DIRECTORY_NAME.MAN_IS_THIS_EVER_A_LONG_DIR_NAME.HOW_COULD_ANYONE_GIVE_A
_DIRECTORY_SUCH_A_LONG_NAME.2003-11-25.INSTALL.PGM.PERL.LIB]*.*') ? 'yes' : 'no';"
%SYSTEM-F-ACCVIO, access violation, reason mask=00, virtual address=00000000636C7FFF,
PC=0000000000145664, PS=0000001B
Improperly handled condition, image exit forced.
Signal arguments: Number = 0000000000000005
Name = 000000000000000C
0000000000000000
00000000636C7FFF
0000000000145664
000000000000001B
Register dump:
R0 = 000000000000003B R1 = 00000000636C8000 R2 = 0000000000053980
R3 = 0000000000000000 R4 = 0000000000000000 R5 = 0000000000215AA8
R6 = 00000000001D2470 R7 = 000000000000000A R8 = 000000007AC7F5E2
R9 = 0000000000000019 R10 = 000000000022E4C4 R11 = 000000007BC82E24
R12 = 000000000000003B R13 = 000000000022E4A0 R14 = 0000000000010001
R15 = 0000000000000001 R16 = 000000000000003B R17 = 0000000000000020
R18 = 000000000000003B R19 = 00000000000000B3 R20 = 0000000000000001
R21 = 000000000000003B R22 = 0000000000000004 R23 = 000000000000003B
R24 = 0000000000000004 R25 = 000000000000003B R26 = 00000000001455BC
R27 = 0000000000000000 R28 = 00000000636C8000 R29 = 000000007AC7F360
SP = 000000007AC7F350 PC = 0000000000145664 PS = 100000000000001B
