DIG

SYNOPSIS

    use EC::Grammars::DIG;
    my $proc = run 'dig', URL_YOU_WANT_TO_DIG_HERE, :out, :err;
    with $proc.out { say "Error running dig"; die; }
    my $output = $proc.out.slurp: :close;
    my $dig = EC::Grammars::DIG.new.parse( $output, :actions( EC:Grammars::DIG::Actions.new ) );
    say $dig<DATE>; ## you may here query which ever tokens or rules desired
    ## TO ITERATE USE, FOR INSTANCE:
    for $dig<ANSWER> -> $answers {
      say $answers<IP>; ## for instance
    }

The Camelia image is copyright 2009 by Larry Wall. "Raku" is trademark of the Yet Another Society. All rights reserved.