use strict;
use Getopt::Std;

our $opt_v;
print join(':',@ARGV), "\n";
getopt('v');