- Perl 基礎
- Perl - 首頁
- Perl - 簡介
- Perl - 環境
- Perl - 語法概述
- Perl - 資料型別
- Perl - 變數
- Perl - 標量
- Perl - 陣列
- Perl - 雜湊
- Perl - IF...ELSE
- Perl - 迴圈
- Perl - 運算子
- Perl - 日期和時間
- Perl - 子程式
- Perl - 引用
- Perl - 格式
- Perl - 檔案 I/O
- Perl - 目錄
- Perl - 錯誤處理
- Perl - 特殊變數
- Perl - 編碼規範
- Perl - 正則表示式
- Perl - 傳送郵件
- Perl 高階
- Perl - 套接字程式設計
- Perl - 面向物件
- Perl - 資料庫訪問
- Perl - CGI 程式設計
- Perl - 包和模組
- Perl - 程序管理
- Perl - 嵌入式文件
- Perl - 函式引用
- Perl 有用資源
- Perl - 問題和解答
- Perl - 快速指南
- Perl - 有用資源
- Perl - 討論
Perl 數值比較運算子示例
這些也被稱為關係運算符。假設變數 $a 持有 10,變數 $b 持有 20,那麼讓我們檢查以下數值比較運算子:
| 序號 | 運算子和描述 |
|---|---|
| 1 | == (等於) 檢查兩個運算元的值是否相等,如果相等則條件為真。 示例 − ($a == $b) 為假。 |
| 2 | != (不等於) 檢查兩個運算元的值是否相等,如果不相等則條件為真。 示例 − ($a != $b) 為真。 |
| 3 | <=> 檢查兩個運算元的值是否相等,並根據左側引數在數值上是否小於、等於或大於右側引數返回 -1、0 或 1。 示例 − ($a <=> $b) 返回 -1。 |
| 4 | > (大於) 檢查左側運算元的值是否大於右側運算元的值,如果大於則條件為真。 示例 − ($a > $b) 為假。 |
| 5 | < (小於) 檢查左側運算元的值是否小於右側運算元的值,如果小於則條件為真。 示例 − ($a < $b) 為真。 |
| 6 | >= (大於或等於) 檢查左側運算元的值是否大於或等於右側運算元的值,如果大於或等於則條件為真。 示例 − ($a >= $b) 為假。 |
| 7 | <= (小於或等於) 檢查左側運算元的值是否小於或等於右側運算元的值,如果小於或等於則條件為真。 示例 − ($a <= $b) 為真。 |
示例
嘗試以下示例以瞭解 Perl 中所有可用的數值比較運算子。將以下 Perl 程式複製並貼上到 test.pl 檔案中並執行該程式。
#!/usr/local/bin/perl
$a = 21;
$b = 10;
print "Value of \$a = $a and value of \$b = $b\n";
if( $a == $b ) {
print "$a == \$b is true\n";
} else {
print "\$a == \$b is not true\n";
}
if( $a != $b ) {
print "\$a != \$b is true\n";
} else {
print "\$a != \$b is not true\n";
}
$c = $a <=> $b;
print "\$a <=> \$b returns $c\n";
if( $a > $b ) {
print "\$a > \$b is true\n";
} else {
print "\$a > \$b is not true\n";
}
if( $a >= $b ) {
print "\$a >= \$b is true\n";
} else {
print "\$a >= \$b is not true\n";
}
if( $a < $b ) {
print "\$a < \$b is true\n";
} else {
print "\$a < \$b is not true\n";
}
if( $a <= $b ) {
print "\$a <= \$b is true\n";
} else {
print "\$a <= \$b is not true\n";
}
執行上述程式碼後,將產生以下結果:
Value of $a = 21 and value of $b = 10 $a == $b is not true $a != $b is true $a <=> $b returns 1 $a > $b is true $a >= $b is true $a < $b is not true $a <= $b is not true
perl_operators.htm
廣告