my @info = split /\//, 'http:/00/ab1235/66/index.htm';
print $info[-2];