Re^3: create array of empty files and then match filenames

I wish I had seen this earlier! I tried "and" but I got compilation errors (again one more mistake lol) so in the end I did this:

use List::Util qw( min max );

my @numbers;
@numbers = grep { /^\d+$/ } grep { -f } glob '*';

my $max = max@numbers;
my $previous = ($max)-1;

foreach (@numbers) {

  if (-z "$max") {

    if (-z "$previous") {
  
    print "previous conf: $previous \n";
    print "Latest conf: $max \n";
    printf "Ready for conf %d \n",++$max;
 
  }
 }
}
[download]

Now I need to think about "else" messages/actions. Sorry, I changed my array name halfway through the thread, I just used directly the "@numbers" example from List::Util that I found at stack overflow

Comment on Re^3: create array of empty files and then match filenames Download Code

Replies are listed 'Best First'.
Re^4: create array of empty files and then match filenames by poj (Abbot) on Jan 07, 2016 at 18:43 UTC
Do you need a `foreach loop ?`. You are checking the same value of `$previous` regardless of the loop variable `$_` poj	[reply] [d/l] [select]