my $book = Spreadsheet::Read->new();
my $book = ReadData
('D:\Profiles\jmahroof\Desktop\Scheduled_Build_Overview.xls');
my $cell = "CD7";
my $n = "1";
my $send = $book->[$n]{$cell};
上面的代码从电子表格获取数据,然后打印,我知道有文本的单元格的内容,具有完全以下格式的文本:文本(文本)如何删除或替换字符串中的括号?
我需要更换开放的支架与一个空的空间,我需要删除紧密支架。我已经尝试了下面的代码来替代开放的括号中的空白空间,但它似乎没有工作。
$send =~ s/(/ /g;
print $send;
尝试转义元字符'(':'$ send =〜s/\(//g' –
解决,谢谢 –