Re: Mapping node relationships

[one4k4]

#!/usr/bin/perl -w

use Image::Magick;

$image=Image::Magick->new;
$image->Set(size=>'100x100');
$image->Read("xc:white");
$image->Raise('3x3');

$image->Draw(stroke=>'red',primitive=>'rectangle',points=>'20,20 25,25
+');
$image->Draw(stroke=>'red',primitive=>'rectangle',points=>'30,20 35,25
+');
$image->Draw(stroke=>'black',primitive=>'line',points=>'25,23 30,23');

binmode STDOUT;
$image->Write('gif:-');

A nice ImageMagick snippit demonstrated, at least to myself, that it is possible to draw via coords (points=>..), and I think I can create what I need from the tables I have currently.

One4k4 - [e-mail] (www.poorheart.com)

[PodMaster]

Have you trid GraphViz? It's great for mapping relationships (example: All Roads Lead to Taco).

MJD says you can't just make shit up and expect the computer to know what you mean, retardo! I run a Win32 PPM repository for perl 5.6x+5.8x. I take requests. ** The Third rule of perl club is a statement of fact: pod is sexy.

[one4k4]

Ohh, that's cool stuff! Thanks!

One4k4 - [e-mail] (www.poorheart.com)