my $Name = '[A';
my $SearchInHere = 'FredJimBert';
if (-1 != index $SearchInHere, $Name)
{
  DoSomething();
}