my $str  = '%/%/ISIN/US1252691001';
my @elems = split m{/}, $str;

my $isin = $elems[2];