Select Code to Download

use Storable;

...
}

store \%id2off, 'input.idx';

use Storable;
$id2off = retrieve 'input.idx';
...
        print;
    }
}