#!/usr/bin/perl

use DBIx::Informix::Perform 'run';
run $ARGV[0];