perl | función getc

La función getc() en Perl se usa para leer el siguiente carácter del archivo cuyo identificador de archivo se le pasa como argumento. Si no se pasa FileHandle, toma un carácter como entrada del usuario.

Sintaxis: getc(FileHandle)

Parámetro:
FileHandle: del archivo a leer

Devuelve: el carácter leído del archivo o undef al final del archivo

Ejemplo 1:

#!/usr/bin/perl 
    
# Opening a File in Read-only mode 
open(fh, "<", "File_to_be_read.txt"); 
    
# Reading next character from the file
$ch = getc(fh)
  
# Printing the read character
print"Character read from the file is $ch";
  
# Closing the File 
close(fh); 

Producción:

Ejemplo 2:

#!/usr/bin/perl 
  
# Value to be entered by the user
$ch = getc(STDIN);
  
# Printing the entered value
print"Value entered: $ch";

Producción:

Publicación traducida automáticamente

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

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *