> ----------<g.pl>---------------- > #!/usr/local/bin/perl -w > > use strict; > use DBI; > > require "defs.pl"; > > print "Welcome to $DOMAIN, $ADMIN\n"; >
----------<g.pl>---------------- #!/usr/local/bin/perl -w use strict; use DBI; use defs; print "Welcome to defs::$DOMAIN, defs::$ADMIN\n"; -------------------------------- > ------------<defs.pl>------------ > #!/usr/local/bin/perl -w > > use strict; > > my $DOMAIN="plexus.com"; > my $ADMIN="Chuck"; > > -------------------------------- ------------<defs.pm>------------ # note it's now pm package defs; $DOMAIN = "plexus.com"; $ADMIN = "Chuck"; 1; #return true -------------------------------- I hope it's clear enough, I don't know if I wrote enough details:-) Etienne -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
