# Strip the mbox and id, assuming the file contains mbox:id
  my($mbox,$id)=split(',',$_);