Try this: 
#!/usr/bin/perl -w
use strict;

my $string = <<"EOT";
<title>stuff</title>
<br>Header</br>
<tr>
  <td>1</td>
  <td>2</td>
</tr>
<tr>
  <td>3</td>
  <td>4</td>
</tr>
<br>Trailing Info
EOT

my ($wanted) = $string =~ /(<tr>.*<\/tr>)/s;

print "$wanted\n";

[download]
Which gives: 
<tr>
  <td>1</td>
  <td>2</td>
</tr>
<tr>
  <td>3</td>
  <td>4</td>
</tr>

[download]

The key here is the "s" modifier in the pattern match, which causes the whole string to be treated as a single line. See perlre for more info.

Update: I guess I should point out that if you happened to be parsing some html which had multiple tables, then this would fail because the .* would eat up everything between the first <tr> in the first table, and the final </tr> in the last table (but that is what you asked for). For anything other than basic parsing of html, you're much better going with one of the many modules available.

Cheers,
Darren :)

In reply to Re: Removing leading and ending text? by McDarren
in thread Removing leading and ending text? by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.