Remove parenthesis character (Perl)

Hello, i'm unable to remove the parenthesis character.

With $parsed_AsciiName =~ s/\(//;
the string is the same

And with $parsed_AsciiName =~ s/(//;
i retrieve "Unmatched ( in regex; marked by <-- HERE in m/( <-- HERE"

Any ideas, please? thank you in advanced.

How is this not working for you?

$ cat ./paren.perl
#!/usr/bin/perl

use strict;
use warnings;

my $parsed_AsciiName = "Today( is October 28, 2008.";

print "parsed_AsciiName Before = $parsed_AsciiName \n";
$parsed_AsciiName =~ s/\(//;
print "parsed_AsciiName After = $parsed_AsciiName \n";

exit 0;
$ ./paren.perl
parsed_AsciiName Before = Today( is October 28, 2008.
parsed_AsciiName After = Today is October 28, 2008.

Please post the code.

split /\(/,$parsed_AsciiName ; 

I'm still not sure what is not working. Please post COMPLETE code:

$ cat paren.perl
#!/usr/bin/perl

use strict;
use warnings;

my $parsed_AsciiName = "Today( is October 28, 2008.";

print "parsed_AsciiName using split = ", split /\(/,$parsed_AsciiName;
print "\n";

print "parsed_AsciiName Before = $parsed_AsciiName \n";
$parsed_AsciiName =~ s/\(//;
print "parsed_AsciiName After = $parsed_AsciiName \n";

exit 0;
$ ./paren.perl
parsed_AsciiName using split = Today is October 28, 2008.
parsed_AsciiName Before = Today( is October 28, 2008.
parsed_AsciiName After = Today is October 28, 2008.
# cat par.pl

$data="abc(123";
$data =~ s/\(/ /;
print $data;

# perl par.pl
abc 123
#

This worked for me.