![[BACK]](/icons/back.gif){kind=icon}
Return to printout.pl CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to printout.pl CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.85, 2005/07/22 11:42:50 | version 1.86, 2005/07/25 10:27:51 |
|---|---|
| Line 262 END | Line 262 END |
| @texfile=(); | @texfile=(); |
| for (my $i=1;$i<=$number_of_files;$i++) { | for (my $i=1;$i<=$number_of_files;$i++) { |
| my $new_texfile=$texfile; | my $new_texfile=$texfile; |
| $new_texfile=~s/\.tex/_$i\.tex/; | $new_texfile=~s/\.tex//; |
| $new_texfile = sprintf("%s_%03d.tex", $new_texfile,$i); | |
| print "<BR>Produced file: $new_texfile"; | |
| push @texfile,$new_texfile; | push @texfile,$new_texfile; |
| } | } |
| } | } |