Embedix-DB
view release on metacpan or search on metacpan
7879808182838485868788899091929394959697
$edb
->cloneDistro(
board
=>
'mpc8260adsp'
);
updating a distro
with
new information
my
$apache_ecd
= Embedix::ECD->newFromFile(
'apache.ecd'
);
$edb
->updateDistro(
ecd
=>
$apache_ecd
);
deleting components from a distro
$edb
->deleteNode(
name
=>
'busybox'
);
=head1 REQUIRES
=over 4
=item Embedix::ECD
This is needed to get data from ECD files into perl objects that can
then be inserted into a database.
646566676869707172737475767778798081828384# updateDistro
my
$ecd
= Embedix::ECD->newFromFile(
't/data/textutils.ecd'
);
eval
{
$edb
->updateDistro(
ecd
=>
$ecd
) };
ok($@ ? 0 : 1);
# see if update works by repeating the previous action
my
$textutils
=
$ecd
->Textprocessing->Tools->textutils;
$textutils
->type(
'bool'
);
$textutils
->default_value(1);
$textutils
->prompt(
'busybox makes me jealous'
);
eval
{
$edb
->updateDistro(
ecd
=>
$ecd
) };
ok($@ ? 0 : 1);
# udpateDistro, yet again to see if the buildvars got in
$ecd
= Embedix::ECD->newFromFile(
't/data/tinylogin.ecd'
);
eval
{
$edb
->updateDistro(
ecd
=>
$ecd
) };
ok($@ ? 0 : 1);
# getNodePath
my
$cheat
=
$dbh
->selectall_arrayref("
t/data/textutils.ecd view on Meta::CPAN
373839404142434445464748495051525354555657
SRPM=textutils
<SPECPATCH></SPECPATCH>
<HELP>These are the GNU text processing utilities. Most of
these programs have significant advantages over their Unix
counterparts, such as greater speed, additional options,
and fewer arbitrary limits.
Busybox provides small, simple versions of many of these
utilities. Consequently, most target systems only
require
busybox. You should provide textutils
if
the target
system
requires complete unix style textprocessing
for
the enduser.
Textutils may be required to support other specific scripts
or utilities.
</HELP>
<REQUIRESEXPR>
(textutils ==
"CHILDREN_ENABLED"
)
</REQUIRESEXPR>
<OPTION keep-cat>
TYPE=bool
( run in 0.248 second using v1.01-cache-2.11-cpan-454fe037f31 )