#!/usr/bin/perl

use lib 'lib';
use utf8;
use strict;
use CGI qw(:standard);
use RDF::MicroTurtle;
use Data::Dumper;

my $ttldent = RDF::MicroTurtle->new_from_feed(
	feed_file => 'identica.rss' ,
	identica_account => 'http://identi.ca/tobyink' );

print $ttldent->to_string('turtle', 'http://identi.ca/tobyink/rss');
