for my $i (2..$_/2) {
=>
        for my $i (2..sqrt) {