The solution [from the FreeBSD mailing list]:
perl -00 -e 'print map $_->[0], sort { $a->[1] <=> $b->[1] } map [$_,
tr/\n//], <>' < before.txt > after.txt
Thank you!!
> or maybe in bash..
> script/"one liner" e.g.: input: http://pastebin.com/raw.php?i=pMZPEsMZ
>
> i want to make this output f
$ perl -e 'while (<>) { push @a,"" if /./ && ($#a < 0 || $a[$#a] =~ /\n
\n$/s); $a[$#a] .= $_} print join("",sort @a);' < before.txt > after.txt
$ diff before.txt after.txt
$
i don't get it, it doesn't work, am i missing something?
thank you
> Jozsi Vadkan writes:
>
> > or maybe in bash..
> >
Please god, tell me, how does this "magic" work?
http://pastebin.com/raw.php?i=Cr6WzdGv
Thank you!!
> Jozsi Vadkan writes:
>
> > or maybe in bash..
> > script/"one liner" e.g.: input: http://pastebin.com/raw.php?i=pMZPEsMZ
> >
> > i want to make this output from it:
> > http://pastebin.com/r
Jozsi Vadkan writes:
or maybe in bash..
script/"one liner" e.g.: input: http://pastebin.com/raw.php?i=pMZPEsMZ
i want to make this output from it:
http://pastebin.com/raw.php?i=kH8VxT0A
So from the input, i want to make an ascendant order, how many things
are under a "SOMETHING-XX"
You reve