elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.


Tema destacado: Recuerda que debes registrarte en el foro para poder participar (preguntar y responder)


  Mostrar Mensajes
Páginas: [1] 2 3 4 5 6 7 8 9 10 11
1  Programación / Scripting / Perl v5.42 en: 7 Diciembre 2025, 23:37 pm
Estos son los cambios que trae la versión v5.42, del 3 de julio de 2025.

Perl 5.42.0 representa aproximadamente 13 meses de desarrollo desde Perl 5.40.0 y contiene aproximadamente 280 000 líneas modificadas a lo largo de 1600 archivos por parte de 65 autores.

Las novedades que trae (entre otras):

Cambios principales

  • Más subrutinas CORE::
chdir se ha añadido como una subrutina al espacio de nombres CORE::

Anteriormente, código como &CORE::chdir($dir) o my $ref = \&CORE::chdir; $ref->($dir) generaba un error que decía &CORE::chdir cannot be called directly. Ahora, estos casos son totalmente compatibles.

  • Nuevo pragma source::encoding
    Esto le permite declarar que la parte de un programa para el resto del alcance léxico de este pragma está codificada completamente en ASCII (para use source::encoding 'ascii') o si también se permite UTF-8 (para use source::encoding 'utf8'). No se aceptan otras codificaciones. La segunda forma es completamente equivalente a use utf8, y se puede usar indistintamente.

    El propósito de este pragma es detectar de manera temprana los casos en los que se olvidó especificar use utf8.

    use source::encoding 'ascii' se habilita automáticamente dentro del alcance léxico de use v5.41.0 o superior.

    no source::encoding desactiva toda esta comprobación para el resto de su alcance léxico. El significado de los caracteres no ASCII queda entonces indefinido.

  • Nuevo atributo :writer en las variables de campo
    Las clases definidas mediante use feature 'class' ahora pueden crear automáticamente accesores de escritura para campos escalares, mediante el atributo :writer, de manera similar a la forma en que :reader ya crea accesores de lectura.
    [perl]class Point {
        field $x :reader :writer :param;
        field $y :reader :writer :param;
    }

    my $p = Point->new( x => 20, y => 40 );
    $p->set_x(60);[/perl]

  • Nuevos operadores any y all
    Se han agregado dos nuevas características experimentales, que presentan los operadores de procesamiento de listas any y all.

    [perl]use v5.42;
    use feature 'keyword_all';
    no warnings 'experimental::keyword_all';

    my @numbers = ...

    if ( all { $_ % 2 == 0 } @numbers ) {
        say "All the numbers are even";
    }[/perl]
    Estas palabras clave funcionan de forma similar a grep "excepto" que solo devuelven "verdadero" o "falso", comprobando si alguno (o todos) de los elementos de la lista hacen que el bloque de prueba devuelva "verdadero". Por ello, pueden cortocircuitarse, evitando la necesidad de probar más elementos si un elemento determinado determina el resultado final.

    Éstas están inspiradas en las funciones del mismo nombre en el módulo List::Util, excepto que se implementan como operadores centrales directos y, por lo tanto, funcionan más rápido y no producen un marco de pila de llamadas de subrutina adicional para invocar el bloque de código.

    Las banderas de feature que habilitan estas características se han llamado keyword_any y keyword_all para evitar confusiones con la capacidad del módulo feature de hacer referencia a todas sus características mediante la marca de exportación :all.

    Las banderas de advertencia experimentales relacionadas se denominan en consecuencia experimental::keyword_any y experimental::keyword_all.

  • El apóstrofo como separador de nombres global se puede desactivar
Esto quedó obsoleto en Perl 5.38 y se eliminó como estaba previsto en Perl 5.41.3, pero después de un tiempo de discusión se ha restablecido de manera predeterminada.

Esto se puede controlar con la característica apostrophe_as_package_separator que está habilitada de manera predeterminada, pero está deshabilitada a partir del paquete de funciones 5.41 en adelante.

Si desea deshabilitar el uso dentro de su propio código, puede deshabilitar explícitamente la función con:

[perl]no feature "apostrophe_as_package_separator";[/perl]
Tenga en cuenta que deshabilitar esta función solo impide el uso del apóstrofo como separador de paquetes dentro del código; las referencias simbólicas aún tratan ' como :: con la función deshabilitada:

[perl]my $symref = "My'Module'Var";
# default features
my $x = $My'Module'Var; # bien
no feature "apostrophe_as_package_separator";
no strict "refs";
my $y = $$symref;       # como $My::Module::Var
my $z = $My'Module'Var; # error sintaxis[/perl]

  • Declaración de método léxico usando my method
    Al igual que sub desde la versión 5.18 de Perl, method ahora se puede prefijar con la palabra clave my. Esto declara una subrutina con visibilidad léxica, en lugar de visibilidad de paquete. Consulte perlclass para más detalles.

  • Operador de invocación de método léxico ->&
    Además de la capacidad de declarar métodos léxicamente, esta versión también permite invocar una subrutina léxica como si fuera un método, omitiendo la resolución de métodos habitual basada en nombres.

    Combinadas con la declaración de métodos léxicos, estas dos nuevas habilidades crean el efecto de tener métodos privados.

  • El operador de Switch y Smart Match se mantiene, por medio de una característica
La función "switch" y el operador de coincidencia inteligente, ~~, se presentaron en la v5.10. Su comportamiento cambió significativamente en la v5.10.1. Cuando se añadió el sistema "experimental" en la v5.18.0, las funciones "switch" y "smartmatch" se declararon experimentales retroactivamente. Con el paso de los años, han surgido y desaparecido propuestas para corregir o complementar estas funciones.

Quedaron obsoletos en Perl v5.38.0 y su eliminación estaba prevista para Perl v5.42.0. Tras un amplio debate, su eliminación se ha pospuesto indefinidamente. Su uso ya no genera una advertencia de obsolescencia.

Switch aún requiere la feature switch, que está habilitada de forma predeterminada en los paquetes de funciones de la versión 5.9.5 a la 5.34. Switch permanece deshabilitado en los paquetes de características 5.35 y posteriores, pero puede habilitarse por separado:

[perl]# no switch aquí
use v5.10;
# switch aquí
use v5.36;
# no switch aquí
use feature "switch";
# switch aquí[/perl]
La coincidencia inteligente (Smart) ahora requiere la feature smartmatch, que está habilitada por defecto e incluida en todos los paquetes de funciones hasta la versión 5.40. Está deshabilitada para el paquete de funciones 5.41 y posteriores, pero se puede habilitar por separado:

[perl]# smartmatch aquí
use v5.41;
# no smartmatch aquí
use feature "smartmatch";
# smartmatch aquí[/perl]

  • Compatible con Unicode 16.0
Perl ahora es compatible con Unicode 16.0: https://www.unicode.org/versions/Unicode16.0.0/, incluidos los cambios introducidos en la versión 15.1: https://www.unicode.org/versions/Unicode15.1.0/

  • Asignación del operador xor lógico ^^=
Perl 5.40.0 introdujo el operador lógico "o exclusivo" de precedencia media ^^. En aquel momento, no se observó que la variante de asignación ^^= también faltaba. Ahora se ha añadido.[/list]


Cambios incompatibles
  • Se eliminaron las referencias a funciones que contenían funciones sin evaluación
Perl 5.40 reintrodujo referencias incondicionales desde funciones a sus funciones contenedoras para corregir un error introducido en Perl 5.18 que rompía el comportamiento especial del eval EXPR en el paquete DB que usa el depurador.

En algunos casos, este cambio generó cadenas de referencia circulares entre cierres y otras referencias existentes, lo que provocó fugas de memoria.

Este cambio se ha revertido, solucionando [GH #22547] pero volviendo a romper [GH #19370].

Esto significa que los bucles de referencia no se producirán y que las variables léxicas y las funciones de las funciones adjuntas pueden no ser visibles en el depurador.

Tenga en cuenta que al llamar eval EXPR a una función de manera incondicional, esta hace referencia a las funciones que la encierran, como siempre lo ha hecho.[/list]
2  Programación / Scripting / Perl v5.40 en: 11 Junio 2024, 12:12 pm
Estos son los cambios que trae la versión v5.40.0, del 9 de junio de 2024.

Perl 5.40.0 representa aproximadamente 11 meses de desarrollo desde Perl 5.38.0 y contiene aproximadamente 160 000 líneas modificadas a lo largo de 1500 archivos por parte de 75 autores.

Las novedades que trae (entre otras):

Cambios principales
  • Nuevo identificador __CLASS__
    Ahora, cuando se usa la característica class, en el código de un método, bloque ADJUST o expresión de inicialización de un campo, se permite usar el nuevo identificador __CLASS__. Éste devuelve el nombre de una clase, de forma similar a __PACKAGE__, pero mientras que este último da el nombre del paquete del código en tiempo de compilación, el identificador __CLASS__ tiene en cuenta la clase a la que pertenece la instancia del objeto, en tiempo de ejecución. Esto es útil para el despachado de métodos de esa clase, especialmente en los constructores, donde no se permite el acceso a $self.

    Para más información, consultar "__CLASS__" en perlfunc.

  • Atributo :reader para las variables field
    Mientras se usa la característica class, las variables field pueden tener un atributo :reader. Esto solicita que se cree un método de acceso de forma automática que simplemente retorne el valor de la variable field, desde la instancia indicada.
Código
  1.    field $nombre :reader;
Es equivalente a
Código
  1.    field $nombre;
  2.    method nombre () { return $nombre; }
Se puede proporcionar un nombre alternativo:
Código
  1.    field $nombre :reader(obtener_nombre);
Para más detalles ver ":reader" en perlclass.

  • Se permite un espacio en la opción de línea de comandos -M
    Cuando se procesan las opciones en la línea de comandos, perl ahora permite un espacio entre la opción -M y el nombre del módulo que le sigue.
    Código
    1.    $ perl -M Data::Dumper=Dumper -E 'say Dumper [1,2,3]'
    Esto coincide con el comportamiento actual de la opción -I.

  • Restricciones en las declaraciones de use VERSIÓN
    En Perl v5.36 se añadió una advertencia de obsolescencia cuando se degrada una declaración use VERSIÓN desde una que esté por encima de la versión 5.11, hacia abajo. Ahora esto se ha convertido en un error fatal.

    Adicionalmente, ahora es un error fatal una posterior declaración use VERSIÓN cuando exista otra en el mismo ámbito, si es una versión 5.39 o superior. Esto es para evitar complicaciones a las funciones léxicas importadas desde builtin. También se añadió una advertencia de obsolescencia para cualquier otra declaración posterior de use VERSION que esté por debajo de la versión 5.39, para avisar que ya no se permitirá en la Perl versión 5.44.

  • Nuevas funciones experimentales builtin::inf y builtin::nan

    Se han añadido dos nuevas funciones, inf y nan, al espacio de nombres builtin. Actúan como constantes que devuelven los valores en punto flotante infinito y Not-a-Number (No es-un-Número), respectivamente.

  • Nuevo operador xor lógico ^^

    Perl siempre ha tenido tres operadores lógicos de baja precedencia: and, or y xor, así como tres versiones binarias de alta precedencia: &, | y ^. Hasta esta versión, mientras que también estaban presentes los operadores lógicos de media precedencia && y ||, no existía un equivalente a or-exclusivo. Esta versión de Perl añade el último operador ^^, completando el conjunto.

    Código
    1.    $x ^^ $y and say "Uno de x o y es verdadero, pero no ambos";

  • La característica try/catch ya no es experimental

    Antes de esta versión, la característica try/catch para el manejo de errores estaba considerada como experimental. Presentada en Perl versión 5.34.0, se considero que era una característica estable del lenguaje y su uso ya no imprimía una advertencia. Se debe seguir activando con la feature 'try'.

    Ver "Manejo de excepciones con Try y Catch" en perlsyn.

  • Iterar múltiples valores con for al mismo tiempo ya no es experimental

    Antes de esta versión, iterar sobre múltiples valores al mismo tiempo se consideró experimental. Presentada en Perl versión 5.36.0, ahora se considera una característica estable del lenguaje y su uso ya no imprime una advertencia. Ver "Sentencias compuestas" en perlsyn.

  • El módulo builtin ya no es experimental

    Antes de esta versión, el módulo builtin y todas sus funciones se consideraban experimentales. Presentadas en Perl versión 5.36.0, este módulo se considera ahora estable y su uso ya no imprime una advertencia. Sin embargo, muchas de sus funciones se siguen considerando experimentales.

  • La feature empaquetada :5.40 añade try

    La última versión de la feature empaquetada contiene ahora la reciente característica estable try. Ya que esta característica empaquetada se usa por la opción -E de línea de comandos, está disponible inmediatamente para los scripts -E.

  • use v5.40; importa las funciones builtin

    Además de la característica empaquetada de feature, use v5.40; (o siguientes versiones) importa la correspondiente versión de builtin empaquetada.
Cambios incompatibles
  • reset EXPRESIÓN ahora llama a set-magic en escalares
    Lo hacía con arrays y hashes, pero no con escalares.
  • Llamar a un método import de un paquete desconocido produce una advertencia
    Ahora, llamar a un código como este genera una advertencia:
    Código
    1.    Clase::Que::No::Existe->import("foo");
  • return ya no permite un objeto indirecto
    La sintasix del operador return ahora rechaza los objetos indirectos. En la mayor parte de los casos compilaría e incluso se ejecutaría, pero no estaba documentado y podía producir resultados confusos, por ejemplo:
    Código
    1.    # note que "sum" no está definido
    2.    sub sum_positive {
    3.        return sum grep $_ > 0, @_;
    4.        # interpretado inesperadamente como:
    5.        #   return *sum, grep $_ > 0, @_;
    6.        # ... con la palabra suelta actuando como un argumento extra de tipo typeglob
    7.    }
    8.    say for sum_positive(-1, 2, 3)
    producía:
    Código:
        *main::sum
        2
        3
  • Las clases literales ya no se resuelven como manejadores de archivo, en llamadas de método bajo no feature "bareword_filehandles"
    Había un error con la ejecución de no feature "bareword_filehandles". Se permitía hacer esto:
    Código
    1.    open FH, "<", $archivo or die;
    2.    no feature 'bareword_filehandles';
    3.    FH->binmode;
      Ahora,
    FH->binmode intentará resolver FH como una clase, resultando típicamente en un error en tiempo de ejecución.
Obsolescencias
  • Usar goto para saltar desde un ámbito externo a un ámbito interno es obsoleto y se eliminará completamente en Perl v5.42
Nuevas plataformas
  • Serenity OS
3  Programación / Scripting / Última versión de Rakudo del 2023 en: 2 Enero 2024, 23:48 pm
Salió la última versión de la distribución Rakudo (Raku+módulos) del 2023:

Esta publicación tiene 46 productos:

    rakudo-pkg-Alpine3.16_2023.12-01_x86_64.apk
    rakudo-pkg-Alpine3.16_2023.12-01_x86_64.apk.sha512
    rakudo-pkg-Alpine3.17_2023.12-01_x86_64.apk
    rakudo-pkg-Alpine3.17_2023.12-01_x86_64.apk.sha512
    rakudo-pkg-Alpine3.18_2023.12-01_x86_64.apk
    rakudo-pkg-Alpine3.18_2023.12-01_x86_64.apk.sha512
    rakudo-pkg-Alpineedge_2023.12-01_x86_64.apk
    rakudo-pkg-Alpineedge_2023.12-01_x86_64.apk.sha512
    rakudo-pkg-Debian11_2023.12-01_amd64.deb
    rakudo-pkg-Debian11_2023.12-01_amd64.deb.sha512
    rakudo-pkg-Debian12_2023.12-01_amd64.deb
    rakudo-pkg-Debian12_2023.12-01_amd64.deb.sha512
    rakudo-pkg-Debiantesting_2023.12-01_amd64.deb
    rakudo-pkg-Debiantesting_2023.12-01_amd64.deb.sha512
    rakudo-pkg-EL7-2023.12-01.x86_64.rpm
    rakudo-pkg-EL7-2023.12-01.x86_64.rpm.sha512
    rakudo-pkg-EL8-2023.12-01.x86_64.rpm
    rakudo-pkg-EL8-2023.12-01.x86_64.rpm.sha512
    rakudo-pkg-EL9-2023.12-01.x86_64.rpm
    rakudo-pkg-EL9-2023.12-01.x86_64.rpm.sha512
    rakudo-pkg-Fedora37-2023.12-01.x86_64.rpm
    rakudo-pkg-Fedora37-2023.12-01.x86_64.rpm.sha512
    rakudo-pkg-Fedora38-2023.12-01.x86_64.rpm
    rakudo-pkg-Fedora38-2023.12-01.x86_64.rpm.sha512
    rakudo-pkg-Fedora39-2023.12-01.x86_64.rpm
    rakudo-pkg-Fedora39-2023.12-01.x86_64.rpm.sha512
    rakudo-pkg-linux-relocable-2023.12-01_amd64.tar.gz
    rakudo-pkg-linux-relocable-2023.12-01_amd64.tar.gz.sha512
    rakudo-pkg-openSUSE15.4-2023.12-01.x86_64.rpm
    rakudo-pkg-openSUSE15.4-2023.12-01.x86_64.rpm.sha512
    rakudo-pkg-openSUSE15.5-2023.12-01.x86_64.rpm
    rakudo-pkg-openSUSE15.5-2023.12-01.x86_64.rpm.sha512
    rakudo-pkg-openSUSEtumbleweed-2023.12-01.x86_64.rpm
    rakudo-pkg-openSUSEtumbleweed-2023.12-01.x86_64.rpm.sha512
    rakudo-pkg-Ubuntu20.04_2023.12-01_amd64.deb
    rakudo-pkg-Ubuntu20.04_2023.12-01_amd64.deb.sha512
    rakudo-pkg-Ubuntu22.04_2023.12-01_amd64.deb
    rakudo-pkg-Ubuntu22.04_2023.12-01_amd64.deb.sha512
    rakudo-pkg-Ubuntu23.04_2023.12-01_amd64.deb
    rakudo-pkg-Ubuntu23.04_2023.12-01_amd64.deb.sha512
    rakudo-pkg-Ubuntu23.10_2023.12-01_amd64.deb
    rakudo-pkg-Ubuntu23.10_2023.12-01_amd64.deb.sha512
    rakudo-pkg-Ubuntudevel_2023.12-01_amd64.deb
    rakudo-pkg-Ubuntudevel_2023.12-01_amd64.deb.sha512
    Source code (zip)
    Source code (tar.gz)
4  Programación / Scripting / Re: Perl en 2023 en: 15 Diciembre 2023, 02:41 am
¿Qué opinan de usar Perl como lenguaje de scripting en la actualidad?
Yo lo sigo utilizando todos los días, para administración de sistemas, pero poco a poco nos vamos pasando a Raku (anterior Perl 6), ya que se puede hacer lo mismo pero con aún menos líneas.

Si te interesa, hay un grupo en Telegram con la comunidad de habla en español.
5  Programación / Programación C/C++ / Re: De Perl a C en: 31 Agosto 2023, 14:55 pm
En esta línea:

Código
  1. sprintf(strPush, "\"\\x68%s\" //PUSH 0x%s%s%s%s\n", strHex, &strHex[8], &strHex[6], &strHex[4], &strHex[2]);

estás pasando la dirección de inicio de strHex, strHex[8], strHex[6]... como cadenas de caracteres (%s), pero no estás indicando cuántos caracteres de largo tienen esas cadenas de caracteres.

Quizás debería ser

Código
  1. sprintf(strPush, "\"\\x68%s\" //PUSH 0x%2s%2s%2s%2s\n", ...

En el código Perl aparecen recortados a 2 caracteres:
Código
  1. substr($strPush,6,2)
6  Programación / Scripting / Perl v5.38 en: 4 Agosto 2023, 03:47 am
Estos son los cambios que trae la versión v5.38, del 2 de julio de 2023.

Perl 5.38.0 representa aproximadamente 12 meses de desarrollo desde Perl 5.36.0 y contiene aproximadamente 290 000 líneas modificadas a lo largo de 1500 archivos por parte de 100 autores.

Las novedades que trae (entre otras):

Cambios principales

  • class
    Ahora está disponible una nueva sintaxis experimental para definir clases de objetos, donde los datos de cada instancia se almacenan en variables "field" (campo) que se comportan como variables léxicas.
Código
  1. use feature 'class';
  2.  
  3. class Punto
  4. {
  5.    field $x;
  6.    field $y;
  7.  
  8.    method cero { $x = $y = 0; }
  9. }
Se describe con más detalle en perlclass. Las notas sobre detalles internos de su implementación y otros detalles relacionados se pueden encontrar en perlclassguts.

Se queda como característica nueva y experimental, y sigue estando en desarrollo. Será sujeto de más adiciones, refinamientos y alteraciones en versiones futuras. Como es experimental, lanza advertencias en la categoría experimental::class. Se pueden silencias con una sentencia no warnings:
Código
  1. use feature 'class';
  2. no warnings 'experimental::class';

  • Unicode 15.0
  • Las advertencias de obsolescencia tienen ahora subcategorías específicas

Todas las advertencias de obsolescencia tienen ahora su propia categoría de obsolescencia que se puede desactivar individualmente. Puede ver una lista de las características obsoletas en perldeprecation, y en warnings. La siguiente lista es de warnings:
+- deprecated ----+
|                 |
|                 +- deprecated::apostrophe_as_package_separator
|                 |
|                 +- deprecated::delimiter_will_be_paired
|                 |
|                 +- deprecated::dot_in_inc
|                 |
|                 +- deprecated::goto_construct
|                 |
|                 +- deprecated::smartmatch
|                 |
|                 +- deprecated::unicode_property_name
|                 |
|                 +- deprecated::version_downgrade

Sigue siendo posible desactivar todas las advertencias de obsolescencia con una única sentencia
Código
  1. no warnings 'deprecated';
pero ahora es posible tener un control más fino. Como ha sido siempre, estas advertencias se activan automáticamente con
Código
  1. use warnings;

  • Nueva API %{^HOOK}

Por distintas razonas puede ser dificultoso crear envoltorios de subrutinas para algunos palabra clave de perl. Cualquier palabra clave que tenga un prototipo indefinido, simplemente no se puede envolver con una subrutina, y algunas palabras clave que permiten ese envoltorio, lo hacen mediante trucos muy sucios. Por ejemplo, require es complicado de envolver; es posible hacerlo cambiando la profundidad de la pila, y los métodos estándares de exportación asumen que exportarán a un paquete a una cierta profundidad de la pila, y entonces el envoltorio cambiará esas funciones pero con una implementación muy cuidada. Esto puede ser muy complicado de gestionar.

De acuerdo con todo esto, presentamos un nuevo hash llamado %{^HOOK} cuya intención es facilitar tales casos. Cuando una palabra clave soporte cualquier enganche especial entonces el gancho vivirá en este nuevo hash. Los ganchos se nombrarán como la función desde donde se les llama, seguidos por dos guiones bajos y luego por la fase en donde se ejecutan, actualmente puede ser antes o después de ejecutarse la palabra clave.

En esta publicación inicial soportamos los ganchos require__before y require__after. Se proporcionan para hacer más fácil la realización de tareas antes y después de una sentencia require.

Vea perlvar para más detalles.

  • PERL_RAND_SEED

Se añadió una nueva variable de entorno: PERL_RAND_SEED, que se puede usar para que un programa perl sea repetible, tanto si usa rand sin srand() explícitamente o use srand() sin argumentos. Vea perlrun. Esta característica se puede desactivar en tiempo de compilación pasando -Accflags=-DNO_PERL_RAND_SEED a Configure.

  • Expresiones de asignación por defecto con defined-or y logical-or en firmas de subrutinas

Se puede asignar ahora la expresión por defecto para el parámetro de una firma de subrutina utilizando los operadores //= y ||=, para aplicar valores por defecto tanto si el llamador proporciona un valor indefinido o falso (respectivamente), en los casos cuando el parámetro no se indica. Para más detalles vea la documentación en perlsub.

  • @INC Hook Enhancements and $INC and INCDIR

Las internas de los ganchos @INC se han reforzado para manejar varios casos límite y no deberían provocar fallos de segmentación o fallos de aserción cuando los ganchos modifican @INC durante una operación require. Ahora aseguramos que cualquier gancho proporcionado se ejecuta al menos una vez durante una llamada a require, y que cualquier directorio duplicado no dispara pruebas de directorio adicionales.

Ahora se da soporte a un nuevo método de enganche llamado INCDIR para proporcionar a los desarrolladores más control sobre la búsqueda de módulos dinámicos. Se puede inyectar un objeto que admita este método en la matriz @INC, y cuando se encuentra en el proceso de búsqueda del módulo, se ejecutará, al igual que se ejecutan los ganchos de INC, y su valor de retorno se usa como una lista de directorios para buscar ese módulo. Devolver una lista vacía actúa como un NO-OP. Tenga en cuenta que dado que cualquier referencia devuelta por este gancho se convertirá y se usará como cadena de caracteres, no puede devolver un gancho para ejecutarse más adelante a través de esta API.

Cuando se llama a un gancho @INC (ya sea INC o INCDIR) durante el require, la variable $INC se localizará para ser el valor del índice de @INC del que proviene el gancho. Si el gancho desea anular cuál debería ser el "próximo" índice en @INC, puede actualizar $INC para ser uno menos que el índice deseado (undef es equivalente a -1). Esto permite que un gancho @INC reescribe por completo la matriz @INC y haga que Perl reinicie sus sondas de directorio desde el comienzo de @INC.

Las referencias de CODE bendecidas en @INC que no admiten los métodos INC o INCDIR ya no dispararán una excepción, y en su lugar se tratarán de la misma manera que coderefs sin bendecir, y se ejecutarán como si fueran un gancho de INC.

  • Ahora se detecta en tiempo de compilación el uso de control de flujo prohibido fuera de defer o finally

    Está prohibido intentar dejar un bloque defer o finally por medio de un control de flujo tales como return o goto. Versiones anteriores de perl sólo podría detectarlo cuando se intenta ejecutar en tiempo de ejecución.

    Esta versión de perl añade detección en tiempo de compilación para muchos casos que se pueden determinar estáticamente. Esto puede significar que el código que se puede compilar exitosamente en una versión anterior de perl ahora se reporta como un error en tiemp de compilación. Esto sólo sucede en los casos donde ocurriría un error al ejecutar código de todas maneras; ahora el error sucede antes.

  • Evaluación optimista en patrones

El uso de (?{ ... }) y (??{ ... }) en un patrón desactiva varias optimizaciones en ese patrón, de forma global. Esto puede ser deseable o no por el programador. Esta publicación añade el equivalente (*{ ... }). La única diferencia es que no desactiva ni desactivará ninguna optimización en el motor regex. Esto puede hacerlo más inestable en el sentido de que puede llamarse más o menos veces en el futuro, sin embargo el número de veces que se ejecuta coincidirá exactamente con el funcinamiento del motor regex. Por ejemplo, ciertos tipos de optimización se desactivan cuando se incluye (?{ ... }) en un patrón, así que los patrones que son O(N) en un uso normal se convierten en O(N*N). Cambiar a (*{ ... }) significa que el patrón se mantendrá en O(N).

  • REG_INF se ha elevado desde 65 536 a 2 147 483 647

Muchos cuantificadores regex que estaban limitados en el pasado a U16_MAX, ahora están limitados a I32_MAX, así que ahora es posible escribir por ejemplo /(?:word){1000000}/. Note que hacerlo así puede provocar que el motor de regex se ejecute durante más tiempo y usar más memoria.

  • Ahora se permite algunos goto en bloques defer y finally

    Perl versión 5.36.0 añadió bloques defer y permitió que la palabra clave finally añade un comportamiento similar para la sintaxis try/catch. Estos no permiten ninguna expresión goto dentro del cuerpo, ya que podría provocar un salto del control de flujo fuera del bloque. Ahora, se permiten a algunas expresiones goto, si se trata de un destino con una etiqueta constante, y que la etiqueta se encuentre dentro del bloque.
    Código
    1. use feature 'defer';
    2.  
    3. defer {
    4.    goto LABEL;
    5.    print "This does not execute\n";
    6.    LABEL: print "This does\n";
    7. }

  • Nueva variable de expresiones regulares ${^LAST_SUCCESSFUL_PATTERN}
Permite acceder al último patrón que coincidió de forma exitosa, en el ámbito actual. Muchos aspectos del motor de regex se refieren al "último patrón exitoso". El patrón vacío lo rechaza, y todas las variables regex mágicas se relacionan con él. Esto permite acceder a ese patrón. El código siguiente
Código
  1. if (m/foo/ || m/bar/) {
  2.    s//PQR/;
  3. }
se puede reescribir como
Código
  1. if (m/foo/ || m/bar/) {
  2.    s/${^LAST_SUCCESSFUL_PATTERN}/PQR/;
  3. }
    haciendo lo mismo.


Cambios incompatibles

  • readline() ya no limpia los indicadores de error y eof
  • los bloques INIT ya no se ejecutan después de un exit() en un BEGIN
Obsolescencias

  • El uso de ' como separador de los nombres del paquete

  • switch y el operador Smart Match (coincidencia inteligente)

La característica "switch" y el operador smartmatch ~~, se presentaron en v5.10. Su comportamiento se cambió significativamente en v5.10.1. Cuando el sistema "experiment" se añadió en v5.18.0, switch y smartmatch se declararon experimentales, de forma retroactiva. Durante estos años, se han propuesto y desechado propuestas para arreglarlos o suplementarlos.

En v5.38.0, declaramos el experimento como un fallo. Algunos otros sistemas futuros pueden tomar el lugar conceptual de smartmatch, pero no se han diseñado ni construido, todavía.

Estas características se eliminarán completamente en Perl v5.42.0.[/list]


Plataformas obsoletas
  • Ultrix
7  Programación / Scripting / Re: Primeros pasos con programación orientada a objetos(POO) en: 29 Diciembre 2022, 04:00 am
Por fortuna, la programación orientada a objetos tiene cada vez más opiniones en contra... y desde hace años.

https://medium.com/@konradmusial/why-oop-is-bad-and-possibly-disastrous-e0844fa96c1f
8  Programación / Scripting / Perl v5.36, liberado en: 30 Mayo 2022, 14:13 pm
Ya tenemos nueva versión de Perl, la v5.36.

Perl 5.36.0 representa aproximadamente un año de desarrollo desde Perl 5.34.0 y contiene aproximadamente 250 000 líneas modificadas a lo largo de 200 archivos por parte de 82 autores.

Excluyendo los archivos autogenerados, documentación y herramientas de publicación, fueron aproximadamente 190 000 líneas modificadas en 1300 archivos .pm, .t, .c y .h.

Las novedades que trae (entre otras):

Cambios principales
  • signatures deja de ser experimental (desde v5.20) y se activa por defecto
Código
  1. use v5.36;
  2. sub add($x, $y) {
  3.    return $x + $y;
  4. }
Pero algunos elementos de las firmas de subrutina aún quedan como experimentales.
  • isa considerado característica estable (desde v5.32), por lo que se activa por defecto. Consultar perlop.
  • se desactivan las características indirect y multidimensional.
    Ya no se puede escribir $x = new Class; ni $x = $hash{3,5,42};
    Consultar feature.
  • la característica experimental switch (desde v5.10) se ha quitado de use v5.36. Se puede seguir usando (no recomendado), pero hay que activarla explícitamente.
  • nueva opción en línea de comandos, -g, es un alias de -0777. Consultar perlrun.
  • soporte para Unicode 14.0.
  • los "conjuntos regex" ya no se consideran experimentales (desde v5.18). Ejemplo: /(?[ ( \p{Thai} + \p{Lao} ) & \p{Digit} ])/
    Esta expresión casa con dígitos que son tanto Thai como Laosianos. Consultar perlrecharclass.
  • los vistazos hacia atrás de longitud variable en patrones de exp. reg. ya no se consideran experimentales. Ahora, en "aaz"=~/(?=z)(?<=(a|aa))/, $1 contendrá "aa" (la coincidencia de mayor longitud).
  • seguimiento estable de los valores booleanos. Ahora, los valores booleanos resultado de expresiones como !!0 y !!1 así como los de los resultados de funciones y operadores incorporados, mantienen su naturaleza como valor booleano. Hay una nueva función, is_bool() que puede servir para comprobar si un valor es booleano.
  • (experimental) iterar sobre múltiples valores al mismo tiempo:
Código
  1. for my ($key, $value) (%hash) { ... }
  2. for my ($left, $right, $gripping) (@moties) { ... }
Consultar perlsyn.
  • (experimental) nuevo módulo builtin.
    Ofrece información y acceso a nuevas funciones o a las nuevas funciones incorporadas experimentales. Las de v5.36 son:
    • builtin::trim Elimina los espacios en blanco que haya al principio y final de la cadena de texto
      · builtin::indexed Devuelve una lista el doble de grande que la lista argumento, con cada elemento precedido por el índice de ese elemento. Esto es útil para recorrer arrays.
    Código
    1. use builtin 'indexed';
    2. foreach my ($index, $val) (indexed @array) {
    • builtin:true, builtin::false, builtin::is_bool Valores de verdad y función para comprobar si un valor es booleano.
    • builtin::weaken, builtin::unweaken, builtin::is_weak Cambio en el tratamiento de referencias a una variable, para ser eliminada o no por el recolector de basura.
    • builtin::blessed, builtin::refaddr, builtin::reftype Más información sobre referencias (incluso si no lo son).
    • builtin::ceil, builtin::floor Redondeo al entero igual o inferior, o al igual o superior del valor dado.
  • (experimental) bloques defer. Definen secciones de código que se ejecutarán durante la salida del ámbito en que se encuentren esos bloques.
    Código
    1. use feature 'defer';
    2. {
    3.    say "This happens first";
    4.    defer {
    5.       say "This happens last";
    6.    }
    7.    say "And this happens inbetween";
    8. }
  • (experimental) try/catch ahora tiene un bloque finally. Proporciona código que se ejecutará al final de la construcción.
  • (experimental) delimitadores no ASCII para entrecomillar. Ahora se podrá escribir $text = qw« hola adios »;
  • (experimental) @_ experimental en firmas de subrutinas. Ejemplo:
    Código
    1. use v5.36;
    2. sub f ($x, $y = 123) {
    3.  say "The first argument is $_[0]";
    4. }
    provocará una advertencia.
Cambios incompatibles
  • un sort vacío (sin argumentos), ahora es un fallo en tiempo de compilación.
    @a = sort;
Obsolescencias
  • use VERSION (con VERSION inferior a 5.11) después de un use v5.11 (rebajar de versión), ahora es obsoleto. Ejemplo:
    Código
    1. use v5.14;
    2. say "say está permitido";
    3. use v5.8;   # genera una advertencia
    4. print "Debemos usar print\n";

      Plataformas obsoletas
      • AT&T UWIN
      • DOS/DJGPP
      • NetWare
    9  Programación / Scripting / Rakudo: última versión estable de este año en: 25 Diciembre 2021, 01:48 am
    Última versión estable del año, la versión 2021.12, del compilador Rakudo, la principal implementación del lenguaje Raku, con un montón de cambios.

    https://raku.org/

    · Descargar
    · Imágenes docker

    10  Programación / Scripting / Re: IA en Batch en: 4 Julio 2021, 00:29 am
    Estoy de acuerdo con @engel lex: hoy se abusa del término IA para referirse a cualquier mecánica que sea capaz de mover un NPC (No Player Character -jugador no humano-).

    El concepto de IA ha cambiado en las últimas décadas, pero hoy en día, aplicado a los vídeo juegos podríamos resumirlo en lo siguiente:

    1- Un NPC debe tener "conocimiento" del "entorno" en donde se mueve o vive. Ese "conocimiento" puede ser, por ejemplo, sus coordenadas espaciales dentro del "entorno", así como las coordenadas espaciales del jugador humano o de sus compañeros NPC. El "entorno" es el medio ambiente donde se desarrolla el juego. El NPC puede tener un conocimiento limitado (restringido en el espacio o en el tiempo, por ejemplo, no ver al jugador hasta que esté muy cerca).

    2- Una IA debe mantener un conjunto de "estados" internos, y estar en uno de ellos. Podría estar a la "espera", acechando, a que se cumplan ciertas condiciones, o podría estar a la "caza" del jugador. Podría "atacar" o "huir".

    3- La IA cambia de "estado" en función de: a) el estado anterior y b) el "conocimiento" del "entorno". Un NPC puede pasar del modo de "espera" a "ataque" si a) está en modo de "espera" y b) la distancia al jugador se reduce a un cierto límite.

    4- En función del "estado" en que se encuentra el NPC, ésta modifica el "entorno". Por ejemplo, si está en modo "ataque", modificar el entorno puede ser moverse hacia el jugador, cambiando sus coordenadas.

    Este tipo de "retroalimentación" entre el "entorno" y el NPC, y el cambio de "estado" del propio NPC es la que permite que podamos llamar al sistema una "IA mínima" para vídeo juegos.

    Las otras técnicas modernas de IA, como las redes neuronales, aprendizaje automático, etc., se podrían también meter, en la parte de "cambio de estado", es decir, ayudan al NPC a decidir su nuevo estado.

    Un ejemplo de aprendizaje automático es la del Q-learning, para encontrar el camino de menor coste (o camino más corto) para salir de un laberinto, edificio o ir hacia el enemigo.

    El lenguaje que utilices no importa, salvo que algunos lenguajes facilitan mucho más la gestión de estructuras de datos de varias dimensiones.
    Páginas: [1] 2 3 4 5 6 7 8 9 10 11
    WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines