root/lang/perl/Boofy/trunk/lib/Boofy/Mail.pm @ 3389

Revision 3389, 0.7 kB (checked in by yappo, 5 years ago)

r15@haruna (orig r13): ko | 2006-07-11 13:28:04 +0900
Boofy imported


Line 
1package Boofy::Mail;
2
3use strict;
4use warnings;
5
6require Exporter;
7
8our @ISA = qw(Exporter);
9
10# Items to export into callers namespace by default. Note: do not export
11# names by default without a very good reason. Use EXPORT_OK instead.
12# Do not simply export all your public functions/methods/constants.
13
14# This allows declaration       use Boofy ':all';
15# If you do not need this, moving things directly into @EXPORT or @EXPORT_OK
16# will save memory.
17our %EXPORT_TAGS = ( 'all' => [ qw(
18       
19) ] );
20
21our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
22
23our @EXPORT = qw(
24       
25);
26
27our $VERSION = '0.01';
28
29use Boofy::DB;
30
31sub new {
32    my($class, %opt) = @_;
33    bless \%opt, $class;
34}
35
36sub get_dbh {
37}
38
391;
40__END__
Note: See TracBrowser for help on using the browser.