Perl处理文件，怎么将第一行和最后一行删除掉 perl如何删除文本最后一行字串？

如果文件不大的话，可以把文件读入数组，然后再处理保存到另外一个文件里。

#！/usr/bin/perl -w

use strict;

my @file = `cat /usr/home/cel/sample.txt`;
open FH,">>/usr/home/cel/newfile.txt" or die "Can't open /usr/home/cel/newfile.txt: $!
";
foreach my $i (0..$#file){
    chomp $file[$i];
    next if $i == 0;
    next if $i == $#file;
    print FH "$file[$i]
";
}
close FH;

perl如何快速去掉一个文件最后一行数据~

perl -i -p -e 's/\S*\z//' test.txt

把每一行读入数组中，然后把最后一个数组元素从数组pop出去

怎么减减屁股肉?
答：4.臀、肩姿势 做完俯卧撑以后,臀部放松,直至腹部几乎接触地面,向前挺胸,双手撑地,两臂伸直,保持一分钟。 5.腿提起、放下 现在把屁股撅向天花板,双臂保持平直,从地上提起脚跟,然后再放下。(你会感到小腿肌肉在颤动)将这提起、放下的动作连做20次。最后手、脚一齐移动。轻轻抬起成站立姿势,并立即恢复到第一节...

怎么把胸和屁股减下去
答：4.臀、肩姿势 做完俯卧撑以后,臀部放松,直至腹部几乎接触地面,向前挺胸,双手撑地,两臂伸直,保持一分钟。 5.腿提起、放下 现在把屁股撅向天花板,双臂保持平直,从地上提起脚跟,然后再放下。(你会感到小腿肌肉在颤动)将这提起、放下的动作连做20次。最后手、脚一齐移动。轻轻抬起成站立姿势,并立即恢复到第一节...