La función de abs() en Perl

En el lenguaje de programación Perl tiene integrada la función de abs(). Esta función devuelve el módulo de su argumento.

He aquí un ejemplo:

▶ Run
#!/usr/bin/perl

print abs( -3.14159265358979 );

Este programa mostrará 3.14159265358979.

Los argumentos

my $abs_value = abs($value);

Si la función de abs() enviar un argumento, entonces la función será trabajar con él.

Si no pasa ningún argumento, entonces la función será trabajar con дефолтной variable $_. He aquí un ejemplo (el programa mostrará el número de 8):

▶ Run
#!/usr/bin/perl

$_ = -8;

print abs();

Si la función de abs() enviar más de un argumento, lo que se producirá un error:

Too many arguments for abs at script.pl line 3, near "2)"
Execution of script.pl aborted due to compilation errors.

En el caso de que en la función de transmitir la cadena, se convierte a número. Para más detalles de cómo Perl convierte una cadena en un número.

He aquí un ejemplo de código en el que la función abs() funciona con cadenas:

▶ Run
#!/usr/bin/perl

use strict;
use warnings;
use feature qw(say);

say abs('Hello');
say abs('-100asdf');
say abs(' -123JK');

Este programa mostrará en pantalla:

0
100
123
Argument "Hello" isn't numeric in abs at script.pl line 7.
Argument "-100asdf" isn't numeric in abs at script.pl line 8.
Argument " -123JK" isn't numeric in abs at script.pl line 9.

En caso de que como argumento de utilizar undef, la función devuelve el número de 0, pero si en el código hay use warnings;, se muestra un mensaje de advertencia Use of uninitialized value in abs at script.pl line 6..

El valor devuelto

La función de abs() siempre devuelve un número.

La documentación oficial

He aquí el resultado del comando perldoc -f abs:

    abs VALUE
    abs     Returns the absolute value of its argument. If VALUE is omitted,
            uses $_.

Temas relacionados

Otros articulos