X-Git-Url: http://git.pippins.net/embedvideo/.git/?a=blobdiff_plain;f=bin%2Fupgrade_1_0_to_2_0;fp=bin%2Fupgrade_1_0_to_2_0;h=e5a1390e9c338a89d71e5017679779af0058625d;hb=b569f0e85df791ecd13ed18a9378424bbd570558;hp=cd7484b84680f473bff49b5aadd50217c1eb48e4;hpb=4b94ceb350683f086a54ed56dbb966455b0bfedc;p=eq%2F.git diff --git a/bin/upgrade_1_0_to_2_0 b/bin/upgrade_1_0_to_2_0 index cd7484b..e5a1390 100755 --- a/bin/upgrade_1_0_to_2_0 +++ b/bin/upgrade_1_0_to_2_0 @@ -23,16 +23,16 @@ $sth->execute or die "-E- DB error: $DBI::errstr\n"; $sth = $dbh->prepare("select * from eq_interview"); $sth->execute or die "-E- DB error: $DBI::errstr\n"; while($row = $sth->fetchrow_hashref) { - $interviewer = $row->{interviewer}; - $elder = $row->{elder}; - $aaronic = $row->{aaronic}; - $date = $row->{date}; - $notes = $row->{notes}; - $notes =~ s/\'/\\\'/g; - $eqpresppi = 0; - #print "$interviewer $elder $aaronic $date $eqpresppi $notes\n"; - $sth2 = $dbh->prepare("insert into eq_ppi values (NULL,'$interviewer','$elder','$aaronic','$date','$notes','$eqpresppi')"); - $sth2->execute or die "-E- DB error: $DBI::errstr\n"; + $interviewer = $row->{interviewer}; + $elder = $row->{elder}; + $aaronic = $row->{aaronic}; + $date = $row->{date}; + $notes = $row->{notes}; + $notes =~ s/\'/\\\'/g; + $eqpresppi = 0; + #print "$interviewer $elder $aaronic $date $eqpresppi $notes\n"; + $sth2 = $dbh->prepare("insert into eq_ppi values (NULL,'$interviewer','$elder','$aaronic','$date','$notes','$eqpresppi')"); + $sth2->execute or die "-E- DB error: $DBI::errstr\n"; } print "\n-> Succesfully imported all eq_interview table entries into eq_ppi table...\n";