| Subject: | dump_overwrite enlarges file instead of replace |
Perl v5.8.7 on Ubuntu 5.10.
Repeatedly executing the following script includes already
existing file content with the hint
# These lines loaded from user-supplied external file:
[... previous file contents ...]
# End of lines loaded from user-supplied external file
instead of overwriting/replacing the files. So the files always grows:
--------------------------------
#!/usr/bin/perl -w
use strict;
use lib "lib";
use DPW::Schema::Dpw;
use DBIx::Class::Schema::Loader qw/ make_schema_at /;
make_schema_at ( 'DPW::Schema::Dpw',
{ relationships => 1,
debug => 0,
dump_directory => './lib',
dump_overwrite => 1, # <------ with this
},
[ 'dbi:mysql:dpw_dev','login', 'passwd' ],
);
--------------------------------