Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

Re^3: incrementing the file

by oko1 (Deacon)
on Feb 22, 2012 at 05:02 UTC ( #955451=note: print w/replies, xml ) Need Help??

in reply to Re^2: incrementing the file
in thread incrementing the file

You can try starting with a "templated" filename and increment it until you get past all the existing files:

my $fn = "output000"; $fn++ while -e $fn;

At that point, you'll have a filename that is just past the last one of that pattern. Minor caveat: make sure you have enough zeroes at the end of the template - or you'll start incrementing the characters. Yes, really.

ben@feynman:~$ perl -wle'$number = "one"; $number++ for 1..3624; print + $number' two


I hate storms, but calms undermine my spirits.
 -- Bernard Moitessier, "The Long Way"

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://955451]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (2)
As of 2018-01-18 04:47 GMT
Find Nodes?
    Voting Booth?
    How did you see in the new year?

    Results (206 votes). Check out past polls.