Better you can use array.

use strict;
use warnings;

our $KPI0=10;
our $KPI1=20;
our $KPI2=30;
our $KPI3=40;
our $KPI4=50;

print ${$main::{"KPI$_"}}."\n" foreach(0..4);
[download]