The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use Test::More;

eval 'use DBD::SQLite 1.0 ()';
plan skip_all => "DBD::SQLite required to run test querylet" if $@;

plan tests => 3;

use Querylet;

database: dbi:SQLite:dbname=./t/wafers.db

query:
  SELECT wafer_id
  FROM   grown_wafers

add column nulls:
	$value = undef;

add column zero:
	$value = 0;

output file: wafers.csv

no Querylet;

$q->write_output; # force execution of csv handler

ok(1, "made it here alive");
ok( -f "wafers.csv", "file created");
ok(unlink("wafers.csv"), "deleted file");