opuz has asked for the wisdom of the Perl Monks concerning the following question:
I've just setup a new system, fresh copy of perl, and DBD::Mysql.
I've got a database with a bunch of zip files. On my old system I could extact the zips without a problem but from this new system they all appear to have extra data.
So for example this simple piece of code works fine on one system but not the other.
Is there something in perl or in DBD::Mysql that could do this? The new system is running: perl v5.8.0 and DBD::Mysql 2.9003 The database hasn't changed. This is driving me crazy. Any suggestions?use DBI; $dbh = DBI->connect("dbi:mysql:mydb;192.168.3.4","root","password"); $sth2 = $dbh->prepare("select data from inbound where inboundid=1234") +; $rv2 = $sth2->execute; %inbound = %{$sth2->fetchrow_hashref}; open(ZIP, ">data.zip"); print ZIP $inbound{'data'}; close(ZIP); result: New system - -rw-r--r-- 1 root root 5928 Feb 7 2004 temp.zip Old system - -rw-r--r-- 1 root root 4000 Feb 7 2004 temp.zip
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: DBD::Mysql Messing with my data?
by kvale (Monsignor) on Feb 07, 2004 at 20:55 UTC | |
by opuz (Initiate) on Feb 07, 2004 at 21:06 UTC | |
by chromatic (Archbishop) on Feb 07, 2004 at 21:23 UTC | |
by pfaut (Priest) on Feb 07, 2004 at 21:24 UTC | |
by opuz (Initiate) on Feb 07, 2004 at 21:30 UTC | |
by pfaut (Priest) on Feb 07, 2004 at 21:42 UTC | |
by graff (Chancellor) on Feb 09, 2004 at 01:11 UTC | |
Re: DBD::Mysql Messing with my data?
by bart (Canon) on Feb 08, 2004 at 10:16 UTC | |
Re: DBD::Mysql Messing with my data?
by michellem (Friar) on Feb 08, 2004 at 00:07 UTC |
Back to
Seekers of Perl Wisdom