Perl数据类型介绍和用法示例

数据类型指定有效的数据类型佩尔变量可以容纳。 Perl是一个松散类型的语言。在Perl程序中使用时, 无需为数据指定类型。的佩尔解释器将根据数据本身的上下文选择类型。

Perl中有3种数据类型, 如下所示：

1. 标量
2. 数组
3. 哈希(关联数组)

1.标量：它是一个数据单元, 可以是整数, 浮点数, 字符, 字符串, 段落或整个网页。要了解有关标量的更多信息, 请参阅Perl中的标量.

例子：

# Perl Program to demonstrate the 
# Scalars data types
  
# An integer assignment
$age = 1;             
  
# A string 
$name = "ABC" ;
  
# A floating point   
$salary = 21.5;     
  
# displaying result
print "Age = $age\n" ;
print "Name = $name\n" ;
print "Salary = $salary\n" ;

输出如下：

Age = 1
Name = ABC
Salary = 21.5

标量运算：

可对标量数据类型执行很多操作, 例如加, 减, 乘等。

例子：

# Perl Program to demonstrate 
# the Scalars operations
  
#!/usr/bin/perl
  
# Concatenates strings
$str = "GFG" . " is the best" ;
  
# adds two numbers     
$num = 1 + 0; 
  
# multiplies two numbers             
$mul = 4 * 9; 
  
# concatenates string and number             
$mix = $str . $num ;             
  
# displaying result
print "str = $str\n" ;
print "num = $num\n" ;
print "mul = $mul\n" ;
print "mix = $mix\n" ;

输出如下：

str = GFG is the best
num = 1
mul = 36
mix = GFG is the best1

2.数组：数组是一个变量, 它以列表的形式存储相同数据类型的值。要在Perl中声明数组, 我们在变量名称前使用" @"符号。

@age=(10, 20, 30)

它将创建一个包含值10、20和30的整数数组。要访问数组的单个元素, 我们使用" $"符号。

$age[0]

它将输出为10。要了解有关数组的更多信息, 请参考Perl中的数组

例子：

# Perl Program to demonstrate 
# the Arrays data type
  
#!/usr/bin/perl
  
# creation of arrays
@ages = (33, 31, 27);             
@names = ( "Geeks" , "for" , "Geeks" );
  
# displaying result
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] = 33
$ages[1] = 31
$ages[2] = 27
$names[0] = Geeks
$names[1] = for
$names[2] = Geeks

3.哈希(关联数组)：它是一组键值对。它也被称为关联数组。要在Perl中声明哈希, 我们使用"％"符号。要访问特定值, 我们使用" $"符号, 后跟大括号中的键。

例子：

# Perl Program to demonstrate the
# Hashes data type
  
# Hashes
%data = ( 'GFG' , 7, 'for' , 4, 'Geeks' , 11);
  
#displaying result
print "\$data{'CR'} = $data{'CR'}\n" ;
print "\$data{'Ramos'} = $data{'Ramos'}\n" ;
print "\$data{'Bale'} = $data{'Bale'}\n" ;

输出如下：

$data{'GFG'} = 11
$data{'for'} = 4
$data{'Geeks'} = 11

---