求技术支持:离奇的Perl库函数的使用——复制目录

Perl code

use strict;
#use File::Copy::Recursive qw(dircopy);
use File::Copy::Recursive;
my $source_dir="./source";
my $target_dir="./target";          
my $copy_ret=dircopy($source_dir,$target_dir) or die $!;

在Windows下，使用第一行use正常运行，但使用第二行的时候就出现Undefined subroutine &main::dircopy，为什么将整个模块引用的时候出现函数未定义的问题，而当单独引用模块中特定函数的时候却没有出现未定义错误？
离奇！期待高人指点…………

阅读《Intermediate Perl》，章节15.3，@EXPORT and @EXPORT_OK。