Select Code to Download

count=0,
while ($html =~ [aug<\/td>]g) { $count++ }

>perl -wMstrict -le
"my $html = 'xxx aug</td> yyy aug</td> zzz';
...
"
2
2