Доступ к RePEc::ShortIDs


 use RePEc::ShortIDs::Client;

 # get short-id for a ReDIF template
 my $template = …   

 my $sid = RePEc::ShortIDs::process_record( $template );

 if( not defined $sid ) {
    # error
 }

 # get short-id for a person 
 my $handle    = …;
 my $last_name = …;

 my $sid = 
   RePEc::ShortIDs::make_up_short_id_for_a_person
     ( $handle, $last_name );

 if( not defined $sid ) {
    # error
 }