>>701

なんで素直に

($hash_1, $hash_b) = load();
sub load {
@{ retrieve('file') };
}

にしないの？