Search code examples
perlgnu-coreutils

Perl implementation of the GNU Coreutils


I want to learn Perl and thought that the most of GNU Coreutils seems to be doing stuff which are well suited for the language. Is there any Perl implementation of it (at least the basic functionality) which I could look at for comparison?

In my experience, looking at code is the second best way to learn a language (after writing code). I'm interested both in quick-and-dirty implementations and clean code which covers edge cases as well.

For example, cat could be implemented as

alias cat='perl -Tpe "" --'

although there are some edge cases where it doesn't behave the same. And of course it ignores all flags.


Solution

  • This has already been done years ago: http://search.cpan.org/dist/ppt/