keyword harry /
sally/
tally/
希望每当字符串与关键字匹配时,它也应该寻找“/”字符。这表示行的延续
然后我想要输出为
keyword harry sally tally
==========================
我当前的代码:
#!/usr/bin/perl
open (file2, "trial.txt");
$keyword_1 = keyword;
foreach $line1 (<file2>) {
s/^\s+|\s+$//g;
if ($line1 =~ $keyword_1) {
$line2 =~ (s/$\//g, $line1) ;
print " $line2 " ;
}
}