perl print《

在 Perl 中，`print` 函数用于将文本输出到标准输出流中。以下是一些使用 `print` 函数的示例：

# 输出字符串
print "Hello, world!\n";

# 输出变量
my $name = "Alice";
print "My name is $name.\n";

# 输出多个变量和字符串
my $x = 3;
my $y = 4;
print "The value of x is $x and the value of y is $y.\n";

# 输出数组
my @fruits = ("apple", "banana", "cherry");
print "My favorite fruit is $fruits[0].\n";

# 输出哈希表
my %ages = ("Alice" => 25, "Bob" => 30, "Charlie" => 35);
print "Bob is $ages{'Bob'} years old.\n";

在 Perl 中，`print` 函数默认会在输出的文本末尾添加一个换行符。如果你不想要这个换行符，可以使用 `print` 函数的另一个版本 `print()`，它不会自动添加换行符。例如：

print "Hello";    # 输出 "Hello\n"
print("Hello");   # 输出 "Hello"