use RePEc::Index;

my $OK = RePEc::Index -> check_status ();

print 'RePEc status: [', $OK, "]\n";

exit if not $OK;

my $template_data = RePEc::Index -> look_up_handle ( $handle );

my $file_data = RePEc::Index -> look_up_file ( $filename );