- if ($key =~ m/^fcb([0-9]+)_([0-9]+)_([0-9]+)$/gi) {
-
- my ($host_id, $backup_num, $backup_id) = ($1,$2,$3);
- push @selected_backup_ids, $backup_id;
- my $currSize = BackupPC::Search::getGzipSizeFromBackupID($backup_id);
- my $sth_size = $dbh->prepare(q{select inc_size from backups where id = ?});
- $sth_size -> execute( $backup_id );
- my $db_size = $sth_size->fetchrow_hashref()->{inc_size};
-
- if ($db_size != $currSize) {
- $cont .= "NOT EQUAL!: [fs_size:$currSize, db_size:$db_size, backup_id:$backup_id] <br />";
- }
-
- if ($currSize > 0) {
- $total_size += $currSize;
- }
- $selected++;
-
- my ($this_part) = $dbh->selectrow_array("select parts from backups where id = ?", undef, $backup_id);
- $this_part--;
- $parts += $this_part;
- }
+ next unless $key =~ m/^fcb(\d+)/;
+ push @selected_backup_parts, $1;