$s = '("test123")';
$s =~ s/(\("|"\))//g;
print "$s\n";