print "$1 $2\n" if($str=~/(.*?)\*(.*)/);