chomp是用來刪除換行符.

代碼如下:
#!/usr/bin/perl
$c="abcde";
chomp($c);
print "$c/n";
[root@ak]# perl a.pl
abcde

chop是用來刪除最后一個字符.

代碼如下:
#!/usr/bin/perl
$c="abcde";
chop($c);
print "$c/n";
[root@ak]# perl a.pl
abcd

chomp與chop的用法

1.chomp的用法:

它對變量起作用，而此變量含有字符串。如果字符串結尾有換行符，chomp
可以去掉它。這基本上就是它能完成的所有功能，如下例：
$text="alineoftext/n      "; #也可以由<STDIN>輸入
chomp($text);
 #去掉換行符(/n)。
 它非常有用，基本上你的每一個程序都會用到它。如你將知道，這是將字符串末尾換行符去掉的最好方法。基于 Perl 中的
一條基本原則：在需要使用變量的地方，可以使用賦值表達式來代替。我們有更簡單的使用 chomp 的方法。Perl 首先做賦
值運算，再使用這個變量。因此使用 chomp 的最常用方法是：
chomp($text=<STDIN>);    #讀入，但不含換行符
$text=<STDIN>;
 chomp($text);
 #同上，但用兩步完成
 第一眼見到時，第一種組合的方法看起來復雜些。如果把上述其看成兩步操作，讀一行再 chomp，那寫成兩個語句的方法
看起來自然些。如果將其看作一個操作，讀入一行但不包括換行符，那寫成一個語句的方法更恰當。由于絕大多數(shù) Perl 程
序員使用第一種寫法，你也應該使用它。

2.chop與chomp的區(qū)別:

chop()函數(shù)，只是去除最后一個字符。
chomp()函數(shù)，就要首先判斷最后一個字符是不是為"/n"，他才去除。