Revision 469 (by ahitrov, 2014/12/24 13:57:26) |
---|
#!/usr/bin/perl use strict; BEGIN { require 'libs.pl' }; $DEBUG = 0; $Contenido::Keeper::DEBUG = $DEBUG; $Contenido::Project::DEBUG = $DEBUG; $Contenido::State::DEBUG = $DEBUG; $PhoenixDBI::DEBUG = $DEBUG; # ������������ � ���� ������ ��� ������������ � ��������... my $keeper = Contenido::Keeper->new($state); $keeper->{SQL}->do("VACUUM FULL ANALYZE"); $keeper->shutdown();