App-SmokeBox-Mini-Plugin-Stats
view release on metacpan or search on metacpan
lib/App/SmokeBox/Mini/Plugin/Stats.pm view on Meta::CPAN
username => '',
password => '',
);
$kernel->yield( '_create_db' );
return;
}
sub _create_db {
my ($kernel,$heap) = @_[KERNEL,HEAP];
$heap->{_db}->do(
sql => 'PRAGMA synchronous = OFF',
event => '_db_result',
);
$heap->{_db}->do(
sql => $_,
event => '_db_result',
) for (
q[CREATE TABLE IF NOT EXISTS jobs ( ts varchar(32), vers varchar(20), arch varchar(100), job BLOB, start varchar(32), end varchar(32), killed integer, status integer )],
q[CREATE TABLE IF NOT EXISTS smokers ( ts varchar(32), vers varchar(20), arch varchar(100), start varchar(32), end varchar(32), total integer, idle integer, excess integer, average varchar(32), minimum varchar(32), maximum varchar(32) )],
);
( run in 0.232 second using v1.01-cache-2.11-cpan-0d8aa00de5b )