Hello, monks! I've written a simple function that should return the index of the maximum value in an array. However, it will always return $imax=0. No matter how hard I look, I can't tell where my logic is flawed. I suspect the fix is embarrassingly straightforward; thank you so much for your help!

use strict;
use warnings;

sub get_max_index {  #revisit how to define functions/"my" var ? (defa
+ult parameters?)
    my $imax=0;
    for (my $i=0; $i<@_; $i++)
         { my $imax=$i if ($_[$imax]<=$_[$i]);}
    return $imax;
}


my @arr = (1..10);
my $ans = get_max_index(@arr);
print"$ans\n";
[download]