{
    local $/ = $sep;
    my $done = $offset + $span ;
    while (<WEBLOG>) {
        chomp,
          print
            if $. == $offset .. $. == $done && last;
    }
}