4 char evalstr[]="Plugin for creating html tables from images";
7 fname - file to add the html to.
21 if ( !getSTR("fname",&fname) ) { fprintf(stderr,"Error: filename is missing\n"); return; }
22 if ( !getOBJ("image","Imager::ImgRaw",&im) ) { fprintf(stderr,"Error: image is missing\n"); return; }
24 printf("parameters: (im 0x%p,fname %s)\n",im,fname);
26 printf("image info:\n size (%d,%d)\n channels (%d)\n",
27 im->xsize,im->ysize,im->channels);
29 fp=fopen(fname,"ab+");
30 fprintf(fp,"<TABLE BORDER=\"0\" CELLPADDING=\"0\" CELLSPACING=\"0\">");
31 for(y=0;y<im->ysize;y+=2) {
33 for(x=0;x<im->xsize;x++) {
34 i_gpix(im,x,y,&rcolor);
35 fprintf(fp,"<TD BGCOLOR=\"#%02X%02X%02X\"> </TD>",rcolor.rgb.r,rcolor.rgb.g,rcolor.rgb.b);
39 fprintf(fp,"</TABLE>");
43 func_ptr function_list[]={
47 "callseq => ['image','fname'], \
48 callsub => sub { my %hsh=@_; DSO_call($DSO_handle,0,\\%hsh); } \
54 /* Remember to double backslash backslashes within Double quotes in C */