coar 01/06/22 14:23:45
Added: apidoc/tools testdict.pl
Log:
A simple test for the dictionary module..
Revision Changes Path
1.1 httpd-docs-1.3/apidoc/tools/testdict.pl
Index: testdict.pl
===================================================================
#!/usr/local/bin/perl -w
use APIdict;
$dict = new APIdict;
$dict->readfile("api.list");
@elist = $dict->entity_list();
($scratch, $n2) = @elist;
print "Entity '$n2':\n";
print " defined: " . $dict->defined($n2) . "\n";
print " Category: " . $dict->category($n2) . "\n";
print " Category name: " . $dict->category_name($dict->category($n2)) .
"\n";
print " See-Also: " . $dict->see_also($n2) . "\n";
print " Description file: " . $dict->description_file($n2) . "\n";
print " Description:\n" . $dict->description($n2) . "\n";
print " Definition:\n" . $dict->definition($n2) . "\n";
print " Example:\n" . $dict->example($n2) . "\n";
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
