Help for this page

Select Code to Download


  1. or download this
    if ( $str =~ m/^ServiceCategoryName=(.*)/) {
  2. or download this
    if ( $str =~ m/^ServiceCategoryName=(.*)/) {
   print $str;
...
   my @array = split /,/, $1;
   print "my string ", $array[0], "\n";
}