use feature qw(say);
use strict;
use warnings;

use Getopt::Long;

my( @opt_a, @opt_b );

GetOptions(
           'a=s{2}' => \@opt_a,
           'b=s{2}' => \@opt_b,
          );

say "@opt_a";
say "@opt_b";