perl | Creación de archivos de Excel

Los archivos de Excel son la aplicación de oficina más utilizada para comunicarse entre computadoras. Se utiliza para crear filas y columnas de texto, números y fórmulas para los cálculos. Es una buena manera de enviar informes. Esta demostración también funciona en Linux, Windows y otras plataformas. En Excel, las filas están numeradas del 1 al n… y las columnas están marcadas con letras A, B, C, etc., por lo tanto, A1 se refiere a la esquina superior izquierda. Para crear archivos de Excel con Perl, puede usar padre IDE, también usaremos el módulo Excel::Writer::XLSX.
Perl usa la función write() para agregar contenido al archivo de Excel.

Sintaxis: write(cell_address, content)

Parámetros:
cell_address: Dirección de la celda donde se agregará el contenido.
contenido: que se agregará a la hoja de trabajo.

 
Los archivos de Excel se pueden crear usando la línea de comandos de Perl, pero primero debemos cargar el módulo Excel::Writer::XLSX.

#!/usr/bin/perl 
use Excel::Writer::XLSX;
  
my $Excelbook = Excel::Writer::XLSX->new( 'GFG_Sample.xlsx' );
my $Excelsheet = $Excelbook->add_worksheet();
  
$Excelsheet->write( "A1", "Hello!" );
$Excelsheet->write( "A2", "GeeksForGeeks" );
$Excelsheet->write( "B1", "Next_Column" );
  
$Excelbook->close;

Producción:

Así es como funciona el Programa:
Paso 1: Cargue el módulo Excel::Writer::XLSX.
Paso 2: Cree un objeto $Excelbook que represente todo el archivo de Excel.
Paso 3: Llame al método write() para agregar datos a la hoja de trabajo.
Paso 4: Ahora, guarde el archivo con la extensión .pl .
Paso 5: Ejecute su archivo .pl en la línea de comando y se creará una hoja de Excel.
 

 
Excel proporciona el uso de varias fórmulas matemáticas para facilitar los cálculos en las hojas de Excel, como el balance general, los registros comerciales, etc.
Aquí está la descripción de dos fórmulas básicas de Excel:

• Suma:
  Excel proporciona un método ‘SUMA’ para la suma de valores en celdas específicas.
  

  Sintaxis: =SUMA(Inicio, Fin)

  Parámetro:
  Inicio: Dirección de la celda inicial
  Fin: Dirección de la celda final

  Devuelve: la suma de valores entre la celda inicial y final.

  #!/usr/bin/perl  use Excel::Writer::XLSX;    my $Excelbook = Excel::Writer::XLSX->new( 'GFG_Sample.xlsx' ); my $Excelsheet = $Excelbook->add_worksheet();    # Writing values at A1 and A2 $Excelsheet->write( "A1", 55 ); $Excelsheet->write( "A2", 47 );    # Adding without use of SUM method $Excelsheet->write( "A3", "= A1 + A2" );    # Addition of a Range of cells $Excelsheet->write( "A4", " =SUM(A1:A3)" );

  Producción:
  

• Contar:
  esta función en Excel se usa para contar todas las celdas en el rango dado que contienen solo valores numéricos.
  

  Sintaxis: =CONTAR(Inicio, Fin)
  Devuelve: recuento de todas las celdas que contienen valor numérico

  #!/usr/bin/perl  use Excel::Writer::XLSX;    my $Excelbook = Excel::Writer::XLSX->new( 'GFG_Sample.xlsx' ); my $Excelsheet = $Excelbook->add_worksheet();    # Writing values $Excelsheet->write( "A1", 5 ); $Excelsheet->write( "A2", 40 ); $Excelsheet->write( "A3", "Hello" ); $Excelsheet->write( "A4", 10 );    # Addition of a Range of cells $Excelsheet->write( "A5", "Count ="); $Excelsheet->write( "B5", "=COUNT(A1:A4)" );

  Producción:
  

 
Los colores se pueden usar en ExcelSheets para marcar valores específicos por separado. Estos colores se especifican con el uso del método add_format().

Sintaxis: add_format(color=> ‘color_name’)

#!/usr/bin/perl
use Excel::Writer::XLSX;
  
my $Excelbook = Excel::Writer::XLSX->new( 'GFG_Sample.xlsx' );
my $Excelsheet = $Excelbook->add_worksheet();
  
# Setting value of color
my $color1 = $Excelbook->add_format(color=> 'blue',);
my $color2 = $Excelbook->add_format(color=> 'red',);
my $color3 = $Excelbook->add_format(color=> 'green',);
  
$Excelsheet->write( "A2", "Geeks", $color1 );
$Excelsheet->write( "B2", "For", $color2 );
$Excelsheet->write( "C2", "Geeks", $color3 );
$Excelbook->close;

Producción:

 
Los valores se pueden agregar en coordenadas específicas al proporcionar la dirección de las celdas en las que se agregará el valor.

Sintaxis: write(R,C, “valor”)
Parámetros:
R y C son las coordenadas de Fila y Columna respectivamente.

#!/usr/bin/perl 
use Excel::Writer::XLSX;
  
my $Excelbook = Excel::Writer::XLSX->new( 'GFG_Sample.xlsx' );
my $Excelsheet = $Excelbook->add_worksheet();
  
$Excelsheet->write( 0, 0, "Hello!" );
$Excelsheet->write( 1, 0, "GeeksForGeeks" );
$Excelsheet->write( 3, 2, "Welcome!!!" );
  
$Excelbook->close;

Producción: