in reply to Building a tree 1 leaf at a time

Using XML::XSH2: 
use XML::XSH2;
@list = qw(this/is/a/twig
           this/is/a/branch
           this/is/another/branch);
xsh 'create this';
xsh "set $_" for @list;
xsh 'ls .';

[download]

In Section Seekers of Perl Wisdom