Select Code to Download

@commands = ("add_node('W1')", "add_node('W2')", "add_edge('W2' => 'W1
+')");

use GraphViz; 
my $g = GraphViz->new(); 
foreach $command (@commands) {
 $g->$command; 
 }