#!/usr/bin/env perl6

#| Translates natural language commands into programming code. Redirects to dsl-translation.
multi sub MAIN(*@args, *%args) {
    note 'WARNING: The CLI script ToDSLCode is obsolete; please use dsl-translation .';
    my @cmd = ('dsl-translation', |@*ARGS);
    my $proc = run(@cmd):out:err;
    note $proc.err.slurp(:close);
    $proc.out.slurp(:close).say;
}
