Prash wrote: ...
If I place the tie and untie inside the loop then it works??
Code: tie (%KSK, 'DB_File', $database) or loganddie ("Unable to open dbm file $database");
while (<STDIN>) { ..... .... $KSK{$user} = "lalala"; }
untie (%KSK);
(I was going to stick one of those illegal copyright URLs here - but decided to just hint a GOOGLE:
Perl Cookbook: 13.15. Creating Magic Variables with tie)
Also read - perldoc (or man) perltie grep for STORE ...
(*Everything* can be found using the Internet -- _look more_ :) -- _Sx_ http://youve-reached-the.endoftheinternet.org/ _____ http://postfix.insecurity.org/
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>