我尝试撰写一份“ per”字,但我说:“宫内服务器 E”。
模块文档:(mm1.pm)
package mm1;
use strict;
use XML::Simple;
use DBI;
require Exporter;
our @ISA = qw(Exporter);
our @EXPORT_OK = qw(asd);
our @EXPORT = qw(asd);
sub asd(){
print "2222";
}
这是主要文件:
#!/usr/bin/perl -w
use strict;
use CGI qw/:standard/;
use CGI::Carp qw/fatalsToBrowser warningsToBrowser/;
use mm1;
print header(-type => text/html , -charset=> utf-8 );
print "asdasd";
If i try run without "use mm1;" this main.perl then succeed.
问题是什么?
感谢!