Help for this page

Select Code to Download


  1. or download this
    DBIx::MyMod
    DBIx::MyMod::db
    DBIx::MyMod::st
    
  2. or download this
    use DBIx::MyMod qw(MYMOD_CONSTANT);
    # connect in the root
    my $h = DBIx::MyMod->connect(x,y, {XXX => MYMOD_CONSTANT});
    
  3. or download this
    fred.pl
    use MyMod; # assuming all constants in EXPORT
    
    MyMod::db->fred();
    
  4. or download this
    use strict;
    use warnings;
    ...
    our @EXPORT = qw(MYMOD_DEFAULT);
    
    1;
    
  5. or download this
    use strict;
    use warnings;
    ...
            print "hello" if (MYMOD_DEFAULT);
    }
    1;