my $String="1234A4321";
my $RegEx="/a/i";