#!/usr/bin/perl
use 5.008;
use strict;
use warnings;
use Getopt::Attribute;
use Module::Cloud;
our @dir : Getopt(dir=s);
print Module::Cloud->new(dir => @dir)->get_cloud->html_and_css;
#!/usr/bin/perl
use 5.008;
use strict;
use warnings;
use Getopt::Attribute;
use Module::Cloud;
our @dir : Getopt(dir=s);
print Module::Cloud->new(dir => @dir)->get_cloud->html_and_css;