[Bioperl-l] A error with Bio::Graphics::Pane, help me!!!!!

[Danielucg Sousa]

HI,

I have done my code with image_and_map of
Bio::Graphics::Pane Classe. So, out this message:
> gd-png:  fatal libpng error: Image width or height
is zero in IHDR
> gd-png error: setjmp returns error condition

My code until this erro is:
#!/usr/bin/perl -wT

use strict;
use Bio::Graphics;
use Bio::SeqIO;
use Bio::SeqFeature::Generic;
#use CGI ':standard';
use CGI::Pretty;

my $file = '/var/www/cgi-bin/AL391145.gb';
my $io = Bio::SeqIO->new(-file=>$file);
my $seq = $io->next_seq;
#my $wholeseq =
Bio::SeqFeature::Generic->new(-start=>1,-end=>$seq->length);
my @features = $seq->all_SeqFeatures;
 my $q = new CGI;

# sort features by their primary tags
my %sorted_features;
for my $f (@features) {
  my $tag = $f->primary_tag;
  push @{$sorted_features{$tag}},$f;
}

print $q->header('text/html');
print $q->start_html('A Vector Rendering ');

my $panel =
Bio::Graphics::Panel->new(-length=>$seq->length,
-width       => 1000,				      -pad_left    => 10,				
     -pad_right   => 10,				      -key_color   =>
'white',				-key_spacing => 15,				      -key_style  
=> 'bottom',			      -spacing     => -0.25,				     
-box_subparts => 'true'				      );
my ($url,$map,$mapname) = $panel->image_and_map(-root
=> '/home/bioinfo/cgi-bin',-url => '/tmpimages', );

----
I don't know what I have to do. Please somebody help
me.

By,
Daniel



	
	
		
_______________________________________________________ 
Yahoo! Acesso Grátis - Instale o discador do Yahoo! agora. http://br.acesso.yahoo.com/ - Internet rápida e grátis