comment on

Greetings..I've been trying to get back into using perl, which just means I have more and more questions. I have been trying to use the PDF::API to create some pdfs from some text files. I know there are some converters already outthere, but I would like to just do it myself. This is what I have so far. It's not pretty I know....

#!/usr/bin/perl -w
use strict;
use PDF::API2;

my $counter=0;
my @line;
my $line;
my @files;
my $files;
my $xc=10;
my $yc=780;

my $pdf  = PDF::API2->new(-file => "test.pdf");
              
my $page = $pdf->page;
my $fnt = $pdf->corefont('Arial',-encode => 'latin1'); 
my $txt = $page->hybrid;

$page->mediabox('LETTER');
$txt->textstart;
$txt->font($fnt, 10);

my $startdir="x:\\omni\\omni\\surgpref\\";

chdir($startdir);
@files = <*.eal>;  #.eal are just .txt files, I actually many differen
+t extensions, that just designate different people.

while ($files[$counter] ne "") {
    print("Encoding $files[$counter] to PDF format\n");
    open(INFILE, "$startdir/$files[$counter]");
    $line=<INFILE>;
    while($line ne "") {
        $txt->translate($xc,$yc);
        $yc-=10;
        
        if($yc==0){
                $pdf->page();
                $yc=780;
        }
        $txt->text($line);
        $counter++;
        $line=<INFILE>;
    }
}
$txt->textend;
$pdf->save;
$pdf->end( );
[download]

My problem is this(as far as I know the only one I have so far) after I have created a new page, the text just continues to be written on the first page. What am I missing? I have looked at multiple tutorials and have tried to understand the documentation, but I'm still not understanding how to switch to the next page to begin writing to it... Thanks in advance for you assistance. Bentov

In reply to PDF::API2 is confusing me to death.. by Bentov

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


Come for the quick hacks, stay for the epiphanies.
	PerlMonks