in reply to change files names bug
my @RegExp = /^([A-Za-z]{2}\d{2,})\s+(.*)$/g; [download]
Yep I am sure the space between columns is tab, in fact when you print $id or $barcode you get the right strings inclusive if you print them just before the rename command