ReneB has asked for the wisdom of the Perl Monks concerning the following question:
my $recordsize=160; my ( $portingID, $cli ); print "${INFO}building hash table\t\t - '$infile'\n"; until( eof(IN) ){ read(IN, my $data, $recordsize) == $recordsize $cli =substr($data, 0,9); $portingID=substr($data,30,6); $old_tab{ $cli } = $portingID if $filenum==1; $new_tab{ $cli } = $portingID if $filenum==2; $actld++; } close IN;
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: How store a hash table on disk and work with it
by Corion (Patriarch) on Dec 04, 2008 at 08:21 UTC | |
by ReneB (Initiate) on Dec 04, 2008 at 13:20 UTC | |
|
Re: How store a hash table on disk and work with it
by gone2015 (Deacon) on Dec 04, 2008 at 09:39 UTC | |
by ReneB (Initiate) on Dec 04, 2008 at 13:00 UTC | |
|
Re: How store a hash table on disk and work with it
by dragonchild (Archbishop) on Dec 05, 2008 at 12:49 UTC | |
| A reply falls below the community's threshold of quality. You may see it by logging in. |