perl | Módulos – Barcelona Geeks

Un módulo en Perl es una colección de subrutinas y variables relacionadas que realizan un conjunto de tareas de programación. Los módulos Perl son reutilizables. Hay varios módulos de Perl disponibles en la red integral de archivos de Perl (CPAN). Estos módulos cubren una amplia gama de categorías, como red, CGI, procesamiento XML, interfaz de bases de datos, etc.

Creación de un módulo Perl

El nombre de un módulo debe ser el mismo que el nombre del paquete y debe terminar con la extensión .pm.

Ejemplo: Calculadora.pm

package Calculator;
  
# Defining sub-routine for Multiplication
sub multiplication
{
    # Initializing Variables a & b
    $a = $_[0];
    $b = $_[1];
      
    # Performing the operation
    $a = $a * $b;
      
    # Function to print the Sum
    print "\n***Multiplication is $a";
}
  
# Defining sub-routine for Division
sub division
{
    # Initializing Variables a & b
    $a = $_[0];
    $b = $_[1];
      
    # Performing the operation
    $a = $a / $b;
      
    # Function to print the answer
    print "\n***Division is $a";
}
1;

Aquí, el nombre del archivo es «Calculator.pm» almacenado en el directorio Calculator. Note que 1; se escribe al final del código para devolver un valor verdadero al intérprete. Perl acepta cualquier cosa que sea verdadera en lugar de 1

Importación y uso de un módulo Perl
Para importar este módulo de calculadora, usamos las funciones require o use. Para acceder a una función o una variable desde un módulo, se utiliza ::. Aquí hay un ejemplo que demuestra lo mismo:

Ejemplos: Test.pl

#!/usr/bin/perl
  
# Using the Package 'Calculator'
use Calculator;
  
print "Enter two numbers to multiply";
  
# Defining values to the variables
$a = 5;
$b = 10;
  
# Subroutine call
Calculator::multiplication($a, $b);
  
print "\nEnter two numbers to divide";
  
# Defining values to the variables
$a = 45;
$b = 5;
  
# Subroutine call
Calculator::division($a, $b);

Producción:

Uso de variables de módulos

Las variables de diferentes paquetes se pueden usar declarándolas antes de usarlas. El siguiente ejemplo demuestra esto
Ejemplos: Message.pm

#!/usr/bin/perl
  
package Message;
  
# Variable Creation
$username;
  
# Defining subroutine
sub Hello
{
  print "Hello $username\n";
}
1;

El archivo Perl para acceder al módulo es el siguiente
Ejemplos: variable.pl

#!/usr/bin/perl
  
# Using Message.pm package
use Message;
  
# Defining value to variable
$Message::username = "Geeks";
  
# Subroutine call
Message::Hello();

Producción:

Uso de módulos predefinidos
Perl proporciona varios módulos predefinidos que se pueden usar en los programas Perl en cualquier momento.
Tales como: ‘estricto’, ‘advertencias’, etc.

Ejemplo:

#!/usr/bin/perl
  
use strict;
use warnings;
  
print" Hello This program uses Pre-defined Modules";

Producción:

Hello This program uses Pre-defined Modules

Publicación traducida automáticamente

Artículo escrito por Akanksha_Rai y traducido por Barcelona Geeks. The original can be accessed here. Licence: CCBY-SA

Deja una respuesta Cancelar la respuesta