Perl quotemeta()用法及代碼示例

Perl中的quotemeta()函數將作為參數傳遞給它的值中的所有元字符轉義。

例：

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

用法： quotemeta(value)

參數：
value:包含元字符的字符串

返回：
包含所有元字符的字符串

範例1：

#!/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);

輸出：

Original String:
GF*
[.]*G

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

範例2：

#!/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);

輸出：

Original String:
GF+n{.}/G

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

相關用法

注：本文由純淨天空篩選整理自Code_Mech大神的英文原創作品 Perl | quotemeta() Function。非經特殊聲明，原始代碼版權歸原作者所有，本譯文未經允許或授權，請勿轉載或複製。