GetOptions('x',(my $x=1,y=>my $y));