perl

defined($var) 是个测试函数，它不做任何修改，只是测试 $var 是否定义了。
exists 是个专用来测试 hash 中是否存在某个键，或者数组中是否存在某个索引的函数，不能用来测试标量。它也不修改任何东西。
if 就不多说了吧？它只是在 bool 上下文中计算表达式的值，然后根据计算结果进行流程控制。
undef($var) 是将表达式所描述的内存单元的引用数渐 1，当减到 0 的时候就会执行确定的内存释放动作。