Flush stdout.
This commit is contained in:
hjp 2013-12-01 09:01:58 +00:00
parent 055cc98b3a
commit dbd472cac6
1 changed files with 3 additions and 0 deletions

View File

@ -9,6 +9,7 @@ use strict;
use Simba::CA;
$| = 1;
my $ca = Simba::CA->new({
dbi_file => $ENV{SIMBA_DB_CONN} || "$ENV{HOME}/.dbi/simba",
@ -51,4 +52,6 @@ for my $session (@ARGV) {
$dbh->do(q{delete from versions2 where id=?}, {}, $version);
print "\tversion $version deleted\n";
}
$dbh->commit();
}
$dbh->disconnect();