Perl | getc Function

Last Updated : 11 Jul, 2025
getc() function in Perl is used to read the next character from the file whose File Handle is passed to it as argument. If no FileHandle is passed then it takes one character as input from the user.
Syntax: getc(FileHandle) Parameter: FileHandle: of the file to be read Returns: the character read from the file or undef on end of file
Example 1: Perl 
#!/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);
Output: Example 2: Perl 
#!/usr/bin/perl 

# Value to be entered by the user
$ch = getc(STDIN);

# Printing the entered value
print"Value entered: $ch";
Output:
Comment

Explore