#!/usr/bin/perl

use lib '/var/www/granicus.if.org/gallery';

use Gallery;

my $app = Gallery->new;

my $sql = shift;

my @result = $app->fetch($sql, @ARGV);
$app->commit;

print "@result\n" if @result;