[Developers] Metaweb Perl module

[Hayden Stainsby]

I'm repeating myself here, so apologies if you've been to the  
developers page recently.

I'm in the process of writing a Perl module to interface to a  
Metaweb, obviously this is centred around Freebase at the moment, but  
the way I understand things it should work for other instances that  
become available.

I just wanted to check in with other developers to make sure no one  
is working on a similar project. I'm proposing using the Net::Metaweb  
namespace, since I'm not providing any database abstraction, just a  
way to connect and query a metaweb instance. I'm working reading  
queries as either a Perl object (a la the example in the developers  
section) or a JSON string, which should give users a couple of easy  
ways to write queries (for something weird you could have users enter  
Perl syntax as text and then eval it to build the object structure -  
but I'm getting ahead of myself). I'd like to publish this on CPAN  
when it's in a fit state.

If anyone is interested in this project, please let me know.

--
Hayden

#!/usr/bin/perl
chop($_=<>);@s=split/ /;foreach$m(@s){if($m=='*'){$z=pop at t;$x=
pop at t;$a=eval"$x$m$z";push at t,$a;}else{push at t,$m;}}print"$a\n";
# http://www.occasionallyhuman.net/
#9202a8c04000641f80000000054c75be