# Perl 中的`use strict`和`use warnings` > 原文： [https://beginnersbook.com/2017/05/use-strict-and-use-warnings-in-perl/](https://beginnersbook.com/2017/05/use-strict-and-use-warnings-in-perl/) 幾乎每個 perl 腳本中都可以找到以下幾行。 ```perl use strict; use warnings; ``` 在本文中，我們將逐一討論它們。 **注意：**您可能無法在本網站提供的某些腳本中找到這些編譯指示，這是為了避免與初學者混淆。但是，您會在高級主題上找到它們。 開始吧。 ## `use strict` `use strict`語句稱為`pragma`，它可以放在腳本的開頭，如下所示： ```perl #!/usr/local/bin/perl use strict; ``` **它做了什么？** 它會強制您正確編碼以使您的程序不易出錯。例如：它強制您在使用它們之前聲明變量。您可以使用`my`關鍵字聲明變量。`my`關鍵字將變量的范圍限制為局部。它使代碼更易讀，更不容易出錯。 如果你沒有使用`my`關鍵字聲明變量，那么創建的變量將是全局的，你應該避免，將變量的范圍縮小到需要它的位置是一個很好的編程習慣。 #### 例： 如果使用`use strict`但不聲明變量。 ```perl #!/usr/local/bin/perl use strict; $s = "Hello!\n"; print $s; ``` 它會拋出這個錯誤： ```perl Global symbol "$s" requires explicit package name at st.pl line 3. Global symbol "$s" requires explicit package name at st.pl line 4. Execution of st.pl aborted due to compilation errors. ``` 要避免錯誤，您必須使用`my`關鍵字聲明變量。 ```perl #!/usr/local/bin/perl use strict; my $s = "Hello!\n"; print $s; ``` **輸出：** ```perl Hello! ``` 同樣，您需要在使用它們之前聲明數組和哈希值。 **注意：**從 Perl 5.12 開始，隱式啟用此編譯指令，這意味著如果您使用的是 Perl 5.12 或更高版本，則無需使用`use strict`作為編譯指令，它默認情況下啟用。 ## `use warnings` 這是另一個`pragma`，它們一起使用如下： ```perl #!/usr/local/bin/perl use strict; use warnings; ``` **注意**：`use warnings pragm`在 Perl 5.6 中引入，所以如果你使用的是 Perl 5.6 或更高版本，就可以了。如果您使用的是舊版本，可以打開如下警告：將`-w`放在`shebang`行。 ```perl #!/usr/local/bin/perl -w ``` 即使在 Perl 5.6 或更高版本上，這也適用于任何地方。 **`use warnings`有什么用？** 它可以幫助您找到打字錯誤，它會在您看到程序出錯時向您發出警告。它可以幫助您更快地找到程序中的錯誤。 **注意：**這里要注意的最重要的一點是`use strict`會在程序發現錯誤時中止程序的執行。另一方面，使用警告只會為您提供警告，它不會中止執行。 **結論：** 你應該總是在你的程序中使用這兩個`pragma`，因為它是一個很好的編程習慣。