创建一个新的文件名，它符号链接到旧文件名。成功返回 1，否则返回 0。在不支持符号链接的系统上，会引发异常。要检查这种情况，请使用 eval

my $symlink_exists = eval { symlink("",""); 1 };

可移植性问题："symlink" 在 perlport 中.