Pop quiz: characters or bytes?
- Generating an image
use GD::Graph::bars; my $graph = GD::Graph::bars->new($width, $height); ... open my $img, '>', $chart_file; binmode $img; # suppress LF => CR LF on Windows print $img $gd->png;
use GD::Graph::bars; my $graph = GD::Graph::bars->new($width, $height); ... open my $img, '>', $chart_file; binmode $img; # suppress LF => CR LF on Windows print $img $gd->png;