13:09 >perl -wE "my $s = 'EVO:001 xyz345 EVO:456'; $s =~ s/(EVO:)(\d+)/$1.++($_=$2)/eg; say $s;"
EVO:002 xyz345 EVO:457

13:13 >