||
对于小文本,直接在vim中处理就可以。
删除空行
:g/^$/d
删除空行以及只有空格的行
:g/^\s*$/d
判断是否为非空行
而不是判断是否为空行
######input start ###############
open FH,"sander_energies.tab";
my @mmenergies=<FH>;
chomp(@mmenergies);
my $end;
while(1)
{
$end=pop @mmenergies;
if($end=~/\S/)
{
push @mmenergies,$end;
last;
}
}
close(FH);
Archiver|手机版|科学网 ( 京ICP备07017567号-12 )
GMT+8, 2024-10-20 02:08
Powered by ScienceNet.cn
Copyright © 2007- 中国科学报社