Re: [mv] Help with external export scripts for databases

[Ed LaFrance <edl@newmediaems.com>]

******    message to minivend-users from Ed LaFrance <edl@newmediaems.com>     ******

Chris -

Thanks for the suggestion.  Here is the first line from the only 
Storable.pm which would be encountered by @INC:

;# $Id: Storable.pm,v 0.6.1.11 2000/04/02 21:44:33 ram Exp $

It is worth noting that I can stop the minivend server, delete all .db 
files, restart the server and incite a rebuild of some files (with storable 
enabled) - no errors from minivend, but I still get my error when I run my 
script!  I must be missing something here.

- Ed L.


At 03:28 PM 11/30/00 -0500, you wrote:
>******    message to minivend-users from cfm@maine.com     ******
>
>On Thu, Nov 30, 2000 at 12:02:27PM -0800, Ed LaFrance wrote:
> > ******    message to minivend-users from Ed LaFrance 
> <edl@newmediaems.com>     ******
> >
> > Hello All -
> >
> > I am working on some Perl scripts for exporting gdbm and db databases for
> > an older, busy minivend site (3.14), the idea being that these could be 
> run
> > externally from command line, crontab, etc 'offline' from the site.  This
> > is pretty straightforward, but the wrinkle is that the site(s) are using
> > Storable, and when I try to use any storable functions in the script i get:
> >
> > Storable binary image v56.97 more recent than I am (v1.0) at
> > blib/lib/Storable.pm (autosplit into blib/lib/auto/Storable/thaw.al) line
> > 238, at export_db line 17
>
>The "more recent" is wrong.  You have something like image v{56} or
>some such.  I recognize that from this past weekend.  Search your
>@INC paths for any instances of "Storable*" and check the versions.
>
>If your minivend site has been running **longer** than that Storable
>v1.0 you might have a problem on next restart depending what it
>finds.  We ran into this with our recent cut over to perl5.6.
>
>
> >
> > ...which seems odd, since minivend is running fine and without errors.  I
> > am admittedly a perl hack - in this case I was just trying to "thaw" the
> > value element form the database when I got this error, and maybe I caused
> > the problem  Here is a code snippet:
> >
> > #!/usr/bin/perl -w
> > use strict ;
> > use DB_File ;
> > use vars qw( %h $k $v @v) ;
> > use Storable;
> >
> > my $database = shift(@ARGV);
> > my $code = shift(@ARGV) || 'code';
> > my @data;
> > my $header;
> >
> > tie %h, "DB_File", $database, O_RDWR, 0640, $DB_HASH or die "Cannot open
> > file: $!\n";
> >
> > while (($k, $v) = each %h)
> > {
> >          @v = Storable::thaw($v);
> >          $v = join ":", @v;
> > ....
> > }
> >
> > The call to thaw() is one line 17.  Any pointers would be appreciated.
> >
> > - Ed L.
> >  >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
> > New Media E.M.S.               Software Solutions for Business
> > 463 Main St., Suite D          edl@newmediaems.com
> > Placerville, CA  95667         http://www.newmediaems.com
> > (530) 622-9421                 (530) 622-9426 Fax
> > (866) 519-4680 Toll-Free
> >  >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
> >
> > -
> > To unsubscribe from the list, DO NOT REPLY to this message.  Instead, send
> > email with 'UNSUBSCRIBE minivend-users' in the body to 
> Majordomo@minivend.com.
> > Archive of past messages: http://www.minivend.com/minivend/minivend-list
>
>--
>
>Christopher F. Miller, Publisher                             cfm@maine.com
>MaineStreet Communications, Inc         208 Portland Road, Gray, ME  04039
>1.207.657.5078                                       http://www.maine.com/
>Content management, electronic commerce, internet integration, Debian linux
>-
>To unsubscribe from the list, DO NOT REPLY to this message.  Instead, send
>email with 'UNSUBSCRIBE minivend-users' in the body to Majordomo@minivend.com.
>Archive of past messages: http://www.minivend.com/minivend/minivend-list

 >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
New Media E.M.S.               Software Solutions for Business
463 Main St., Suite D          edl@newmediaems.com
Placerville, CA  95667         http://www.newmediaems.com
(530) 622-9421                 (530) 622-9426 Fax
(866) 519-4680 Toll-Free
 >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

-
To unsubscribe from the list, DO NOT REPLY to this message.  Instead, send
email with 'UNSUBSCRIBE minivend-users' in the body to Majordomo@minivend.com.
Archive of past messages: http://www.minivend.com/minivend/minivend-list