view release on metacpan or  search on metacpan

lib/App/Oozie/Deploy/Validate/DAG/Workflow.pm  view on Meta::CPAN

    default => sub {},
);

has current_vertices => (
    is      => 'rw',
    default => sub {},
);

has graph_filename => (
    is      => 'rw',
    default => sub { 'graph.png' },
);

has _vertex_lookup => (
    is      => 'ro',
    isa     => HashRef,
    default => sub { {} },
);

sub assert {
    my $self = shift;

lib/App/Oozie/Deploy/Validate/DAG/Workflow.pm  view on Meta::CPAN

    sub _dump_graphviz {
        my $self = shift;
        my $g    = $self->current_graph || die "current_graph is not set!";
        my $file = $self->graph_filename;

        require Graph::Writer::GraphViz;

        Graph::Writer::GraphViz->new(
            -edge_color => 1,
            -fontsize   => 8,
            -format     => 'png',
            -layout     => 'twopi',
            -node_color => 2,
            -ranksep    => 1.5,
        )->write_graph( $g, $file );

        $self->logger->info( "$file is created." );

        return;
    }

lib/App/Oozie/Deploy/ttlib/ttree.cfg  view on Meta::CPAN

# ignore these files
ignore = \b(CVS|RCS)\b
ignore = ^#
ignore = ~$
ignore = .sw[a-z]$
ignore = job\.properties
ignore = Makefile

# copy these files
copy   = \.(jar|gif|png|jpg|pdf|pl|hql|tmpl|py|egg)$

# recurse into directories
recurse

# provide info about what's going on
verbose

lib = lib/