my $string='echo {CAT,CAC}TGG{GTT,GTC,GTA,GTG}{CCT,CCC,CCA,CCG}';
my $combinations=`$string`;
print $combinations;