Help for this page

Select Code to Download


  1. or download this
    dbmopen(%TEST, "/home/lab/access.db", 0666);
    #$TEST{'test_key'} = pack 'L', int(rand 2**32);
    ...
        print $key, ' = ', unpack('L',$val), "\n";
        print "test2";
        }
    
  2. or download this
    test_key = 2412538716
    test2