It’s easy to make a chart 

#!/usr/bin/perl

use strict;
use warnings;

use GD::Graph::bars;