Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
    use strict;
    ...
    foreach my $node (@nodes) {
        print($node->to_literal, "\n");
    }