On Tue, 2 May 2000, Scott K Purcell wrote:
> Hello,
> I don't know what is going on, but what is so simple is giving me fits.
>
> I have the following code (below) which already has data in it, so I am
> tying my hash then verifying that there is stuff, (first print statement),
> then I am inserting a new record $SN{'fish'} = "frog"; and it does not show
> up when I reprint the hash, second print statement.
> I must be overlooking something. Does anyone see any problems with this??
> Thanks
> Scott
>
> use DB_File;
> use Fcntl;
> # we need to open the portfolio hash and deal with it.
> tie (%SN, 'DB_File', "$lbPortfolio/$jobid", O-RDWR, 0777)
> or &squawk("Problems opening the lbPortfolio jobhash to remove the
> single entry from the deletion.");
>
> foreach $key(keys %SN) {
> print "$key and $LB{$key}<br>\n"; # print and verify that it lives
>
> $SN{'fish'} = "frog"; # insert a new record
>
> foreach $key(keys %SN) {
> print "$key and $LB{$key}<br>\n"; # reprint it to see my new
> record
> }
>
> untie %LB;
>
Hmmm, what's O minus RDWR?
**** [EMAIL PROTECTED] <Carl Jolley>
**** All opinions are my own and not necessarily those of my employer ****
---
You are currently subscribed to perl-win32-users as: [archive@jab.org]
To unsubscribe, forward this message to
[EMAIL PROTECTED]
For non-automated Mailing List support, send email to
[EMAIL PROTECTED]
