implementation of GNU coreutils in perl