Help for this page

Select Code to Download


  1. or download this
    my $str  = '%/%/ISIN/US1252691001';
my @elems = split m{/}, $str;

my $isin = $elems[2];
  2. or download this
    my @elems =
   $str =~ m{(?(?<=\A)|(?<=/))(.*?)(?=/|\z)}g;