...
print("$p\n");  # ARRAY(0x1abefa0)
print("$q\n");  # ARRAY(0x1abf054)