my @KPI = (10, 20, 30, 40, 50);

for my $i (0 .. $#KPI){
    my $var = $KPI[$i];
    print "line"."$var"."\n";
}
[download]

PerlMonks parthenogenetically spawned by Tim Vroom.
PerlMonks somehow became entangled with The Perl Foundation.
Beefy Boxes and Bandwidth Generously Provided by pair Networks
Built with the Perl programming language.