我有一个包含(linke ther termninal calles)字符串“& 00”的Perl变量。 字符串可能会在较大的字符串中多次出现。
如何判断较大的字符串是否包含较小的字符串,以便“切断”它?它始终出现在字符串的末尾。
类似的东西:
if ($string =~ (m//))
答案 0 :(得分:1)
假设您想要检查或替换字符串的结尾,
if ($string =~ /\&00$/)
检测它。
或者,如果您只想替换它,
$string =~ s/(.*)\&00$/$1/
答案 1 :(得分:0)
如果您只想删除它,请将其删除:
if ( substr($string, -3) eq '&00' )
答案 2 :(得分:0)
您可以使用index function。
use strict;
use warnings;
my $sometext = "my text here contains &00 and some more text";
my $text_to_search = "&00";
print index($sometext, $text_to_search), "\n";
您可以稍后使用substr将其删除。
my $idx = index($sometext, $text_to_search);
print substr($sometext, 0, $idx); # if it's to the end, you can alter to suit.