这是什么意思啊
$File=IO::File->new($NAME, "w+");，这样的用法看不懂啊

[解决办法]
看IO模块的文档就行了：

new ( FILENAME [,MODE [,PERMS]] )

Creates an IO::File . If it receives any parameters, they are passed to the method open; if the open fails, the object is destroyed. Otherwise, it is returned to the caller.