摘要：
use strict;use warnings;print "===================变量====================\n";my $a=1;$a=2;my $b=2;$b++;print $a+$b."\n";print ($a+$b,"\n");print "===================数组====================\n";my @Array=();$Array[0]='a';$Array[1]='b';$Array[2]= 阅读全文
