Select Code to Download

#!/usr/bin/perl
  use warnings;
...
  my $venn_chart = Venn::Chart->new( 500, 500 ) or die("error : $!"); 
+  

(B) my $venn_chart = Venn::Chart->new( 500, 500,1 ) or die("error : $!
+");

sub new {
  my ( $self, $width, $height ) = @_;
...
-----
-----
}