update with perl