view release on metacpan or  search on metacpan

TODO  view on Meta::CPAN

* Interesting paper from ESWC2012 about object-oriented class instantiation
  strategies from ontology data (http://www.springerlink.com/content/gt857662n3274882, DOI: 10.1007/978-3-642-30284-8_51 )

Tue Mar 27 02:57:43 CEST 2012
-----------------------------
* A meta-attribute 'inverse' to specify that $self->rdf_about should be the
  object of a statement, not it's subject.
* A Moose class for all that is known about $self->rdf_about across named
  graphs/contexts and with '$self->rdf_about' as subject or object

Fri Feb 24 15:10:35 CET 2012
----------------------------
* Just found out toby has written a small schema for perl modules
  (Module::Install::DOAP) - really useful. Could be foundation for solving
  the inheritance problem, i.e. have MXS RdfImport recognize a special
  cpanterms:package_name property and instantiating that instead of the
  base class specified in isa

Fri Feb 24 05:30:07 CET 2012
----------------------------

Additionally:
* Detect attributes that contain a model and export the model

On 02/23/2012 07:49 PM, Kjetil Kjernsmo wrote:
> On Friday 10. February 2012 16.37.34 Kjetil Kjernsmo wrote:
>> "what would we do with Moose if 
>> we got to hack on it for a few days with cabal members to help us?"
Some ideas off the top of my head:

lib/MooseX/Semantic/Role/RdfExport.pm  view on Meta::CPAN

TODO

=cut

sub export_to_web {
    my ($self, $method, $uri, %opts) = @_;
    confess "Method must be PUT or POST" unless $method =~ /^(PUT|POST)$/;
    
    ### XXX: It would be handy if there were an application/sparql-update
    ###      serializer for Trine.
    ### kb Tue Nov 29 03:55:55 CET 2011
    #   started sparqlu_insert serializer
    my $ser = $self->_get_serializer(%opts);
    my ($type) = $ser->media_types;
    
    my $req = HTTP::Request->new(POST => $uri);
    $req->header(Content_Type => $type);
    my $model = $self->export_to_model($opts{model}, %opts);
    $req->content( $ser->serialize_model_to_string($model) );
    
    my $res = $self->_user_agent->request($req);