Re: Alter Column Position

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1


[...]
> Now, I have to change the position of a column in the DB to match the csv
> parser.  I have a column in position 28 that I need to move to position 7.
>
> Anyone know how to do that?

Why not preprocess the csv file before uploading it to the DB? Here's a way
to do it in quickly in Perl. 10K rows should be no problem:

$,=',';
while(<F>) {
  my @foo = split(/,/ => $_);
  splice(@foo,6,0,splice(@foo,27,1));
  print @foo;
}

or if your csv is not so simple (e.g. contains escaped commas):

use Text::CSV_XS;
$,=',';
my $csv = Text::CSV_XS->new();
while(<F>) {
  die "Cannot parse line $.: " . $csv->error_input . "\n" unless $csv->parse($_);
  my @foo = $csv->fields();
  print @foo[0..5,27,6..26,28..@foo-1]; ## alternative to split()
  print "\n";
}


- --
Greg Sabino Mullane greg@turnstep.com
PGP Key: 0x14964AC8 200312102158

-----BEGIN PGP SIGNATURE-----

iD8DBQE/1+GVvJuQZxSWSsgRAp33AKCVXqKTU8qfV585DdQw+ThRWVrF7QCgkC/V
ruF2a1JeWAECM5BGSVbJcSg=
=ZY16
-----END PGP SIGNATURE-----