Help for this page

Select Code to Download


  1. or download this
    my $regex = '(?<!\\\),';
split( /$regex/, "$text" );
  2. or download this
    1
Something\,\text\text\0x2B
X
99
  3. or download this
    1
This is a problem->\,B
2
  4. or download this
    my $regex = '(?<!:),|(?<=[:]{2}),';
my $text = '1,This:, is not a problem->::,B,2';
my @test = split( /$regex/, "$text" );
...
foreach( @test ) {
    print "$_\n";
}
  5. or download this
    1
This:, is not a problem->::
B
2