use Sys::Mmap;
# ...
Sys::Mmap::hardwire($address, 0x78000000, $kernel_size);