#!/usr/bin/perl

use strict;
use warnings;
use open ':std', ':encoding(UTF-8)';

use lib '/app/tools/common/lib';
use Common::Session;

use lib '/app/tools/stats/lib';
use Stats::Redshift::ExportSchema;

$| = 1;

my $stat = Stats::Redshift::ExportSchema->new();
$stat->truncate_all;