Проект ACIS: содержание, old manual.
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
}