Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Re: printing multiple pages

by choroba (Canon)
on Jan 05, 2014 at 11:07 UTC ( #1069385=note: print w/ replies, xml ) Need Help??


in reply to printing multiple pages

Print the feed character before every page except the first one:

my $first = 1; until (0 == int rand 10) { # The number of pages is unknown in advanc +e. print "\f" if ! $first; undef $first; print "page...\n"; }
لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ


Comment on Re: printing multiple pages
Download Code
Re^2: printing multiple pages
by hvn52 (Initiate) on Jan 06, 2014 at 15:17 UTC
    Thank for your response. What use is it to print it before every page ?
      Before every page except the first one is the same as after each page except the last one, which is what I understood you had requested.
      لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1069385]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (6)
As of 2015-07-06 07:34 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (70 votes), past polls