C:\>perl p14.pl
TEXT =
SEQUENCE = ARRAY(0x15550f0)
LOOKUP = HASH(0x15551b0)
HANDLE = GLOB(0x155a5c4)

C:\>