[Bioperl-l] passing HTML code to start_report (HTMLResultWriter.pm)

Tue Mar 9 10:52:44 EST 2004

All,

Looking at HTMLResultWriter.pm it looks as though I can specify pass
info I want to appear in the <head> by:

    my $processor = new Bio::SearchIO::Writer::HTMLResultWriter(@args);
    $processor->start_report(\&my_start_report);

sub my_start_report {
    my ($result) = @_;
    return sprintf(
    qq{<HTML>
      <HEAD><CENTER><TITLE> whatever </TITLE></CENTER></HEAD>
      <BODY BGCOLOR="WHITE">
    },$result->algorithm);    
}

If I try this I get back the html returned from the method 'default_start_report'???
Specifically I want to add some js links(head) and a logo(body) to the HTML report for blast.

Charles