Help for this page

Select Code to Download


  1. or download this
    my $found_any = 0;
    ...
    ...
    # (repeat for search_none)
    
    print "No files found!\n" unless $found_any;
    
  2. or download this
    if ($found_any) {
       print "$found_any files deleted.\n";
    } else {
       print "No files were found to delete.\n";
    }