my $str = "Test*.Value"; print "$1 $2\n" if($str=~/(.*?)\*(.*?)/); [download]
In reply to regex question by Alien