Inline::Parrot

[Flavio S. Glock]

I started writing of a module that can execute Parrot Intermediate
Representation (pir) code using pure Perl.
I tested it in MS Windows and a pre-built Parrot - it doesn't need a C
compiler.

  Source code:
  http://perlmonks.org/?node_id=396890

I'd like to know if someone else has been working on this.
Is it ok to send this to CPAN someday?
What I have so far can execute this sample code:

---------
use Inline Parrot;

print "Start Perl\n";
_hello( 'int count' => 5, name => 'test' );
print "End Perl\n";

__END__
__Parrot__

.sub _hello   
    .param int count
    .param string name
    print "Hello world\n"
    print count
    print " "
    print name
    print "\n" 
    ret 
.end

---------
Output:

Start Perl
Hello world
5 test
End Perl
---------

- Flavio S. Glock