Perl | quotemeta() Function

quotemeta() function in Perl escapes all meta-characters in the value passed to it as parameter.

Example:

Input : "GF*..G" 
Output : "GF\*\.\.G"

Syntax: quotemeta(value)

Parameter:
value: String containing meta-characters

Return:
a string with all meta-characters escaped

Example 1:

filter_none

edit
close

play_arrow

link
brightness_4
code

#!/usr/bin/perl -w
$string = "GF*\n[.]*G";
  
print "Original String: \n";
print $string;
  
# Applying operation on the String
print "\n\nString after operation: \n";
print quotemeta($string);

chevron_right


Output:

Original String: 
GF*
[.]*G

String after operation: 
GF\*\
\[\.\]\*G

 
Example 2:

filter_none

edit
close

play_arrow

link
brightness_4
code

#!/usr/bin/perl -w
$string = "GF+n\{.}/G";
  
print "Original String: \n";
print $string;
  
# Applying operation on the String
print "\n\nString after operation: \n";
print quotemeta($string);

chevron_right


Output:

Original String: 
GF+n{.}/G

String after operation: 
GF\+n\{\.\}\/G


My Personal Notes arrow_drop_up

Check out this Author's contributed articles.

If you like GeeksforGeeks and would like to contribute, you can also write an article using contribute.geeksforgeeks.org or mail your article to contribute@geeksforgeeks.org. See your article appearing on the GeeksforGeeks main page and help other Geeks.

Please Improve this article if you find anything incorrect by clicking on the "Improve Article" button below.




Article Tags :
Practice Tags :


Be the First to upvote.


Please write to us at contribute@geeksforgeeks.org to report any issue with the above content.