Help for this page

Select Code to Download


  1. or download this
    my $pattern= "(,|\\||:|>|\\]\\[|_\\|_)";
my @splitted= split /$pattern/,$text;