my $value = 'sample1\*sample2\*sample3*sample4*sample5';
$value =~ s#\*#STAR#g;
print $value