Hi,
On 09/09/2012 01:39 PM, ynon perek wrote:
>
> I'm trying to turn a short program into a one-liner. The program takes an
> argument "n" and prints the first n file names sorted by file name length,
> with no duplicates in length.
>
I know you've asked for a *Perl* one-liner, but since a recent suggested
solution already "cheat" by using the shell to get the list of files, why not
just do it entirely in using standard command line programs ?
==
## prints the top 5 longest file names, remove the "r" from sort to print the
shortest.
ls | awk '{print length($0), $0}' | sort -nru | cut -f2 -d' ' | head -n5
==
Seems cleaner, and shorter than any Perl solution...
-gordon
_______________________________________________
Perl mailing list
[email protected]
http://mail.perl.org.il/mailman/listinfo/perl