Chomp the pre-set character : chop chomp « String « Perl






  1. Perl
  2. String
  3. chop chomp

Chomp the pre-set character

   

#!/usr/bin/perl

my $string1 = "This is a string";
print "\$string1 is \"$string1\"";
print "\n\nChanging \$/ to \"g\" \n\n";

$/ = "g";

# Removing last character if it is equal to "g"
chomp ( $string1 );
print "The new \$string1 is \"$string1\"\n";








Related examples in the same category

1.Difference between chomp and chop
2.Type four characters with chomp
3.Type four characters without chomp
4.chomp in a while statement
5.chomp matches the input line separator defined by the $/ system variable.
6.chop function deletes the character at the right end of the line of text
7.The chomp function is a safer version of chop
8.The chop function removes the last character in a scalar variable
9.Chomp: Last character removed only if a newline
10.Chop function in action
11.Chop: Removing the last character, regardless of what it is
12.Cleaning Up Typed Input