DOCUMENT TITLE <author> AUTHOR NAME <date> DATE <abstract> ABSTRACT HERE </abstract> <toc>  <sect> SECTION <p> CONTENT ....... </article> àÍ¡ÊÒÃ·Õèãªé SGML-tools µéÍ§ÁÕ¤ÓÊÑè§ <!doctype linuxdoc system> ·Ø¡¤ÃÑé§. à¾×èÍà»ç¹¡ÒÃºÍ¡ãËé SGML-tools ÃÙéÇèÒ¤ÓÊÑè§(TAG)ã¹àÍ¡ÊÒÃ¹Õé¶Ù¡¡ÓË¹´â´Â linuxdoc. ÃÒÂÅÐàÍÕÂ´·Ò§à·¤¹Ô¤¢Í§ SGML ÊÒÁÒÃ¶ÍèÒ¹ä´é¨Ò¡ guide.sgml «Öè§à»ç¹àÍ¡ÊÒÃá¹Ð¹Ó¡ÒÃãªé SGML-tools ·ÕèÁÒ¡ÑºµÑÇâ»Ãá¡ÃÁ. 22..22.. ¡¡ÒÒÃÃããªªéé TTAAGG ¡ÒÃãªé TAG ã¹ä¿Åì SGML ¤ÅéÒÂæ¡Ñº TAG ¢Í§ HTML ¤×ÍÁÕµÑÇà»Ô´áÅÐ»Ô´. äÇÂ¡Ã³ì·ÑèÇ¤×Í <TAG> phrase </TAG> ¤ÓÊÑè§¢éÒ§º¹ÊÒÁÒÃ¶ÂèÍÊÑé¹æä´é´Ñ§¹Õé <TAG/ phrase / ã¹¡Ã³ÕËÅÑ§àËÁÒÐÊÓËÃÑº¡ÒÃà¢ÕÂ¹¤ÓÊÑé¹æ áÅÐäÁèàËÁÒÐÊÓËÃÑº¡ÒÃà¢ÕÂ¹ª×èÍä¿ÅìàµçÁæ¢Í§ UNIX à¾ÃÒÐÁÕà¤Ã×èÍ§ËÁÒÂ / ÍÂÙè«Öè§¶×Íà»ç¹ÊèÇ¹Ë¹Öè§¢Í§¤ÓÊÑè§. TAG ºÒ§ª¹Ô´äÁè¨Óà»ç¹µéÍ§ÁÕµÑÇ»Ô´¡çä´éàªè¹ <P> «Öè§ËÁÒÂ¶Ö§¤ÓÊÑè§¡Ó¡ÑºÂèÍË¹éÒà»ç¹µé¹. ÍÕ¡ÇÔ¸ÕË¹Öè§·ÕèãªéÊÓËÃÑº¡ÒÃÂèÍË¹éÒ¤×Í ¡ÒÃàÇé¹ºÃÃ·Ñ´ÇèÒ§Ë¹Öè§ºÃÃ·Ñ´. 22..33.. àà¤¤ÃÃ××èèÍÍ§§ËËÁÁÒÒÂÂ¾¾ÔÔààÈÈÉÉ ¡ÒÃà¢ÕÂ¹à¤Ã×èÍ§ËÁÒÂ¾ÔàÈÉÁÕ¤ÇÒÁ¨Óà»ç¹àÁ×èÍ¼ÙéãªéµéÍ§¡ÒÃà¢ÕÂ¹µÑÇÍÑ¡ÉÃ·Õèà»ç¹¤ÓÊÑè§àªè¹ "<ÀÒÉÒä·Â>" à¾×èÍäÁèãËéá»Åà¤Ã×èÍ§ËÁÒÂ <> à»ç¹ TAG ¼ÙéãªéÊÒÁÒÃ¶à¢ÕÂ¹µÑÇÍÂèÒ§·ÕèáÊ´§ä´éâ´Â <ÀÒÉÒä·Â> à»ç¹µé¹. à¤Ã×èÍ§ËÁÒÂ¾ÔàÈÉ·ÕèãªéºèÍÂä´éá¡è, · à¢ÕÂ¹ & á·¹à¤Ã×èÍ§ËÁÒÂ ampersand (&), · à¢ÕÂ¹ < á·¹à¤Ã×èÍ§ËÁÒÂ left bracket (<), · à¢ÕÂ¹ > á·¹à¤Ã×èÍ§ËÁÒÂ right bracket (>), · à¢ÕÂ¹ &etago; á·¹à¤Ã×èÍ§ËÁÒÂ left bracket with a slash (</) · à¢ÕÂ¹ $ á·¹à¤Ã×èÍ§ËÁÒÂ dollar sign ($), · à¢ÕÂ¹ # á·¹à¤Ã×èÍ§ËÁÒÂ hash (#), · à¢ÕÂ¹ % á·¹à¤Ã×èÍ§ËÁÒÂ percent (%), · à¢ÕÂ¹ ˜ á·¹à¤Ã×èÍ§ËÁÒÂ tilde (~), · à¢ÕÂ¹ &dquot; á·¹à¤Ã×èÍ§ËÁÒÂ double quot ". à¤Ã×èÍ§ËÁÒÂ¾ÔàÈÉÍ×è¹æ·Õèãªéä´é¡Ñº SGML-tools 1.0.x ÊÒÁÒÃ¶´Ùä´é¨Ò¡ guide.sgml. 22..44.. ¡¡ÒÒÃÃàà¢¢ÕÕÂÂ¹¹¢¢ééÍÍ¤¤ÇÇÒÒÁÁááºººº vveerrbbaattiimm àÁ×èÍ¼ÙéãªéµéÍ§¡ÒÃáÊ´§¢éÍ¤ÇÒÁ·ÕèäÁèµéÍ§¡ÒÃãËéá»ÅµÒÁÀÒÉÒ SGML ãËéà¢ÕÂ¹¢éÍ¤ÇÒÁàËÅèÒ¹Ñé¹ã¹ environment ·Õèª×èÍ verbatim ´Ñ§¹Õé <verb> This is the verbatim environment. <> & ; ~ You can write special characters here. </verb> µÑÇÍÂèÒ§¢éÒ§¨ÐáÊ´§¼Åà»ç¹´Ñ§¹Õé This is the verbatim environment. <> & ; ~ You can write special characters here. ¡ÒÃãªé <verb;>...<verb>/ ÂÑ§äÁèàËÁÒÐ¡Ñº¡ÒÃãªéÀÒÉÒä·Âã¹ SGML ÁÒ¡¹Ñ¡à¾ÃÒÐ¢³Ð¹ÕéÂÑ§äÁèÊÒÁÒÃ¶áÊ´§¼ÅÀÒÉÒä·Âã¹ verbatim environment ¢Í§ LaTeX ä´é. ã¹ verbatim environment ÁÕ¢éÍ¡ÓË¹´¡ÒÃà¢ÕÂ¹ÍÑ¡ÉÃºÒ§µÑÇ´Ñ§¹Õé · ãËéà¢ÕÂ¹ &ero; à¾×èÍáÊ´§µÑÇÍÑ¡ÉÃ ampersand, · ãËéà¢ÕÂ¹ &etago; à¾×èÍáÊ´§µÑÇÍÑ¡ÉÃ </, · ËéÒÁà¢ÕÂ¹ \end{verbatim} ã¹ verb environment, «Öè§ÇÅÕ¹Õéà»ç¹¤ÓºÍ¡àÅÔ¡ verbatim environment ¢Í§ LaTeX. ¹Í¡¨Ò¡ verb environment áÅéÇÂÑ§ÁÕ environment Í×è¹·Õè¤ÅéÒÂæ¡Ñ¹¤×Í code. µÑÇÍÂèÒ§àªè¹ <code> This is the code environment. </code> ¡ÒÃáÊ´§¼Å : ______________________________________________________________________ This is the code environment. ______________________________________________________________________ code environment ¨Ðáµ¡µèÒ§¡Ñº verb environment µÃ§·ÕèÁÕàÊé¹¡Ñé¹¢éÍ¤ÇÒÁ(horizontal rule)ãËé. ¼ÙéãªéÂÑ§ÊÒÁÒÃ¶ãªé tscreen environment »ÃÐ¡Íº¡Ñº verb ËÃ×Í code à¾×èÍÅè¹¢éÍ¤ÇÒÁ(indent)ä»·Ò§¢ÇÒ. µÑÇÍÂèÒ§àªè¹, <tscreen><verb> Using verb environmment with tscreen environment. </verb></tscreen> ¡ÒÃáÊ´§¼Å: Using verb environmment with tscreen environment. quote environment ¤ÅéÒÂ tscreen environment ÁÒ¡áµèáµ¡µèÒ§¡Ñ¹µÃ§·ÕèäÁèãªé¿Í¹µì tt (fixed width font) ã¹¡ÒÃáÊ´§¼Å. µÑÇÍÂèÒ§àªè¹, <quote> This is the quote environment. </quote> ¡ÒÃáÊ´§¼Å: This is the quote environment. 22..55.. ¡¡ÒÒÃÃàà¢¢ÕÕÂÂ¹¹ÃÃÒÒÂÂ¡¡ÒÒÃÃ ((lliisstt)) ¡ÒÃà¢ÕÂ¹ÃÒÂ¡ÒÃ(list) ÊÒÁÒÃ¶à¢ÕÂ¹ä´é 3 áºº¤×Í · itemize, à»ç¹ÃÒÂ¡ÒÃ·ÕèäÁèµéÍ§¡ÒÃµÑÇàÅ¢¡Ó¡Ñº · enum, à»ç¹ÃÒÂ¡ÒÃ·Õè¡Ó¡ÑºµÑÇàÅ¢ · descrip, à»ç¹¡ÒÃÂ¡ËÑÇ¢éÍáÅÐÍ¸ÔºÒÂ»ÃÐ¡Íº µÑÇÍÂèÒ§¡ÒÃà¢ÕÂ¹ÃÒÂ¡ÒÃáºº itemize <itemize> <item>ÃÒÂ¡ÒÃ·ÕèË¹Öè§ <item>ÃÒÂ¡ÒÃµèÍä» <itemize>/ ¡ÒÃáÊ´§¼Å: · ÃÒÂ¡ÒÃ·ÕèË¹Öè§ · ÃÒÂ¡ÒÃµèÍä» µÑÇÍÂèÒ§¡ÒÃà¢ÕÂ¹ÃÒÂ¡ÒÃáºº enum, <enum> <item>ÃÒÂ¡ÒÃ·ÕèË¹Öè§ <item>ÃÒÂ¡ÒÃµèÍä» <enum>/ ¡ÒÃáÊ´§¼Å: 1. ÃÒÂ¡ÒÃ·ÕèË¹Öè§ 2. ÃÒÂ¡ÒÃµèÍä» ¡ÒÃà¢ÕÂ¹ÃÒÂ¡ÒÃáºº descrip ¨Ðáµ¡µèÒ§¨Ò¡µÑÇÍÂèÒ§Í×è¹àÅç¡¹éÍÂ´Ñ§¹Õé <descrip> <tag/ËÑÇ¢éÍ·ÕèË¹Öè§/ ¤ÓÍ¸ÔºÒÂ <tag/ËÑÇ¢éÍµèÍä»/ ¤ÓÍ¸ÔºÒÂ <descrip>/ ¡ÒÃáÊ´§¼Å: ËËÑÑÇÇ¢¢ééÍÍ··ÕÕèèËË¹¹ÖÖèè§§ ¤ÓÍ¸ÔºÒÂ ËËÑÑÇÇ¢¢ééÍÍµµèèÍÍää»» ¤ÓÍ¸ÔºÒÂ 22..66.. ÊÊÃÃØØ»»··ÕÕèèããªªééººèèÍÍÂÂ TTAAGG ÍÍ××èè¹¹ææ <<aarrttiiccllee>> ...... <<//aarrttiiccllee>> à»ç¹¤ÓÊÑè§ºÍ¡àÃÔèÁàÍ¡ÊÒÃ «Öè§¢³Ð¹Õéà¢éÒã¨ÇèÒãªéä´éà©¾ÒÐ article à·èÒ¹Ñé¹ ¢éÍ¤ÇÒÁ·ÕèÍÂÙèÃÐËÇèÒ§¹Õé¶×Íà»ç¹à¹×éÍËÒ¢Í§àÍ¡ÊÒÃ áÅÐ¤ÓÊÑè§·ÕèÍÂÙè¡èÍ¹Ë¹éÒ¹Õé¶×Íà»ç¹ preamble. <<aauutthhoorr>> ãªéÃÐºØª×èÍ¼Ùéà¢ÕÂ¹àÍ¡ÊÒÃ <<ddaattee>> ãªéÃÐºØÇÑ¹·Õè·Õèà¢ÕÂ¹àÍ¡ÊÒÃ <<aabbssttrraacctt>> ...... <<//aabbssttrraacctt>> à»ç¹ÊèÇ¹ÊÓËÃÑºà¢ÕÂ¹º·¤Ñ´ÂèÍ Í¸ÔºÒÂà¹×éÍËÒ¢Í§àÍ¡ÊÒÃ <<ttoocc>> ¤ÓÊÑè§ÊÃéÒ§ÊÒÃºÑ <<pp>> ãªéã¹¡ÒÃÂèÍË¹éÒ â´Â»Ã¡µÔáÅéÇ TAG ¹Õé¤ÇÃµÒÁËÅÑ§ <sect> à¾×èÍà»ç¹¡ÒÃºÍ¡ÇèÒ¾ÃéÍÁ·Õè¨Ðà¢ÕÂ¹à¹×éÍËÒËÅÑ§¨Ò¡»ÃÐ¡ÒÈËÑÇ¢éÍ. ¡ÒÃÂèÍË¹éÒÍÕ¡ÇÔ¸ÕË¹Öè§ÊÒÁÒÃ¶·Óä´éâ´Â¡ÒÃàÇé¹ºÃÃ·Ñ´ÇèÒ§Ë¹Öè§ºÃÃ·Ñ´«Öè§¨Ð¹ÔÂÁÁÒ¡¡ÇèÒãªé <p>. TAG ¹ÕéäÁè¨Óà»ç¹µéÍ§ÁÕµÑÇ»Ô´·éÒÂ. <<sseecctt>> à»ç¹¤ÓÂèÍ¢Í§ section ãªéÊÓËÃÑº¡Ó¡ÑºËÑÇ¢éÍ ã¹¡Ã³Õ¹Õé¨ÐáÊ´§µÑÇàÅ¢ËÑÇ¢éÍà»ç¹ 1, 2, 3, ... µÒÁÅÓ´Ñº <<sseecctt11>> ¤ÓÊÑè§»ÃÐ¡ÒÈËÑÇ¢éÍÂèÍÂ ãªé»ÃÐ¡ÒÈÀÒÂã¹ËÑÇ¢éÍËÅÑ¡. ã¹¡Ã³Õ¨ÐÁÕµÑÇàÅ¢à»ç¹ 1.1, 1.2, 1.3, ... à»ç¹µé¹. ËÑÇ¢éÍÂèÍÂ¶Ñ´¨Ò¡¹Õé¤×Í <sect2>, <sect3> áÅÐ <sect4> <<tttt>> ...... <<//tttt>> à»ç¹¤ÓÊÑè§à»ÅÕèÂ¹¿Í¹µìà»ç¹¿Í¹µì¾ÔÁ¾ì´Õ´(Type writer). ÁÑ¡ãªéã¹¡ÒÃà¢ÕÂ¹ª×èÍ¤ÓÊÑè§ à»ç¹µé¹ <<uurrll uurrll==""UURRLL"" nnaammee==""NNAAMMEE"">> ãªéãÊè URL ã¹à¹×éÍËÒ. ¶éÒá»Å§à»ç¹ HTML format, NAME ¨ÐÅÔ§¤ìä»ÂÑ§ URL ¹Ñé¹æ. ¶éÒà»ç¹ text ËÃ×Í LaTeX, ¨ÐáÊ´§´éÇÂª×èÍáÅéÇµÒÁ´éÇÂ·ÕèÍÂÙè URL. <<hhttmmlluurrll uurrll==""HHTTMMLL__UURRLL"" nnaammee==""NNAAMMEE"">> ãªéà¢ÕÂ¹ URL ¢Í§ HTML àªè¹ <htmlurl url="mailto:poon- v@fedu.uec.ac.jp" name="¾ÙÅÅÒÀ ÇÕÃÐ¸¹ÒºØµÃ" à»ç¹µé¹ <<llaabbeell iidd==""IIDD"">> ãªéã¹¡ÒÃàÅ×Í¡µÓáË¹è§ÍéÒ§ÍÔ§¢Í§àÍ¡ÊÒÃ. ¤ÓÊÑè§¹ÕéÁÑ¡ãªé¤Çº¤Ùè¡Ñº¡Ñº¤ÓÊÑè§ <ref id="ID" name="NAME"> <<rreeff iidd==""IIDD"" nnaammee==""NNAAMMEE"">> à»ç¹¤ÓÊÑè§ºÍ¡µÓáË¹è§ÍéÒ§ÍÔ§ã¹àÍ¡ÊÒÃ. ¶éÒà»ç¹ HTML format, ¨Ðà»ç¹¡ÒÃÅÔ§¤ì¡Ñ¹ÀÒÂã¹àÍ¡ÊÒÃ. ¶éÒà»ç¹ LaTeX format ¨Ðà»ç¹¡ÒÃºÍ¡µÓáË¹è§Ë¹éÒ·ÕèÍéÒ§ÍÔ§ à»ç¹µé¹. ¼ÙéãªéÊÒÁÒÃ¶ÍèÒ¹ÇÔ¸Õ¡ÒÃãªé¤ÓÊÑè§Í×è¹æä´é¨Ò¡ guide.sgml ·ÕèÁÒ¡Ñº SGML- tools. ¼ÙéãªéÊÒÁÒÃ¶à¢ÕÂ¹ÀÒÉÒä·Âã¹ä¿Åì SGML ä´éáµèäÁè¤ÇÃà¢ÕÂ¹ÀÒÉÒä·Âã¹ verb ËÃ×Í code environment «Öè§µéÍ§ËÒ·Ò§á¡éä¢¡Ñ¹µèÍä». 33.. ¡¡ÒÒÃÃããªªéé SSGGMMLL--ttoooollss ¼ÙéãªéÊÒÁÒÃ¶àªç¤äÇÂ¡Ã³ì·Õèà¢ÕÂ¹ã¹ä¿Åì SGML ä´éâ´Â % sgmlcheck foo.sgml ã¹·Õè¹Õé¨Ð¢Í¡ÅèÒÇ¶Ö§¡ÒÃá»Å§àÍ¡ÊÒÃÀÒÉÒä·Âáºº SGML ãËéà»ç¹àÍ¡ÊÒÃáººÍ×è¹æ à©¾ÒÐáºº Plain Text, HTML áÅÐ LaTeX à·èÒ¹Ñé¹. 33..11.. ¡¡ÒÒÃÃ¼¼ÅÅÔÔµµààÍÍ¡¡ÊÊÒÒÃÃÀÀÒÒÉÉÒÒää··ÂÂááºººº PPllaaiinn TTeexxtt ¼ÙéãªéÊÒÁÒÃ¶á»Å§àÍ¡ÊÒÃÀÒÉÒä·Âáºº SGML ·Õèà¢ÕÂ¹äÇéà»ç¹áºº Plain Text ä´é´éÇÂ¤ÓÊÑè§ % sgml2txt -c latin foo.sgml ¶éÒäÁèà¡Ô´¢éÍ¼Ô´¾ÅÒ´ã´æ ¼Ùéãªé¨Ðä´éä¿ÅìãËÁè·Õèª×èÍ foo.txt ã¹ä´àÃ¡·ÍÃÕè·Õè·Ó§Ò¹ÍÂÙè. 33..22.. ¡¡ÒÒÃÃ¼¼ÅÅÔÔµµààÍÍ¡¡ÊÊÒÒÃÃÀÀÒÒÉÉÒÒää··ÂÂááºººº HHTTMMLL ¼ÙéãªéÊÒÁÒÃ¶á»Å§àÍ¡ÊÒÃÀÒÉÒä·Âáºº SGML ·Õèà¢ÕÂ¹äÇéà»ç¹áºº HTML ä´é´éÇÂ¤ÓÊÑè§ % sgml2html foo.sgml ¶éÒäÁèà¡Ô´¢éÍ¼Ô´¾ÅÒ´ã´æ ¼Ùéãªé¨Ðä´éä¿ÅìãËÁè·Õèª×èÍ foo.html áÅÐ foo-1.html, foo-2.html, ... ã¹ä´àÃ¡·ÍÃÕè·Õè·Ó§Ò¹ÍÂÙè. «Öè§ SGML-tools ¨Ðáºè§à»ç¹ä¿ÅìÂèÍÂæµÒÁËÑÇ¢éÍ(section)·ÕèÃÐºØäÇé. ã¹·Õè¹Õé¼ÙéãªéäÁèµéÍ§ãÊè option -c latin, àÍ¡ÊÒÃ·Õè¼ÅÔµÍÍ¡ÁÒ¨Ðà»ç¹ÃËÑÊ 8-bit «Öè§µÃ§¡ÑºÃËÑÊ tis-620 ÀÒÉÒä·Â·ÕèãªéÍÂÙèº¹ÍÔ¹àµÍÃìà¹çµ·ÑèÇä». à¾×èÍ¤ÇÒÁÊÐ´Ç¡ã¹¡ÒÃãªé§Ò¹ÂÔè§¢Öé¹, ¼Ùéà¢ÕÂ¹ä´éà¢ÕÂ¹ Perl script ÊÓËÃÑºá»Å§àÍ¡ÊÒÃ HTML ·Õèà¢ÕÂ¹ã¹ÃÙ»¢Í§ &LATIN_CHAR_NAME; ãËéà»ç¹ÃËÑÊ tis-620 áÅÐÁÕ option ÊÑè§ãËéàÃÕÂ¡ cttex ÁÒµÑ´¤Óà¾×èÍ¤ÇÒÁÊÇÂ§ÒÁ´éÇÂ. ______________________________________________________________________ #!/usr/bin/perl ################################################################ # sgmlthtml: # Run sgml2html and convert latin symbols to Thai characters. # This program will change, for example, à to "\340". # # by Poonlap Veeratanabutr <poon-v@fedu.uec.ac.jp> # $Id: sgmlthtml,v 1.1 1998/09/28 06:51:52 poon-v Exp poon-v $ ################################################################ sub error { print STDERR "usage: $0 [-c] file.sgml\n"; print STDERR " -c , use cttex to fill <WBR>\n"; exit; } # command line processing. if( $#ARGV == -1 ){ &error; } elsif ( $#ARGV == 0 && $ARGV[0] ne "-c"){ $file = $ARGV[0]; $cut = 0; } elsif ( $#ARGV == 1 ){ if( $ARGV[0] eq "-c"){ $cut = 1; $file = $ARGV[1]; } elsif( $ARGV[1] eq "-c"){ $cut = 1; $file = $ARGV[0]; } else { &error; } } else { &error; } # run sgml2html if( system( "sgml2html $file" ) != 0 ){ exit; } # lookup table for what to change and not to change %lookuptbl = (quot, "quot",amp,"amp","lt","lt","gt","gt",copy,"\251",reg,"\256", micro,"\265",Agrave,"\300",Aacute,"\301",Acirc,"\302",Atilde,"\303", Auml,"\304",Aring,"\305",AElig,"\306",Ccedil,"\307",Egrave,"\310", Eacute,"\311",Ecirc,"\312",Euml,"\313",Igrave,"\314",Iacute,"\315", Icirc,"\316",Iduml,"\317",ETH,"\320",eth,"\320",Ntilde,"\321", Ograve,"\322",Oacute,"\323",Ocirc,"\324",Otilde,"\325",Ouml,"\326", Oslash,"\330",Ugrave,"\331",Uacute,"\332",THORN,"THORNÞ",Thorn,"Thron", szlig,"\337",agrave,"\340",aacute,"\341",acirc,"\342",atilde,"\343", auml,"\344",aring,"\345",aelig,"\346",ccedil,"\347",egrave,"\350", eacute,"\351",ecirc,"\352",euml,"\353",igrave,"\354",iacute,"\355", icirc,"\356",iuml,"\357",eth,"\360",ntilde,"\361",ograve,"\362", oacute,"\363",ocirc,"\364",otilde,"\365",ouml,"\366",oslash,"\370", ugrave,"\371",uacute,"\372",ucirc,"\373",uuml,"uuml",yacute,"yacute", yuml,"yuml"); # separate directory and file name from the given file name if( $file =~ /(.*)[\/](.+)$/ ){ $dir = $1; $file = $2; } $file =~ s/(.+)\.sgml/$1/; # get rootname if( length( $dir ) == 0 ){ opendir( DIR, "."); } else { opendir( DIR, "$dir" ); } @html = grep {/$file.*\.html$/} readdir( DIR ); # get all related html files closedir( DIR ); foreach $html_file (@html) { print "Processing file $html_file\n"; open( INPUT, "$html_file"); open( OUTPUT,">$html_file.tmp" ); while( <INPUT> ){ $line = $_; $beg = index( $line, "&"); $end = index( $line, ";"); while( $beg >= 0 && $end > $beg ){ $target = substr( $line, $beg+1, $end-$beg-1); $thai = $lookuptbl{ $target }; if( $target eq $thai ){ $line = sprintf( "%s%s%s", substr( $line, 0, $beg), '&' . $thai . ';', substr( $line, $end+1 )); } else { $line = sprintf( "%s%s%s", substr( $line, 0, $beg), $thai, substr( $line, $end+1 )); } $beg = index( $line, "&", $beg+1); $end = index( $line, ";", $beg); } print OUTPUT "$line"; } close( INPUT ); close( OUTPUT ); if( $cut == 1 ){ system( "cttex 0 < $html_file.tmp > $html_file" ); system( "rm -f $html_file.tmp" ); } else { rename( "$html_file.tmp", "$html_file"); } } # EOF ______________________________________________________________________ ¼ÙéãªéÊÒÁÒÃ¶àÃÕÂ¡¤ÓÊÑè§ sgmlthtml á·¹ sgml2html ÊÓËÃÑºàÍ¡ÊÒÃ SGML ·ÕèÁÕÀÒÉÒä·Âä´é´Ñ§¹Õé % sgmlthtml foo.sgml -c ¨Ò¡µÑÇÍÂèÒ§´Ñ§¡ÅèÒÇ, sgmlthtml ¨ÐàÃÕÂ¡¤ÓÊÑè§ sgml2html «Öè§¨Ð¼ÅÔµä¿Åìáºº HTML ËÅÒÂä¿Åì. ¨Ò¡¹Ñé¹â»Ãá¡ÃÁ sgmlthtml ¨Ð¾ÂÒÂÒÁà»ÅÕèÂ¹ &LATIN_CHAR_NAME; ãËéà»ç¹ÃËÑÊ tis-620 (¶éÒÁÕ, â´Â»Ã¡µÔ sgml2html ¨Ð¼ÅÔµä¿Åì·Õèà¼ÍÔµÃ§µÒÁ tis-620 ÍÂÙèáÅéÇ) áÅÐàÃÕÂ¡ cttex ÁÒµÑ´¤Ó(·Ø¡ä¿Åì·Õèà¡ÕèÂÇ¢éÍ§¡Ñº foo.sgml) ãËé¡ÒÃáÊ´§¼Åº¹ browser ÊÇÂ§ÒÁ¢Öé¹. ¡ÒÃ·Õè¨Ðãªé¤ÓÊÑè§¹Õé, ¼ÙéãªéµéÍ§ÁÕâ»Ãá¡ÃÁ cttex ÍÂÙèã¹ÃÐºº´éÇÂ. ËÒ¡äÁèµéÍ§¡ÒÃãËé cttex µÑ´¤Ó, äÁèµéÍ§ãÊè option -c ´Ñ§µÑÇÍÂèÒ§ % sgmlthtml foo.sgml 33..33.. ¡¡ÒÒÃÃ¼¼ÅÅÔÔµµààÍÍ¡¡ÊÊÒÒÃÃÀÀÒÒÉÉÒÒää··ÂÂááºººº LLaaTTeeXX ¼ÙéãªéµéÍ§ÁÕªØ´â»Ãá¡ÃÁ LaTeX áÅÐµÔ´µÑé§ÀÒÉÒä·ÂàÃÕÂºÃéÍÂáÅéÇ¨Ö§¨ÐÊÒÁÒÃ¶á»Å§àÍ¡ÊÒÃ¨Ò¡ SGML à»ç¹ LaTeX ä´é. ¡ÒÃµÔ´µÑé§ÀÒÉÒä·Âã¹ LaTeX ÊÒÁÒÃ¶ÍèÒ¹ä´é¨Ò¡àÍ¡ÊÒÃ "¡ÒÃãªéÀÒÉÒä·Â¡Ñº LaTeX <http://www.fedu.uec.ac.jp/ZzzThai/Linux/thailatex/thailatex>". ¼ÙéãªéÊÒÁÒÃ¶¼ÅÔµàÍ¡ÊÒÃ LaTeX(.tex) ·ÕèÁÕÀÒÉÒä·Â¨Ò¡àÍ¡ÊÒÃáºº SGML ä´éâ´Â¤ÓÊÑè§ % sgml2latex --output=tex foo.sgml ¨Ò¡¤ÓÊÑè§¢éÒ§º¹ sgml2latex ¨ÐÊÃéÒ§ä¿Åì foo.tex ã¹ä´àÃ¡·ÍÃÕè·Õè·Ó§Ò¹ÍÂÙè. ¼ÙéãªéÂÑ§äÁèÊÒÁÒÃ¶¹Óä¿Åì¹Õéä»ãªé¡Ñº LaTeX ä´éâ´ÂµÃ§, ¨ÐµéÍ§á¡éÊèÇ¹ preamble ¢Í§ä¿Åì¹ÕéàÅç¡¹éÍÂ¡èÍ¹¹Óä»ãªé¡Ñº cttex áÅÐ latex µèÍä». ¼ÙéãªéµéÍ§ÅººÃÃ·Ñ´µèÍä»¹ÕéÍÍ¡¨Ò¡ preamble ¢Í§ä¿Åì foo.tex \usepackage[latin1]{inputenc} \usepackage{t1enc} \usepackage{babel} áÅÐãÊèºÃÃ·Ñ´µèÍä»¹Õéá·¹Å§ä»á·¹ \usepackage{thai} ¨Ò¡¹Ñé¹¨Ö§ÊÑè§¤ÓÊÑè§ cttex áÅÐ latex µÒÁÅÓ´Ñº´Ñ§µÑÇÍÂèÒ§ % cttex < foo.tex > foo_ok.tex % latex foo_ok.tex ¨ÐàËç¹ä´éÇèÒà¹×èÍ§¨Ò¡ SGML-tools äÁèä´é¼ÅÔµÁÒà¾×èÍãªé¡ÑºÀÒÉÒä·Ââ´Âà©¾ÒÐ¨Ö§ãªéÂØè§ÂÒ¡. ¼Ùéà¢ÕÂ¹¾ÂÒÂÒÁÅ´¢Ñé¹µÍ¹àËÅèÒ¹Õéâ´Âà¢ÕÂ¹ Perl script ª×èÍ sgmltlatex ·ÓË¹éÒ·ÕèµèÒ§æàËÅèÒ¹Õéâ´ÂÍÑµâ¹ÁÑµÔ. ______________________________________________________________________ #!/usr/bin/perl ############################################################################### # sgmltlatex: # Processing SGML or LaTeX file for Thai language. # # # by Poonlap Veeratanabutr <poon-v@fedu.uec.ac.jp> # $Id: sgmltools.sgml,v 1.1 1998/09/28 11:26:44 poon-v Exp poon-v $ ############################################################################### sub error { print STDERR "$0 - Processing SGML or LaTeX file for Thai language.\n"; print STDERR "usage: $0 [-[t|d|p] sgml_file] [-l latex_file] \n"; print STDERR " -t , create latex_file file from sgml_file\n"; print STDERR " -d , create dvi file from sgml_file and leave latex_file\n"; print STDERR " -p , create Postscript file and leave latex_file\n"; print STDERR " -l , run latex on latex_file\n"; exit( -1 ); } # command line processing if( $#ARGV != 1 ){ &error; } elsif ( $ARGV[0] eq "-l" ){ $option = "l"; } elsif ( $ARGV[0] eq "-t" ){ $option = "t"; } elsif ( $ARGV[0] eq "-d" ){ $option = "d"; } elsif ( $ARGV[0] eq "-p" ){ $option = "p"; } else { &error; } $file = $ARGV[1]; $tempfile = "$file" . ".tmp"; if( $option ne "l" ){ if( system( "sgml2latex --output=tex $file" ) != 0 ){ exit( -1 ); } # separate directory and file name from the given file name if( $file =~ /(.*)[\/](.+)$/ ){ $dir = $1; $file = $2; } if( $file =~ m/(.+)\.sgml$/ ){ $rootname = "$1"; } else { $rootname = $file; } $file = $rootname . ".tex"; print "Processing file $file\n"; open( INPUT, "$file" ); open( OUTPUT, ">" . "$tempfile" ); $preamble = 1; while( <INPUT> ){ if( $preamble == 1 ){ if( /^\\begin\s*{\s*document\s*}\s*$/ ){ print OUTPUT "\\usepackage{thai}\n"; $preamble = 0; break; } s/^\\usepackage.*{\s*inputenc.*}\n//; s/^\\usepackage.*{\s*babel.*}\n//; s/^\\usepackage.*{\s*t1enc.*}\n//; print OUTPUT; } else { print OUTPUT; } } close( INPUT ); close( OUTPUT ); } else { unless( $file =~ m/(.+)\.tex$/ ){ print STDERR "$0 needs .tex file\n"; &error; } rename( "$file", "$tempfile" ); } if( $option eq "t" ){ rename( "$tempfile", "$file" ); exit( 0 ); } else { system( "cttex < $tempfile > $file" ); system( "latex $file" ); rename( "$tempfile", "$file" ); } if( $option eq "p" ){ $psfile = "$rootname" . ".ps"; $dvifile = "$rootname" . ".dvi"; system( "dvips -o $psfile $dvifile" ); } exit( 0 ); #EOF ______________________________________________________________________ ¼ÙéãªéÊÒÁÒÃ¶àÃÕÂ¡¤ÓÊÑè§ sgmltlatex á·¹ sgml2latex ÊÓËÃÑºàÍ¡ÊÒÃ SGML ·ÕèÁÕÀÒÉÒä·Â. ¶éÒµéÍ§¡ÒÃ¼ÅÔµàÍ¡ÊÒÃáºº .dvi, % sgmltlatex -d foo.sgml ËÒ¡äÁèÁÕ¢éÍ¼Ô´¾ÅÒ´à¡Ô´¢Öé¹, ¨Ðä´é foo.dvi ã¹ä´àÃ¡·ÍÃÕè·Õè·Ó§Ò¹ÍÂÙè. ¶éÒµéÍ§¡ÒÃ¼ÅÔµä¿Åìáºº Postscript ãËéÊÑè§¤ÓÊÑè§ % sgmltlatex -p foo.sgml ËÃ×Í¶éÒµéÍ§¡ÒÃ¼ÅÔµàÍ¡ÊÒÃáºº LaTeX (.tex) ãËéãªé¤ÓÊÑè§ % sgmltlatex -t foo.sgml ã¹¡Ã³Õ·Õèãªé option "d" ËÃ×Í "p" ËÃ×Í "t" ¨Ðä´éä¿Åìáºº LaTeX (.tex) ´éÇÂ. ¼ÙéãªéÊÒÁÒÃ¶á¡éä¢à¹×éÍËÒã¹ foo.tex áÅéÇÊÑè§¤ÓÊÑè§´Ñ§¹Õé % sgmltlatex -l foo.tex ¤ÓÊÑè§¹Õé¨ÐàÃÕÂ¡ cttex ÁÒµÑ´¤ÓáÅÐÊè§µèÍãËé latex ¨Ñ´¡ÒÃ. ËÅÑ§¨Ò¡¹Ñé¹ sgmltlatex ¨ÐºÑ¹·Ö¡ä¿Åì foo.tex ã¹ÃÙ»·Õè¼ÙéãªéÊÒÁÒÃ¶á¡éä¢ä´éÍÕ¡. «Öè§ËÁÒÂ¤ÇÒÁÇèÒ¼ÙéãªéäÁèÁÕ¤ÇÒÁ¨Óà»ç¹µéÍ§ÊÑè§ cttex áÅÐ latex ¾ÃéÍÁ¡Ñ¹ÍÕ¡. à¹×èÍ§¨Ò¡àÍ¡ÊÒÃáºº LaTeX ·Õè¼ÅÔµâ´Â SGML-tools µéÍ§¡ÒÃ linuxdoc- sgml.sty, qwertz.sty, url.sty, epsfig.sty áÅÐ null.sty ã¹¡ÒÃ¼ÅÔµä¿Åì .dvi ¼ÙéãªéµéÍ§ configure â»Ãá¡ÃÁ latex ãËéÃÙéÇèÒä¿ÅìàËÅèÒ¹ÕéÍÂÙè·ÕèäË¹´éÇÂ. ÇÔ¸Õ·Õè§èÒÂ·ÕèÊØ´¤×Í¡çÍ»»Õéä¿ÅìàËÅèÒ¹Õé«Öè§ã¹¡Ã³Õ¢Í§¼Ùéà¢ÕÂ¹¨ÐÍÂÙèãµéä´àÃ¡·ÍÃÕè /usr/local/lib/sgml-tools/ ÁÒäÇé·Õèä´àÃ¡·ÍÃÕè·ÕèÁÕä¿Åì .tex ÍÂÙèËÃ×Í·Ó symbolic link ¡çä´é. 44.. ºº··ÊÊÃÃØØ»» ¡ÒÃà¢ÕÂ¹àÍ¡ÊÒÃ HOWTO ´éÇÂÀÒÉÒ SGML áÅÐãªé SGML-tools ã¹¡ÒÃá»Å§à»ç¹àÍ¡ÊÒÃÃÙ»áººÍ×è¹æ ·ÓãËé¡ÒÃà¢ÕÂ¹àÍ¡ÊÒÃÁÕÃÐººÃÐàºÕÂº¡ÇèÒ¡ÒÃà¢ÕÂ¹àÍ¡ÊÒÃÃÙ»áººÍ×è¹æ. ÊÐ´Ç¡ã¹¡ÒÃá¡éä¢àÍ¡ÊÒÃà¾ÃÒÐÊÒÁÒÃ¶á¡é¨Ò¡ä¿Åì SGML à´ÕÂÇ¡çÊÒÁÒÃ¶á¡éàÍ¡ÊÒÃÃÙ»áººÍ×è¹æä´é´éÇÂ. ¶éÒËÒ¡ÁÕàÍ¡ÊÒÃ¨Ó¹Ç¹ÁÒ¡, ÂÑ§ÊÒÁÒÃ¶µÕ¾ÔÁ¾ìà»ç¹Ë¹Ñ§Ê×Íä´é§èÒÂâ´Âãªé LaTeX ¨Ñ´¡ÒÃä¿ÅìµèÒ§æ «Öè§Ë¹Ñ§Ê×Íà¡ÕèÂÇ¡Ñº HOWTO ¢Í§ Linux ¡çãªéÇÔ¸Õ¹Õéã¹¡ÒÃ¾ÔÁ¾ìà»ç¹Ë¹Ñ§Ê×Í¢ÒÂ. ¡ÒÃãªéÀÒÉÒä·Â¾Í¨Ð·Óä´éã¹ÃÐ´ÑºË¹Öè§áÅÐµéÍ§¡ÒÃ¡ÒÃ¾Ñ²¹ÒµèÍä». 55.. ááËËÅÅèè§§¢¢ééÍÍÁÁÙÙÅÅàà¾¾ÔÔèèÁÁààµµÔÔÁÁ · SGML-tools Homepage <http://www.sgmltools.org> · ¡ÒÃãªéÀÒÉÒä·Â¡Ñº LaTeX <http://www.fedu.uec.ac.jp/ZzzThai/Linux/thailatex/> · guide.sgml áÅÐ example.sgml «Öè§ÁÒ¡Ñº SGML-tools