use Getopt::Std;
getopts("x", \%opt);
print opt{x};