in reply to how to create Modules
Please keep the filename and packagename the same, eg:package FSClient; #file: MySequence.pm
Next, you don't have to create different files for packages, what i do a lot is something like this:package blah; #file: blah.pm
package user # file = user.pm use strict; sub new { my $classname = shift; my $self={}; bless $self,$classname; my $UserData = user::Data->getUserData(); } package user::Data; # still in file user.pm # Database layer for package user. use strict; use DBI; sub getUserData(){ my $self=shift; #etc. } 1;
|
---|