Select Code to Download

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

my $value = 'sample1\\*sample2\\*sample3\\*sample4\\*sample5';
my $value2 = 'sample1\*sample2\*sample3\*sample4\*sample5';
...
else {
   print "I am a doofus\n";
}