Select Code to Download

$id = $1  if $key =~ /^(copy_\d_frag_\d_id)$/;

$status{$client}{'tapes'}{$id} = 1;