📜  珀尔 | y 运算符

📅  最后修改于: 2022-05-13 01:55:20.899000             🧑  作者: Mango

珀尔 | y 运算符

Perl 中的y运算符将 SearchList 的所有字符转换为 ReplacementList 的相应字符。
这里的 SearchList 是给定的输入字符,这些字符将被转换为 ReplacementList 中给定的相应字符。

示例 1:此示例使用 y运算符将小写字母转换为大写字母。

#!/usr/bin/perl
   
# Initialising some strings
$string1 = 'gfg is a computer science portal';
$string2 = 'geeksforgeeks';
  
# Calling to y function
$string1 =~ y/a-z/A-Z/;
$string2 =~ y/a-z/A-Z/;
  
# Getting translated strings
print "$string1\n";
print "$string2\n";


输出:

GFG IS A COMPUTER SCIENCE PORTAL
GEEKSFORGEEKS

示例 2:此示例使用 y运算符将大写字母转换为小写字母。

#!/usr/bin/perl
   
# Initialising some strings
$string1 = 'GFG IS A COMPUTER SCIENCE PORTAL';
$string2 = 'GEEKSFORGEEKS';
  
# Calling to y function
$string1 =~ y/A-Z/a-z/;
$string2 =~ y/A-Z/a-z/;
  
# Getting translated strings
print "$string1\n";
print "$string2\n";

输出 :

gfg is a computer science portal
geeksforgeeks

注意:这个 y运算符执行 lc()函数和 uc()函数的任务,并将输入字符转换为数字形式等。

示例 3:此示例使用 y运算符将大写形式转换为数字形式。

#!/usr/bin/perl
   
# Initialising some strings
$string1 = 'GFG IS A COMPUTER SCIENCE PORTAL';
$string2 = 'GEEKSFORGEEKS';
  
# Calling to y function
$string1 =~ y/A-Z/0-9/;
$string2 =~ y/A-Z/0-9/;
  
# Getting translated strings
print "$string1\n";
print "$string2\n";

输出 :

656 89 0 29999949 9284924 999909
6449959964499