• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 289
  • Last Modified:

Substr

I have some srings like
<br><a href="test.htm"><b>Some Text</b></a>
and
<br><a href="testgetmore.htm"><b>More Text</b></a>

i want to get the substring after <b> and before </b> but the position of "<b>" is on a defrent position in the string
how do i get the position of the <b> and how do u use substr?

Thanks

0
delpro
Asked:
delpro
  • 2
  • 2
1 Solution
 
ozoCommented:
($substring) = $string =~ m|<b>(.*?)</b>|;

#to get the position of the <b>
$position = index $string,'<b>';
#to use substr
$substring = substr $string,$position+3;
#or
$substring = substr $string,$position+3,(index $string,'</b>')-$position-3;
0
 
sybeCommented:
sub ExtractBetween
{
  local($string, $tag1, $tag2) = @_;
  $ind1 = index($string, $tag1) + length($tag1);
  $ind2 = index($string, $tag2);
  $string = substr($string,$ind1,$ind2-$ind1);
  return $string;
}


$yourstring = '<br><a href="test.htm"><b>Some Text</b></a>';
$extractedstring = ExtractBetween($yourstring,'<b>','</b>');

0
 
ozoCommented:
#If you're going to use it in a sub, then perhaps
 $ind2 = index($string, $tag2);
#would be be safer as
 $ind2 = index($string, $tag2, $ind1);
#so that
ExtractBetween('</b><br><a href="test.htm"><b>Some Text</b>',<b>','<');
#still works

#although for literal tags,
($extractedstring) = $yourstring =~ m|<b>(.*?)</b>|;
#still seems easier
0
 
sybeCommented:
I wrote my answer as ozo posted his comment, so i did not see his first comment.
Anyway, I agree with ozo that his answer is easier.

ozo, you're a real perl-magician !

0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

  • 2
  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now