#!/usr/bin/perl

# fake behavior of tcap -overwrite <file> -c <command ..>
@cmd = @ARGV;
$over = shift(@cmd);
$file = shift(@cmd);
$c = shift(@cmd);

exec("@cmd >$file 2>&1");