Select Code to Download

<TR>
<TD></TD>
...
<TD CLASS='statusOdd'>1/4</TD>
<TD CLASS='statusOdd' valign='center'>something that shoudn't be publi
+shed in the Internet;</TD>
</TR>

my @superContainer;
while($longline =~ /<TD ALIGN=LEFT.+extinfo.cgi.+'>(.+)<\/A.+'status.+
+>(.+)<\/TD.+nowrap>(.+)<\/TD.+nowrap>(.+s)<\/TD>.+'>(\d\/\d)<\/TD>.+'
+>(.+)<\/TD>*?/g){
    my @subContainer = ($1, $2, $3, $4, $5, $6);
    push @superContainer, \@subContainer
}

0  ARRAY(0x1e2b628)
   0  'Description'
...
   3  '145d 19h 53m 11s'
   4  '1/4'
   5  'something that shoudn't be published in the Internet;'