Return to printout.pl CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.86, 2005/07/25 10:27:51 | version 1.87, 2005/07/25 10:43:29 |
---|---|
Line 264 END | Line 264 END |
my $new_texfile=$texfile; | my $new_texfile=$texfile; |
$new_texfile=~s/\.tex//; | $new_texfile=~s/\.tex//; |
$new_texfile = sprintf("%s_%03d.tex", $new_texfile,$i); | $new_texfile = sprintf("%s_%03d.tex", $new_texfile,$i); |
print "<BR>Produced file: $new_texfile"; | |
push @texfile,$new_texfile; | push @texfile,$new_texfile; |
} | } |
} | } |