[oracle@jhoa perl2]$ cat 1.pl
if ((5 > 3) || ( 1 > 2) ){print "xxxxxxxxx
"};
[oracle@jhoa perl2]$ perl 1.pl
xxxxxxxxx
[oracle@jhoa perl2]$ cat 1.pl
if ((5 > 3) or ( 1 > 2) ){print "xxxxxxxxx
"};
[oracle@jhoa perl2]$ perl 1.pl
xxxxxxxxx
[oracle@jhoa perl2]$ cat 1.pl
if ((2 > 3) or ( 1 > 2) ){print "xxxxxxxxx
"};
[oracle@jhoa perl2]$ perl 1.pl
for ($a=1;$a<=10;$b=++$a){
print "$b
";
}
[oracle@jhoa perl2]$ perl 2.pl
2
3
4
5
6
7
8
9
10
[oracle@jhoa perl2]$ cat 2.pl
for ($a=1;$a<=10;$b=$a++){
print "$b
";
}
[oracle@jhoa perl2]$ perl 2.pl
1
2
3
4
5
6
7
8
9