Bruno Negrao - Perl List wrote:

> Ok david.
> 
> Could you send me a code example of a database file being opened for
> reading with tie?
> 
> thanks,
> bnegrao.

use NDBM_File;
tie(%HIST, 'NDBM_File', '/usr/lib/news/history', 1, 0);
while (($key,$val) = each %HIST) {
        print $key, ' = ', unpack('L',$val), "\n";
}
untie(%HIST);

this example is directly from perldoc -f tie

david

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to