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;

---
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]

Reply via email to