# My code
 my ($value1) = split /\*/;