<facetious>
What am I missing here? Wouldn't The One True Perl Way to implement a UNIX command be to take the C source code, integrate that into Perl, and then add a built-in 'cut' function to perl that "just" calls the C code?!? ;-)
</facetious>

(nice cut implementation, btw)