Select Code to Download

open my $fh, '<', $filename or die "Can't open $filename: $!\n";
_restore_offset($filename, $fh);
...
  my $inode = (stat $fh)[1];
  # Stuff $offset and $inode back into database
}