# See lib/ExtUtils/MakeMaker.pm for details of how to influence
# the contents of the Makefile that is written.
WriteMakefile(
'NAME'
=>
'DBIx::Tree'
,
'VERSION_FROM'
=>
'Tree.pm'
,
# finds $VERSION
);
$connstr
= prompt (
"DBI Connection String?"
,
"DBI:mSQL:test"
);
$userid
= prompt (
"User ID?"
,
""
);
$passwd
= prompt (
"Password?"
,
""
);
open
(PWD,
">PWD"
) ||
die
"Could not open PWD for writing!"
;
PWD
$connstr
,
"\n"
;
PWD
$userid
,
"\n"
;
PWD
$passwd
,
"\n"
;