Select Code to Download

open(INF,"$Dir/log.txt") or dienice("Can't open logs: $! \n");
...
    $b[0] <=> $a[0];
}

print "[$rate] [$team] $comment\n";
print "<br>";
...

I tried stripping spaces or newlines, tried using a
if $i > 0 or if exists ($rate) with no success.