#!/usr/bin/perl -p -i
# s/(xyz\s*=\s*)(\d+)/$1.($2+1)/e;

/xyz/?s/(\d+)/$1+1/e:1;