Perl在线运行

版本:

所属目录
点击了解高性能代码运行API
运行结果
教程手册
代码仓库
极速运行
终端运行
图形+终端

                        
以下是用户最新保存的代码
这段Perl代码是一个简单的交换相邻字符的程序,通过交换字符串中每两个相邻字符的位置来创建一个新的字符串。每次交换都涉及到字符数组中的两个元素。 这个程序从标准输入中读取输入,然后对输入的每一行进行处理。它使用 split //, $input 将输入字符串分割成单个字符,并将字符存储在数组 @chars 中。 然后,通过一个循环遍历数组,交换相邻的字符位置。 例如,如果输入是 "abcdef",该程序将交换相邻字符,生成 "badcfe"。 发布于:2023-10-25 15:36 这段Perl代码是一个简单的交换相邻字符的程序,通过交换字符串中每两个相邻字符的位置来创建一个新的字符串。每次交换都涉及到字符数组中的两个元素。 这个程序从标准输入中读取输入,然后对输入的每一行进行处理。它使用 split //, $input 将输入字符串分割成单个字符,并将字符存储在数组 @chars 中。 然后,通过一个循环遍历数组,交换相邻的字符位置。 例如,如果输入是 "abcdef",该程序将交换相邻字符,生成 "badcfe"。 发布于:2023-10-25 15:35 这段Perl代码是一个简单的交换相邻字符的程序,通过交换字符串中每两个相邻字符的位置来创建一个新的字符串。每次交换都涉及到字符数组中的两个元素。 这个程序从标准输入中读取输入,然后对输入的每一行进行处理。它使用 split //, $input 将输入字符串分割成单个字符,并将字符存储在数组 @chars 中。 然后,通过一个循环遍历数组,交换相邻的字符位置。 例如,如果输入是 "abcdef",该程序将交换相邻字符,生成 "badcfe"。 发布于:2023-10-12 11:06 新发的新代码 发布于:2023-09-26 11:22 test_args 发布于:2023-09-18 17:31 这是一个测试编码 发布于:2023-09-11 17:45 打招呼的方式 发布于:2023-08-10 15:21 这是一个例子 发布于:2022-11-25 16:28 这里是一个例子 发布于:2022-11-25 15:20 这是一个程序 发布于:2022-11-23 17:51 这是一个例子 发布于:2022-11-23 14:58 这是一个例子 发布于:2022-11-22 17:51 vfvbegvbte b 发布于:2022-10-11 12:05 00-第一个Perl 发布于:2022-10-09 09:32 calculate the circ 发布于:2022-05-05 09:32 EOF测试 发布于:2021-07-01 22:30 查重名字拼接 发布于:2020-10-26 17:37 [更多]
显示目录

变量



学习嵌入式的绝佳套件,esp8266开源小电视成品,比自己去买开发板+屏幕还要便宜,省去了焊接不当搞坏的风险。 蜂鸣版+触控升级仅36元,更强的硬件、价格全网最低。

点击购买 固件广场

Perl 变量

变量是存储在内存中的数据,创建一个变量即会在内存上开辟一个空间。

解释器会根据变量的类型来决定其在内存中的存储空间,因此你可以为变量分配不同的数据类型,如整型、浮点型、字符串等。

上一章节中我们已经为大家介绍了Perl的三个基本的数据类型:标量、数组、哈希。

  • 标量 $ 开始, 如$a $b 是两个标量。
  • 数组 @ 开始 , 如 @a @b 是两个数组。
  • 哈希 % 开始 , %a %b 是两个哈希。

Perl 为每个变量类型设置了独立的命令空间,所以不同类型的变量可以使用相同的名称,你不用担心会发生冲突。例如 $foo 和 @foo 是两个不同的变量。


创建变量

变量不需要显式声明类型,在变量赋值后,解释器会自动分配匹配的类型空间。

变量使用等号(=)来赋值。

我们可以在程序中使用 use strict 语句让所有变量需要强制声明类型。

等号左边为变量,右边为值,实例如下:

$age = 25;             # 整型
$name = "youj";      # 字符串
$salary = 1445.50;     # 浮点数

以上代码中 25, "youj" 和 1445.50 分别赋值给 $age, $name$salary 变量。

接下来我们会看到数组和哈希的使用。


标量变量

标量是一个单一的数据单元。 数据可以是整数,浮点数,字符,字符串,段落等。简单的说它可以是任何东西。以下是标量的简单应用:

#!/usr/bin/perl

$age = 25;             # 整型
$name = "youj";      # 字符串
$salary = 1445.50;     # 浮点数

print "Age = $age\n";
print "Name = $name\n";
print "Salary = $salary\n";

以上程序执行输出结果为:

Age = 25
Name = youj
Salary = 1445.5

数组变量

数组是用于存储一个有序的标量值的变量。

数组 @ 开始。

要访问数组的变量,可以使用美元符号($)+变量名,并指定下标来访问,实例如下所示:

#!/usr/bin/perl

@ages = (25, 30, 40);             
@names = ("google", "youj", "taobao");

print "\$ages[0] = $ages[0]\n";
print "\$ages[1] = $ages[1]\n";
print "\$ages[2] = $ages[2]\n";
print "\$names[0] = $names[0]\n";
print "\$names[1] = $names[1]\n";
print "\$names[2] = $names[2]\n";

以上程序执行输出结果为:

$ages[0] = 25
$ages[1] = 30
$ages[2] = 40
$names[0] = google
$names[1] = youj
$names[2] = taobao

程序中我们在 $ 标记前使用了转义字符 (\) ,这样才能输出字符 $。


哈希变量

哈希是一个 key/value 对的集合。

哈希 % 开始。

如果要访问哈希值,可以使用 $ + {key} 格式来访问:

#!/usr/bin/perl

%data = ('google', 45, 'youj', 30, 'taobao', 40);

print "\$data{'google'} = $data{'google'}\n";
print "\$data{'youj'} = $data{'youj'}\n";
print "\$data{'taobao'} = $data{'taobao'}\n";

以上程序执行输出结果为:

$data{'google'} = 45
$data{'youj'} = 30
$data{'taobao'} = 40

变量上下文

所谓上下文:指的是表达式所在的位置。

上下文是由等号左边的变量类型决定的,等号左边是标量,则是标量上下文,等号左边是列表,则是列表上下文。

Perl 解释器会根据上下文来决定变量的类型。实例如下:

#!/usr/bin/perl

@names = ('google', 'youj', 'taobao');

@copy = @names;   # 复制数组
$size = @names;   # 数组赋值给标量,返回数组元素个数

print "名字为 : @copy\n";
print "名字数为 : $size\n";

以上程序执行输出结果为:

名字为 : google youj taobao
名字数为 : 3

代码中 @names 是一个数组,它应用在了两个不同的上下文中。第一个将其复制给另外一个数组,所以它输出了数组的所有元素。第二个我们将数组赋值给一个标量,它返回了数组的元素个数。

以下列出了多种不同的上下文:

序号 上下文 描述
1 标量 − 赋值给一个标量变量,在标量上下文的右侧计算
2 列表 − 赋值给一个数组或哈希,在列表上下文的右侧计算。
3 布尔 − 布尔上下文是一个简单的表达式计算,查看是否为 true 或 false。
4 Void − 这种上下文不需要关系返回什么值,一般不需要返回值。
5 插值 − 这种上下文只发生在引号内。
由JSRUN为你提供的Perl在线运行、在线编译工具
        JSRUN提供的Perl 在线运行,Perl 在线运行工具,基于linux操作系统环境提供线上编译和线上运行,具有运行快速,运行结果与常用开发、生产环境保持一致的特点。
yout