my $grp = "CIC\r";
print "START~" . $grp . "~END\n";