view release on metacpan or  search on metacpan

bin/cow.c  view on Meta::CPAN

  og `/usr/local/bin/cow.exe', depending on your operating
  system. Then you should be able to put `#!/usr/local/bin/cow' on
  top of your Cow programs.

  If you rename the Perl program to something other than
  `/usr/local/bin/cow.pl', you must change the code below
  accordingly.
*/

#include <unistd.h>     /* for execv */
#include <stdio.h>      /* for stderr */
#include <errno.h>      /* for errno */
#include <string.h>     /* for strerror */
#include <stdlib.h>     /* for EXIT_FAILURE */

extern int main(int argc, char **argv);

int main(argc, argv)
    int argc;
    char **argv;
{
    int ret;
    static char file[] = "/usr/local/bin/cow.pl";
    ret = execv(file, argv);
    fprintf(stderr, "execv() of %s failed: %s\n",
            file, strerror(errno));
    exit(EXIT_FAILURE);
}