in reply to Perligata array indices
Did you try:
at the start of the program, to be shown precisely how it's converting the Latinate code to Perl?use Lingua::Romana::Perligata 'converte';
When I do that on your source under Perl 5.20, I get (after perltidy-ing it):
which appears to be exactly equivalent to your comments on the right.use strict; use warnings; $_ = Lingua::Romana::Perligata::getline(*STDIN); @_ = split( " ", $_ ); my (@ap) = split( " ", $_ ); my $i = 0; my $m = Lingua::Romana::Perligata::__lastelem__(@_); for $_ ( Lingua::Romana::Perligata::__enlist__( 0, $m ) ) { print( STDOUT $_, " " ); print( STDOUT $_[$_], " " ); } print( STDOUT "\n" ); my (@b); my $v; for $v ( Lingua::Romana::Perligata::__enlist__( 0, $m ) ) { print( STDOUT $v, " " ); print( STDOUT $ap[$v], " " ); $b[$v] = $ap[$v]; } print( STDOUT "\n" ); for $_ (@_) { print( STDOUT $_, " " ) } print( STDOUT "\n" ); for $_ (@b) { print( STDOUT $_ ) }
If 'converte' produces the same code for you, then that's literally what Perligata is actually executing.
If it doesn't produce the same code, then it's a puzzle (maybe related to the version of Perl and/or Perligata you're using?)
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: Perligata array indices
by msh210 (Monk) on Jul 05, 2016 at 17:13 UTC | |
by TheDamian (Vicar) on Jul 05, 2016 at 21:24 UTC | |
by TheDamian (Vicar) on Jul 07, 2016 at 00:36 UTC | |
by msh210 (Monk) on Jul 07, 2016 at 22:08 UTC |
In Section
Seekers of Perl Wisdom