X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=bin%2FBackupPC_nightly;h=984c673d975f1623796e851ab914892f19afc94a;hp=9dbdb2d0add38e0d967831d033460568bd94d276;hb=f6fbcc3682d2bc9e7dfdc26e95bd5fcdb359496d;hpb=82ffaa1c4130a34812fb241c2ea5cd3d0608bdab diff --git a/bin/BackupPC_nightly b/bin/BackupPC_nightly index 9dbdb2d..984c673 100755 --- a/bin/BackupPC_nightly +++ b/bin/BackupPC_nightly @@ -1,4 +1,4 @@ -#!/bin/perl +#!/usr/bin/perl #============================================================= -*-perl-*- # # BackupPC_nightly: Nightly cleanup & statistics script. @@ -55,7 +55,7 @@ # #======================================================================== # -# Version 3.1.0beta0, released 3 Sep 2007. +# Version 3.2.0beta0, released 5 April 2009. # # See http://backuppc.sourceforge.net. # @@ -297,7 +297,7 @@ sub GetPoolStats $fullPath =~ s/_\d+$//; $FixList{$fullPath}++; } else { - if ( /_(\d+)$/ ) { + if ( $file =~ /_(\d+)$/ ) { $fileRepMax = $1 + 1 if ( $fileRepMax <= $1 ); $fileCntRep++; }