MiArray
123456789101112131415161718
use strict;
use warnings;
my $lista = "Gael Ulises";
my $indice = length($lista);
my @dnum = split("", $lista);
&return(@dnum,$indice-1);
sub return{
if($indice!=0){
print($dnum[$indice-1]);
&return(@dnum,$indice--);
}
}
Perl
INFO