- Perl Basics
- Perl - Home
- Perl - Introduction
- Perl - Environment
- Perl - Syntax Overview
- Perl - Data Types
- Perl - Variables
- Perl - Scalars
- Perl - Arrays
- Perl - Hashes
- Perl - IF...ELSE
- Perl - Loops
- Perl - Operators
- Perl - Date & Time
- Perl - Subroutines
- Perl - References
- Perl - Formats
- Perl - File I/O
- Perl - Directories
- Perl - Error Handling
- Perl - Special Variables
- Perl - Coding Standard
- Perl - Regular Expressions
- Perl - Sending Email
- Perl Advanced
- Perl - Socket Programming
- Perl - Object Oriented
- Perl - Database Access
- Perl - CGI Programming
- Perl - Packages & Modules
- Perl - Process Management
- Perl - Embedded Documentation
- Perl - Functions References
- Perl Useful Resources
- Perl - Questions and Answers
- Perl - Quick Guide
- Perl - Useful Resources
- Perl - Discussion
Perl chomp Function
Description
This safer version of chop removes any trailing string that corresponds to the current value of $/ (also known as $INPUT_RECORD_SEPARATOR in the English module). It returns the total number of characters removed from all its arguments. By default $/ is set to new line character.
Syntax
Following is the simple syntax for this function −
chomp VARIABLE chomp( LIST ) chomp
Return Value
This function returns Integer, number of bytes removed for all strings.
Example
Following is the example code showing its basic usage −
#!/usr/bin/perl $string1 = "This is test"; $retval = chomp( $string1 ); print " Choped String is : $string1\n"; print " Number of characters removed : $retval\n"; $string1 = "This is test\n"; $retval = chomp( $string1 ); print " Choped String is : $string1\n"; print " Number of characters removed : $retval\n";
When above code is executed, it produces the following result −
Choped String is : This is test Number of characters removed : 0 Choped String is : This is test Number of characters removed : 1
perl_function_references.htm
Advertisements
To Continue Learning Please Login
Login with Google