# Perl - 字符串 > 原文： [https://beginnersbook.com/2018/03/perl-strings/](https://beginnersbook.com/2018/03/perl-strings/) 字符串是一系列字符。正如我們在標量指南中所討論的那樣，字符串被認為是 Perl 編程語言中的標量變量。有兩種方法可以使用`'`（單引號）和`"`（雙引號）在 Perl 中定義字符串。 ## 1. Perl 中的字符串聲明和初始化 由于字符串是標量，它們的名稱以`$`開頭。**例如：** ```perl my $website = "BeginnersBook"; my $editor = "Chaitanya"; print "$editor works for $website"; ``` 輸出： ```perl Chaitanya works for BeginnersBook ``` ## 2 字符串插值 - 單引號和雙引號 我已經在[ Perl 標量的文章](https://beginnersbook.com/2017/05/scalars-in-perl/)中介紹了這個主題。 引號不是字符串的一部分，它們只是指定字符串的開頭和結尾。您可能認為**單引號和雙引號**都有相同的用途，但事實并非如此。它們用于不同的 2 例。要理解這兩者之間的區別，讓我們看一下下面的例子。 ```perl #!/usr/bin/perl print "Welcome to\t Beginnersbook.com\n"; print 'Welcome to\t Beginnersbook.com\n'; This would produce the following 輸出： Welcome to Beginnersbook.com Welcome to\t Beginnersbook.com\n ``` 您可以清楚地看到雙引號內插轉義序列`\t`和`\n`的區別，但是單引號沒有。 **注意：**我們將在下一個教程中詳細討論轉義序列。 **例 2：單引號和雙引號：** ```perl #!/usr/bin/perl $website = "Beginnersbook"; print "Website Name: $website\n"; print 'Website Name: $website\n'; ``` **輸出：** ```perl Website Name: Beginnersbook Website Name: $website\n ``` 這是雙引號的另一個優點，因為它們是**“可變插值”**。這意味著雙引號內的變量名稱將替換為其值。單引號字符串中不會發生這種情況。 ### 2.1 單引號的使用 您可能正在考慮避免在 perl 程序中使用單引號，但在某些情況下您可能希望使用單引號。 例如如果你想在變量中存儲**電子郵件地址**，那么雙引號會引發錯誤，在這種情況下你需要使用單引號。對于例如 ```perl $email = "[email?protected]"; # would throw an error $email = '[email?protected]'; # would work fine. ``` 這里的問題是`@gmail`被**內插為數組**。以`@`符號開頭的變量被內插為數組。我們還可以通過使用`\`轉義序列避免雙引號錯誤，我們已在下一節中討論過。 ### 2.2 Perl 中的反斜杠 反斜杠可以執行以下兩個任務之一： 1）它消除了跟隨它的字符的特殊含義。對于例如打印`\$myvar`會產生`$myvar`輸出而不是變量`myvar`值，因為`$`前面的反斜杠（`\`）消除了`$`的特殊含義 2）它是反斜杠或轉義序列的開始。對于例如`\n`是用于換行的轉義序列 #### 2.2.1 有什么用？ 相信我，你會在 perl 中開發應用時經常使用它。假設您要打印包含雙引號的字符串。對于例如如果我想打印：`Hello This is "My blog"`然后我需要使用以下邏輯： ```perl #!/usr/bin/perl $msg = "Hello This is \"My blog\""; print "$msg\n"; ``` **輸出：** ```perl Hello This is "My blog" ``` ## 3.字符串操作 讓我們看看我們可以對字符串執行的操作。 ### 3.1 連接 要連接字符串，請使用點（`.`）運算符。在下面的例子中，我們連接三個字符串，`$str1`，空格和`$str2`。 ```perl $str1 = "Cherry"; $str2 = "Coco"; $mystr = $str1 . " " . $str2; print "$mystr\n"; ``` 輸出： ```perl Cherry Coco ``` ### 3.2 重復 要重復具有指定次數的字符串，請使用字符`x`后跟數字。在下面的示例中，我們使用了字符`x`之后的數字 4，這就是字符串在輸出中重復四次的原因。 ```perl $str = "Cherry"; $mystr = $str x 4; print "$mystr\n"; ``` 輸出： ```perl CherryCherryCherryCherry ``` ### 3.3 獲取子串 - `substr()`函數 `substr()`函數用于從給定字符串中獲取子字符串。 ```perl use strict; use warnings; # This is our original string my $str = "I know who you are, I will find you"; print "My original String is: $str\n"; # substring - starting from 8th char till the end of string my $substr1 = substr($str, 7); print "My First substring is: $substr1\n"; # substring - starting from 8th char and length of 11 my $substr2 = substr($str, 7, 11); print "My Second substring is: $substr2\n"; ``` 輸出： ```perl My original String is: I know who you are, I will find you My First substring is: who you are, I will find you My Second substring is: who you are ``` 該相同功能可用于用新內容替換字符串的一部分。讓我們舉個例子來理解這個： ```perl use strict; use warnings; # This is our original string my $str = "I know who you are, I will find you"; print "My original String is: $str\n"; my $newstr = substr($str, 7, 11, "you are the killer"); print "My updated String is: $str\n" ``` 輸出： ```perl My original String is: I know who you are, I will find you My updated String is: I know you are the killer, I will find you ``` ### 3.4 在 Perl - `length()`函數中查找字符串的長度 要在 Perl 中查找字符串的長度，請使用`length()`函數。此函數計算字符串中的字符數（包括空格）并返回它。 ```perl use strict; use warnings; my $str = "I know who you are, I will find you"; print "length of my string is:", length($str); ``` 輸出： ```perl length of my string is:35 ``` ### 3.5 Perl 中的字符串比較 為了比較兩個字符串，我們使用 Perl 中的[`eq`運算符](https://beginnersbook.com/2017/02/perl-operators-complete-guide/)。 ```perl use strict; use warnings; my $str = "hello"; my $str2 = "hello"; if ($str eq $str2){ print "str and str2 are same\n"; } ``` 輸出： ```perl str and str2 are same ```