try using 'map':

my $rv = fc({ map { $_ => $hashRef->{$_} } ('A', 'B', ) });
.....
[download]