#!/usr/local/bin/perl5


$DEBUG = 0;
$OUTFILE = shift(@ARGV);


print ("FOO:$OUTFILE xxx\n");