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.

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

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?

---

---

• Are you posting in the right place? Check out Where do I post X? to know for sure.
• Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:

  <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>

• Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
• Want more info? How to link or How to display code and escape characters are good places to start.