New answers tagged filter
1
Case 1:
perl -i -ane '$n=(@F==0) ? $n+1 : 0; print if $n<=2'
Case 2:
perl -i -ane '$n=(@F==0) ? $n+1 : 0; print $n==2 ? "\n$_" : $n==1 ? "" : $_ '
0
Here's a Perl solution:
perl -e 'while(<>){
$l=length;
$l>$m && do {$c=$_; $m=$l}
} print $c' file.txt
Or, if you want to print all the longest lines
perl -e 'while(<>){
$l=length;
push @{$k{$l}},$_;
$m=$l if $l>$m;
} print @{$k{$m}}' file.txt
...
-3
You can use wc:
wc -L fileName
Top 50 recent answers are included
