IF控制语句，花括号必须有的

if 控制结构
一旦能比较两个值时，就希望能根据这些比较结果作判断。和别的语言类似，Perl 中也提供了if 控制结构：
if($name gt ‘fred’){
print “‘$name’comes after ‘fred’in sorted order./n”;
}
如果需要另一种选择，可以使用关键字else：
if($name gt ‘fred’){
print “‘$name’comes after ‘fred’in sorted order./n”;
}else{
print “‘$name’does not come after ‘fred’./n”;
print “Maybe it’s the same string, in fact./n”;
}
花括号是必须的（这一点和C 不同）。将块中的代码缩进是一个好主意；这样将使代码易于阅读。如果使用的是程序员编
辑器（参见第一章），它将为你自动完成许多事。