view release on metacpan or  search on metacpan

lib/Ansible.pm  view on Meta::CPAN

           && $self->subs->undefined;
    push(@o, "! the whole enchalada")
        if $self->context->undefined;
    my (@r) = returns(openangle(@o));
    return @r if wantarray;
    return join('', @r);
}

sub callerlevels {
    my $n = 1;
    1 while caller($n ++);
    return $n;
}

sub mget {
    my ($self, @designators) = @_;

    my $cl = callerlevels;
    my @newset;
    if ( @designators > 1 ) {