diff -ruN e-smith-backup-2.2.0.old/root/etc/e-smith/web/functions/backup e-smith-backup-2.2.0/root/etc/e-smith/web/functions/backup --- e-smith-backup-2.2.0.old/root/etc/e-smith/web/functions/backup 2013-12-11 20:44:17.000000000 -0800 +++ e-smith-backup-2.2.0/root/etc/e-smith/web/functions/backup 2013-12-11 21:27:35.000000000 -0800 @@ -2776,6 +2776,7 @@ my $regex = qr/\[.*\] */; while () { + $_ =~ s/[\r\n]+//g; # remove line endings $_ =~ s/$regex//; if ($filterexp) {next unless m/$rgfilter/}; push @flabels, $_; @@ -2886,10 +2887,9 @@ return; } - my $restorefiles = $q->param ('restorefiles'); - $restorefiles =~ s/\r//; + my @restorefiles = $q->param ('restorefiles'); my $f; - foreach $f ($restorefiles) + foreach $f (@restorefiles) { if ($f =~ /^(.*)$/) {