my $s = '';
GetOptions('string=s' => \$s);