Foro - Perl en Español

por **tolyn** » 2013-11-29 10:38 @485

Sres., estoy generando un anexo técnico en formato Word pero necesito insertar unas imágenes y no me funciona tal como sale en http://search.cpan.org/~dami/MsOffice-Word-HTML-Writer-1.01/lib/MsOffice/Word/HTML/Writer.pm.

Si alguien lo ha hecho, ¡¡¡ favor orientenme !!!

Saludos.

  use MsOffice::Word::HTML::Writer;
  my $doc = MsOffice::Word::HTML::Writer->new(
    title        => "My new doc",
    WordDocument => {View => 'Print'},
  );
  
  $doc->write("<p>hello, world</p>", 
              $doc->page_break, 
              "<p>hello from another page</p>");
  
  $doc->create_section(
    page => {size   => "21.0cm 29.7cm",
             margin => "1.2cm 2.4cm 2.3cm 2.4cm"},
    header => sprintf("Section 2, page %s of %s", 
                                  $doc->field('PAGE'), 
                                  $doc->field('NUMPAGES')),
    footer => sprintf("printed at %s", 
                                  $doc->field('PRINTDATE')),
    new_page => 1, # or 'left', or 'right'
  );
  $doc->write("this is the second section, look at header/footer");
  
 
  $doc->attach("my_image.gif", $path_to_my_image);
  $doc->write("<img src='files/my_image.gif'>");
  
  $doc->save_as("nombre_documento");
Coloreado en 0.004 segundos,  usando GeSHi 1.0.8.4

Lo ejecuto: ./print_word.pl

y me sale un error en la consola:

Name "main::path_to_my_image" used only once: possible typo at ./print_word.pl line 26.
Use of uninitialized value $open1 in open at /usr/lib/perl5/site_perl/5.10.1/MsOffice/Word/HTML/Writer.pm line 100.
Use of uninitialized value $open1 in concatenation (.) or string at /usr/lib/perl5/site_perl/5.10.1/MsOffice/Word/HTML/Writer.pm line 100.
open : No such file or directory at ./print_word.pl line 26

Omito la línea que está en negrita y genera el doc pero sin la imagen...

Saludos.

por **explorer** » 2013-11-29 15:17 @679

El mensaje de error dice que la variable $path_to_my_image es nueva para Perl, y no sabe de dónde viene. Eso quiere decir que a esa variable no se le ha dado ningún valor en ningún sitio.

El ejemplo que has copiado, desde el manual de la biblioteca, es solo eso: un ejemplo. Funciona, pero no del todo porque el autor espera que tú hayas le hayas puesto algún valor a esa variable (y así la biblioteca sabe dónde está la imagen a insertar).

por **tolyn** » 2013-12-05 10:16 @469

explorer... he logrado insertar una imagen a un word... ¡¡¡genial!!!

Efectivamente, la variable no tenía valor... y hacía referencia a la ruta de la imagen...

Muestro un ejemplo:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

#!/usr/bin/perl -w
use MsOffice::Word::HTML::Writer;
my $doc = MsOffice::Word::HTML::Writer->new(
    title        => "Perl En Español",
    WordDocument => {View => 'Print'},
  );
 
$doc->write("<p>http:\//www.perlenespanol.com/foro/imagen-en-word-t8403.html</p>");
 
$doc->attach("logo.jpg", "./img_gif/logo.JPG");
$doc->write("<img src='files/logo.jpg'>");
 
$doc->save_as("Word_Con_Imagen");
 
Coloreado en 0.002 segundos,  usando GeSHi 1.0.8.4

Tiene que copiar este código, guardarlo en un .pl, luego crean un carpeta en donde está el .pl llamada "img_gif" y ahí insertan una imagen JPG o jpg. ¡Ojo!, que el recortador de Windows 7 guarda las imágenes con su extensión con mayúscula.

¡¡¡Gracias, explorer!!!

Saludos...

por **tolyn** » 2013-12-06 10:42 @487

Sres., ahora estoy en otro dilema. Necesito darle la propiedad "detrás del texto" ya que necesito insertar una imagen en el header del documento lo cual ya puedo hacer pero ésta me baja el texto del documento...

Si alguien tiene alguna idea, favor avíseme...

slds..

por **explorer** » 2013-12-06 20:49 @909

¿Eso se puede hacer en un documento HTML en Word? Como no sea dentro de una capa <div>, no conozco otra manera... o que Mocro$oft se haya inventado otro estándar HTML para conseguirlo, que es típico de ellos.

Foro - Perl en Español

Imagen en Word

Imagen en Word

Publicidad

Re: Imagen en Word

Re: Imagen en Word

Re: Imagen en Word

Re: Imagen en Word

Re: Imagen en Word

Re: Imagen en Word

¿Quién está conectado?