Help for this page

Select Code to Download


  1. or download this
    my $str = "Test*.Value";
    print "$1 $2\n" if($str=~/(.*?)\*\.(.*)/);