ODF :: LPOD. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Jean-Marie Gouarne
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~jmgdoc/
ODF :: LPOD. ű×
ODF :: LPOD. ¼³¸í
OpenDocument °ü¸® ÀÎÅÍÆäÀ̽º ODF :: LPOD´Â ¿¸° ¹®¼ °ü¸® ÀÎÅÍÆäÀ̽º ÀÎ Perl ¸ðµâÀÔ´Ï´Ù. À̸¦ ÅëÇØ »ç¿ëÀÚ´Â Office ¹®¼¸¦ ¸¸µé°Å³ª º¯È¯Çϰųª µ¥ÀÌÅ͸¦ ÃßÃâ ÇÒ ¼ö ÀÖ½À´Ï´Ù. ODF (Open Document Format International Standard)¸¦ ÁؼöÇÏ´Â ¹®¼¸¦ ó¸® ÇÒ ¼ö ÀÖ½À´Ï´Ù. ÅؽºÆ® ¹®¼ (ODT), ½ºÇÁ·¹µå ½ÃÆ® ¹®¼ (ODS), ÇÁ·¹Á¨Å×ÀÌ¼Ç (ODP) ¶Ç´Â µå·ÎÀ× ¹®¼ (ODG)¸¦ ó¸® ÇÒ ¼ö ÀÖ½À´Ï´Ù. ½Ä ³ëÇÁ odf :: lpod : my $ document = odf_document-> get ( "report.odt" ); ³» $ meta = $ Document-> get_part (¸ÞŸ); $ meta-> set_title ( "ÃÖ»óÀÇ ¹®¼ Çü½Ä"); ³» $ Content = $ Document-> get_part (ÄÜÅÙÃ÷); ³» $ context = $ content-> get_body; ³» $ ´Ü¶ô = $ context-> get_paragraph (content => "³ª´Â ±×°ÍÀ» ã½À´Ï´Ù"); $ ´Ü¶ô -> set_text ( "³ª´Â ±×°ÍÀ» ¹ß°ß"); $ ´Ü¶ô> set_style ( "Ź»ó"); MY $ NEW_PARAGW = ODF_PARAGW -> CREATE (Style => "Ç¥ÁØ", ÅؽºÆ® => "»õ ÄÜÅÙÃ÷"); $ context-> append_element ($ new_paraph); ³» $ table = odf_table-> create ( "ÁÖ ¼öÄ¡", ³ôÀÌ => 20, ³Êºñ => 16); $ context-> insert_Element ($ table, before => $ ´Ü¶ô); ³» $ ¼¿ = $ table-> get_cell ( "b4"); $ cell-> set_text (¿©±â¼ b4 "); $ ¹®¼ -> ÀúÀå; Ãⱸ; ¿ä±¸ »çÇ× : ¡¤ Perl.
ODF :: LPOD. °ü·Ã ¼ÒÇÁÆ®¿þ¾î