I couldn't figure out how to adust the Y axis increments as you would like but I did rework the code so that it runs on Windows as follows:

use strict;
use Win32::API;
use PDF::Reuse::OverlayChart;
use PDF::Reuse;


my $filetouse = "myfile.pdf";
   prFile($filetouse);
   my $s = PDF::Reuse::OverlayChart->new();
   
   my $a = 52;
   my $b = 22;
   my $c = 25;
   $s->columns(qw(Status  Ahead Ontime  Delay));
   $s->add(      'Percent',     $a,    $b ,  $c);      
   #$s->color( 'bright' );
    $s->color( '0.3 0.6 0.3' );

   $s->draw(x     => 100,
            y     => 200,
            xsize => 1,
            ysize => 1,
            height=> 300,
            width => 300,
            initialMinY=>10,
            initialMaxY=>100,            
            title => 'File Status',
            yUnit => 'Percentage',
            type  => 'bars');
   prEnd();


my $shellopen = new Win32::API("shell32", "ShellExecute", 
                             ['N', 'P', 'P', 'P', 'P', 'I'],
                              'N');

$shellopen->Call(0, "open", $filetouse, 0, 0, 0);
[download]