view release on metacpan or  search on metacpan

examples/curses-ui.pl  view on Meta::CPAN

my $gnew= GraphViz::ISA::Multi->new(ignore => [ 'Exporter' ]);

$gnew->add("Curses::UI::TextViewer" );
$gnew->add("Curses::UI::Listbox" );
$gnew->add("Curses::UI::PasswordEntry" );
$gnew->add( "Curses::UI::Buttonbox" );
$gnew->add( "Curses::UI::Calendar" );
$gnew->add("Curses::UI::Checkbox" );
$gnew->add( "Curses::UI::Color" );
$gnew->add("Curses::UI::Label" );
$gnew->add("Curses::UI::Menubar" );
$gnew->add("Curses::UI::Popupmenu" );
$gnew->add("Curses::UI::Progressbar" );
$gnew->add("Curses::UI::Radiobuttonbox" );
$gnew->add("Curses::UI::Window" );

print "Writing to curses-ui.png\n";
open TEST, ">curses-ui.png";
print TEST $gnew->as_png();
close TEST;