for my $i(0..$#array) { #same thing as your C-like for stuff; } #### @HPAJ=split("", "rekcaH lreP rentonA tsuJ"); print reverse @HPAJ; #sucky but who cares?