1N/A# Locale::Script - ISO codes for script identification (ISO 15924) 1N/A#----------------------------------------------------------------------- 1N/A# Public Global Variables 1N/A#----------------------------------------------------------------------- 1N/A#----------------------------------------------------------------------- 1N/A# Private Global Variables 1N/A#----------------------------------------------------------------------- 1N/A#======================================================================= 1N/A# code2script ( CODE [, CODESET ] ) 1N/A#======================================================================= 1N/A #------------------------------------------------------------------- 1N/A # Make sure the code is in the right form before we use it 1N/A # to look up the corresponding script. 1N/A # We have to sprintf because the codes are given as 3-digits, 1N/A # with leading 0's. Eg 070 for Egyptian demotic. 1N/A #------------------------------------------------------------------- 1N/A #--------------------------------------------------------------- 1N/A # no such script code! 1N/A #--------------------------------------------------------------- 1N/A#======================================================================= 1N/A# script2code ( SCRIPT [, CODESET ] ) 1N/A#======================================================================= 1N/A #--------------------------------------------------------------- 1N/A #--------------------------------------------------------------- 1N/A#======================================================================= 1N/A# script_code2code ( CODE, IN-CODESET, OUT-CODESET ) 1N/A#======================================================================= 1N/A (@_ ==
3)
or croak "script_code2code() takes 3 arguments!";
1N/A#======================================================================= 1N/A#======================================================================= 1N/A#======================================================================= 1N/A#======================================================================= 1N/A#======================================================================= 1N/A# initialisation code - stuff the DATA into the ALPHA2 hash 1N/A#=======================================================================