when I put it in a perl script, it errors or just does not work.

Show your Perl code and show the exact error messages you get, using "code" tags (see Writeup Formatting Tips).

Here is the excerpt from the post I would like to discuss is

I believe the post is: UNIX command - remove 0 byte file