use Web;
use Node;
my $node = Node.new;
say SITE(:$node);
class FileList {
has $.node;
method HTML {
~ do for $.node.index.keys.sort -> $filename {
$filename
}
}
}
sub SITE(:$node) is export {
my $filelist = FileList.new(:$node);
$filelist.HTML
}
unit class Node;
has %.index is rw = :a("a"), :b("b");