require Exporter; @ISA = qw(Exporter); @EXPORT =qw\fun1 fun2\; @EXPORT_OK = qw\fun3\; @EXPORT_FAIL= qw\fun4\; sub fun1{print "\nfun1";} sub fun2{print "\nfun2";} sub fun3{print "\nfun3";} sub fun4{print "\nfun4";} #### use Module; fun1; fun2; fun3; fun4; #### require Exporter; @ISA = qw(Exporter); @EXPORT =qw\fun1 fun2\; @EXPORT_OK = qw\fun3\; @EXPORT_FAIL= qw\fun4\;