#!/usr/local/bin/perl use strict; require 'mkpm.pl'; use vars qw(%PROP %SET %SET_ALIAS); $PROP{module_name} = 'ISOIECTR10176'; $PROP{version} = do{my @r=(q$Revision: 1.1 $=~/\d+/g);sprintf "%d."."%02d" x $#r,@r}; $PROP{author_name} = 'Wakaba'; $PROP{author_mail} = 'w@suika.fam.cx'; $PROP{pod_description} = <, 2000-06-01, will be expired on 2005-07-31. (TR type III) (IDT with ISO/IEC TR 10176:1998.) EOH $SET{Latin} = col2list (<