Select Code to Download

#!/usr/bin/env perl
use strict;
...
    print $node -> tag, ": ", $node -> text,"\n";
}

print $twig -> root -> first_child_text('name'),"\n";
...
        }
    }
}