rendered paste bodyez shellben:
cat og_h.html |grep mhev |grep bg |sed -e '/width=30/d' -e '/width=10/d' -e 's/.*<font class=".*">\(.*\)<\/font>.*/\1/' -e '/mhevbg/d' -e '/ /d'
ez perlben:
#!/usr/bin/perl
open(FILE, "og_h.html");
while(<FILE>)
{
$line = $_;
if ($line =~ m/mhev/)
{
if ($line =~ m/bg/)
{
if ( !($line =~ m/width=10/) )
{
if ( !($line =~ m/width=30/) )
{
$line =~ /.*<font class=".*">(.*)<\/font>.*/;
$line = $1;
if ( !($line =~ m/mhevbg/) )
{
if ( !($line =~ m/ /) )
{
print $line."\n";
}
}
}
}
}
}