@memory_blocks = sort {hex(${$b}[0][0]->address) <=> hex(${$a}[0][0]->address)} @memory_blocks;