It's in CVS baby!

1999-08-14 07:17:54 +00:00
16 changed files with 94 additions and 564 deletions
--- a/31
+++ b/31
@@ -1,31 +0,0 @@
-3.03	28 May 1999
-	- Added cows/tux.cow, as suggested by xmanoel@i.am
-	- Compatibility with 5.6.0, due to a change in qw().
-	- Renamed devil.cow to daemon.cow, since I know better. :-)
-
-3.02	04 November 1999
-	- Fixed boneheaded code placement so that cowsay -l actually works.
-
-3.01    01 November 1999
-	- Fixed compatibility issues between the Text::Wrap module
-	  that changed between 5.005_02 and 5.005_03.
-	- Fixed tab expansion issues with Text::Tabs.
-
-3.0	13 April 1999, released 14 August 1999
-	- Rewritten into Perl 5 and presented to the world.
-
-- Not present in CVS from here on down --
-
-2.x	Date?
-	- Arbitrary messages. 
-	- Figlet support (-n). 
-	- Line wrap length (-w). 
-	- Multiple pre-set expressions.
-	- Better arg parsing loop.
-	- Message from stdin or command line.
-
-1.0	Date?
-	- SUBJECT is VERB OBJECT
-
-$Id$
-This file is part of cowsay.  (c) 1999-2000 Tony Monroe.
--- a/Files.base
+++ b/Files.base
@@ -1,58 +0,0 @@
-ChangeLog
-INSTALL
-LICENSE
-MANIFEST
-README
-Wrap.pm.diff
-install.sh
-pgp_public_key.txt
-cowsay
-cowsay.1
-cows/
-cows/beavis.zen.cow
-cows/bong.cow
-cows/bud-frogs.cow
-cows/bunny.cow
-cows/cheese.cow
-cows/cower.cow
-cows/daemon.cow
-cows/default.cow
-cows/dragon-and-cow.cow
-cows/dragon.cow
-cows/elephant-in-snake.cow
-cows/elephant.cow
-cows/eyes.cow
-cows/flaming-sheep.cow
-cows/ghostbusters.cow
-cows/head-in.cow
-cows/hellokitty.cow
-cows/kiss.cow
-cows/kitty.cow
-cows/koala.cow
-cows/kosh.cow
-cows/luke-koala.cow
-cows/mech-and-cow
-cows/meow.cow
-cows/milk.cow
-cows/moofasa.cow
-cows/moose.cow
-cows/mutilated.cow
-cows/ren.cow
-cows/satanic.cow
-cows/sheep.cow
-cows/skeleton.cow
-cows/small.cow
-cows/sodomized.cow
-cows/stegosaurus.cow
-cows/stimpy.cow
-cows/supermilker.cow
-cows/surgery.cow
-cows/telebears.cow
-cows/three-eyes.cow
-cows/turkey.cow
-cows/turtle.cow
-cows/tux.cow
-cows/udder.cow
-cows/vader-koala.cow
-cows/www.cow
-cows/vader.cow
--- a/15
+++ b/15
@@ -1,15 +0,0 @@
-=================
-Installing cowsay
-=================
-
-If you really want to get things installed a nice and pretty way,
-
-	sh install.sh
-
-It will ask approximately one question.  If you can't answer it,
-you need serious help.
-
-If the install goes well, you can start cowing immediately!  Just
-be sure to read the manual page first...
-
-$Id$
--- a/36
+++ b/36
@@ -1,36 +0,0 @@
-==============
-cowsay License
-==============
-
-cowsay is distributed under the same licensing terms as Perl: the
-Artistic License or the GNU General Public License.  If you don't
-want to track down these licenses and read them for yourself, use
-the parts that I'd prefer:
-
-(0) I wrote it and you didn't.
-
-(1) Give credit where credit is due if you borrow the code for some
-other purpose.
-
-(2) If you have any bugfixes or suggestions, please notify me so
-that I may incorporate them.
-
-(3) If you try to make money off of cowsay, you suck.
-
-===============
-cowsay Legalese
-===============
-
-(0) Copyright (c) 1999 Tony Monroe.  All rights reserved.  All
-lefts may or may not be reversed at my discretion.
-
-(1) This software package can be freely redistributed or modified
-under the terms described above in the "cowsay License" section
-of this file.
-
-(2) cowsay is provided "as is," with no warranties whatsoever,
-expressed or implied.  If you want some implied warranty about
-merchantability and/or fitness for a particular purpose, you will
-not find it here, because there is no such thing here.
-
-(3) I hate legalese.
--- a/11
+++ b/11
@@ -1,11 +0,0 @@
-ChangeLog		Changes to recent versions.
-INSTALL			Instructions for installing cowsay.
-LICENSE			The license for use and redistribution of cowsay.
-MANIFEST		This file.
-README			Read this first.  Really.
-Wrap.pm.diff		Diff for Text/Wrap.pm.
-cows/*			Support files used by cowsay.
-cowsay			Main cowsay executable.
-cowsay.1		Main cowsay manual page.
-install.sh		cowsay installation script.
-pgp_public_key.txt	Verify the signature file with this key.
--- a/40
+++ b/40
@@ -1,40 +0,0 @@
-##
-## Makefile for managing simple NetHirc-related tasks
-##
-## $Id$
-##
-
-FILES= Files.base
-PRODUCT= cowsay
-VER= 3.03
-BASE= ${PRODUCT}-${VER}
-TARZ= ${BASE}.tar.Z
-TARGZ= ${BASE}.tar.gz
-TARS= ${TARZ} ${TARGZ}
-SIGZ= ${TARZ}.sig
-SIGGZ= ${TARGZ}.sig
-SIGS= ${SIGZ} ${SIGGZ}
-FTP= jariten:ftp/cowsay
-
-release: run-pax sign upload
-
-tar: run-pax
-
-run-pax: ${FILES}
-	-chmod +x install.sh
-	pax -w -d -x tar \
-		-s ",^,${BASE}/," \
-		-f ${BASE}.tar \
-		`cat ${FILES}`
-	gzip -c ${BASE}.tar > ${TARGZ}
-	compress ${BASE}.tar
-
-sign: ${TARS}
-	for i in ${TARS}; do pgp -sb $$i; done
-	chmod 644 ${SIGS}
-
-upload: ${TARS} ${SIGS}
-	scp ${TARS} ${SIGS} ${FTP}
-
-clean: 
-	-rm -f ${TARS} ${SIGS}
--- a/38
+++ b/38
@@ -1,38 +0,0 @@
-===========
-cowsay 3.03
-===========
-
-cowsay is a configurable talking cow, written in Perl.  It operates
-much as the figlet program does, and it written in the same spirit
-of silliness.
-
-cowsay is actually a pretty old program.  It has not really been
-released before, and I am releasing it in the hope that someone
-other than myself will be amused by it. 
-
-The first major version of cowsay had one cow and one message
-template: $foo is $verb $bar.  Not very flexible, but people managed
-to do pretty interesting things with it.  The second major version
-scrapped many of the limitations of the first, by allowing arbitrary
-messages, multiple cowfiles, and even support for cows talking in
-figlet.  The third version was a rewrite of the second into Perl
-5, whereupon the code got a lot smaller and more manageable. :-)
-
-If you are using Perl 5.004, you may have problems with Text::Wrap.
-(Yeesh, this module changes more than it should...)  I've included
-a diff for the Text::Wrap (version 97.011701) that is shipped with
-5.004_04; the concept is simple enough that even older Perls can
-take advantage of this silly little patch; if there is a "sub fill"
-in the documentation for the module, copy it to a more useful
-section of that file.  If not, just take "sub fill" wholesale from
-the patch.  Oh, and consider upgrading to 5.005_03 or later.
-Please.  You'll like it, I promise.
-
-To install cowsay, consult the INSTALL file in this directory.
-
-For the terms and conditions of use, consult the LICENSE file in
-this directory.
-
-- Tony Monroe (tony@nog.net)
-
-$Id$
--- a/25
+++ b/25
@@ -1,25 +0,0 @@
-Steps to be done for release:
-
-(0) Change version number in cowsay file.
-
-(1) Change version number in Makefile.
-
-(2) Change version number in README.
-
-(3) Change version number in cowsay.1.
-
-(4) CVS tag.
-
-(5) Package into tarballs and sign.
-
-(6) Upload tarballs to FTP server.
-
-(7) Point LATEST.tar.gz to current version.
-
-(8) Modify cowsay web pages to reflect current version.
-
-(9) Modify factoids with purl and miho to reflect current version.
-
-(10) Post to freshmeat.
-
-$Id$
--- a/Wrap.pm.diff
+++ b/Wrap.pm.diff
@@ -1,47 +0,0 @@
-*** Wrap.pm.in	Thu May 22 00:21:42 1997
--- Wrap.pm	Fri Nov 12 10:00:15 1999
-***************
-*** 3,9 ****
-  require Exporter;
-  
-  @ISA = (Exporter);
-! @EXPORT = qw(wrap);
-  @EXPORT_OK = qw($columns);
-  
-  $VERSION = 97.011701;
--- 3,9 ----
-  require Exporter;
-  
-  @ISA = (Exporter);
-! @EXPORT = qw(wrap fill);
-  @EXPORT_OK = qw($columns);
-  
-  $VERSION = 97.011701;
-***************
-*** 66,71 ****
--- 66,90 ----
-  
-  	print "-----------$r---------\n" if $debug;;
-  	return $r;
-+ }
-+ 
-+ ## Copied up from below.
-+ sub fill 
-+ {
-+ 	my ($ip, $xp, @raw) = @_;
-+ 	my @para;
-+ 	my $pp;
-+ 
-+ 	for $pp (split(/\n\s+/, join("\n",@raw))) {
-+ 		$pp =~ s/\s+/ /g;
-+ 		my $x = wrap($ip, $xp, $pp);
-+ 		push(@para, $x);
-+ 	}
-+ 
-+ 	# if paragraph_indent is the same as line_indent, 
-+ 	# separate paragraphs with blank lines
-+ 
-+ 	return join ($ip eq $xp ? "\n\n" : "\n", @para);
-  }
-  
-  1;
--- a/4
+++ b/4
@@ -1,4 +0,0 @@
-# $Id$
-# Development environment settings for cowsay
-COWPATH=`pwd`/cows
-export COWPATH
--- a/cows/daemon.cow
+++ b/cows/daemon.cow
--- a/cows/dragon-and-cow.cow
+++ b/cows/dragon-and-cow.cow
@@ -7,7 +7,7 @@ $the_cow = <<EOC;
                         $thoughts   |\\___/|      /   \\//  .\\
                          $thoughts  /O  O  \\__  /    //  | \\ \\           *----*
                            /     /  \\/_/    //   |  \\  \\          \\   |
-                            \@___\@`    \\/_   //    |   \\   \\         \\/\\ \\
+                            @___@`    \\/_   //    |   \\   \\         \\/\\ \\
                           0/0/|       \\/_ //     |    \\    \\         \\  \\
                       0/0/0/0/|        \\///      |     \\     \\       |  |
                    0/0/0/0/0/_|_ /   (  //       |      \\     _\\     |  /
--- a/cows/tux.cow
+++ b/cows/tux.cow
@@ -1,16 +0,0 @@
-##
-## TuX
-## (c) pborys@p-soft.silesia.linux.org.pl 
-##
-$the_cow = <<EOC;
-   $thoughts
-    $thoughts
-        .--.
-       |o_o |
-       |:_/ |
-      //   \\ \\
-     (|     | )
-    /'\\_   _/`\\
-    \\___)=(___/
-
-EOC
--- a/47
+++ b/47
@@ -1,40 +1,23 @@
-#%BANGPERL%
+#!/usr/bin/perl -w

 ##
-## Cowsay 3.03
-##
-## This file is part of cowsay.  (c) 1999-2000 Tony Monroe.
+## Cowsay 3.0
+## Tony Monroe, 13 April 1999
 ##

-use Text::Tabs qw(expand);
-use Text::Wrap qw(wrap fill $columns);
+use Text::Wrap qw(wrap fill $columns $tabstop);
 use File::Basename;
 use Getopt::Std;
 use Cwd;

-$version = "3.03";
+$version = "3.0";
 $progname = basename($0);
 $eyes = "oo";
 $tongue = "  ";
-$cowpath = $ENV{'COWPATH'} || '%PREFIX%/share/cows';
+$wrap = 40;
+$cowpath = $ENV{'COWPATH'} || '/usr/local/share/cows';
@message = ();
 $thoughts = "";
-
-## Yeah, this is rude, I know.  But hopefully it gets around a nasty
-## little version dependency.
-
-$Text::Wrap::initial_tab = 8;
-$Text::Wrap::subsequent_tab = 8;
-$Text::Wrap::tabstop = 8;
-
-## One of these days, we'll get it ported to Windows.  Yeah, right.
-
-if (($^O eq "MSWin32") or ($^O eq "Windows_NT")) {	## Many perls, eek!
-    $pathsep = ';';
-} else {
-    $pathsep = ':';
-}
-
 %opts = (
    'e'		=>	'oo',
    'f'		=>	'default.cow',
@@ -61,9 +44,9 @@ $tongue = substr($opts{'T'}, 0, 2);
 $the_cow = "";

 &slurp_input;
-$Text::Wrap::columns = $opts{'W'};
-@message = ($opts{'n'} ? expand(@message) : 
-	    split("\n", fill("", "", @message)));
+$columns = $opts{'W'};
+$tabstop = 8;
+@message = ($opts{'n'} ? @message : split("\n", fill("", "", @message)));
 &construct_balloon;
 &construct_face;
 &get_cow;
@@ -74,7 +57,7 @@ sub list_cowfiles {
    my $basedir;
    my @dirfiles;
    chop($basedir = cwd);
-    for my $d (split(/$pathsep/, $cowpath)) {
+    for my $d (split(/:/, $cowpath)) {
 	print "Cow files in $d:\n";
 	opendir(COWDIR, $d) || die "$0: Cannot open $d\n";
 	for my $file (readdir COWDIR) {
@@ -122,11 +105,7 @@ sub construct_balloon {
 	@border = qw[ < > ];
    } else {
 	$thoughts = '\\';
-	if ($V and $V gt v5.6.0) {		# Thanks, perldelta.
-	    @border = qw[ / \\ \\ / | | ];
-	} else {
-	    @border = qw[ / \ \ / | | ];	
-	}
+	@border = qw[ / \\ \\ / | | ];
    }
    push(@balloon_lines, 
 	" " . ("_" x $max2) . " \n" ,
@@ -180,7 +159,7 @@ sub get_cow {

 sub display_usage {
 	die <<EOF;
-cow{say,think} version $version, (c) 1999 Tony Monroe
+cow{say,think} version $version, (c) 1999 Tony's SquidWarez
 Usage: $progname [-bdgpstwy] [-h] [-e eyes] [-f cowfile] 
          [-l] [-n] [-T tongue] [-W wrapcolumn] [message]
 EOF
--- a/cowsay.1
+++ b/cowsay.1
@@ -1,58 +1,44 @@
-.\" 
-.\" cowsay.1
-.\"
-.\" $Id$
-.\"
-.\" This file is part of cowsay.  (c) 1999 Tony Monroe.
-.\"
-.ds Nm Cowsay
-.ds nm cowsay
-.ds Vn 3.02
-.TH \*(nm 1 "$Date$"
+.so /usr/local/etc/nmh/tmac.h
+.TH COWSAY 1 "Barnyard Animal Management"
 .SH NAME
-\*(nm/cowthink \- configurable speaking/thinking cow (and a bit more)
+cowsay, cowthink \- configurable speaking/thinking cow
 .SH SYNOPSIS
 cowsay
-.RB [ \-e 
-.IR eye_string ]
-.RB [ \-f 
-.IR cowfile ]
-.RB [ \-h ]
-.RB [ \-l ]
-.RB [ \-n ]
-.RB [ \-T 
-.IR tongue_string ] 
-.RB [ \-W 
-.IR column ]
-.RB [ \-bdgpstwy ]
+\%[\-e eye_string]
+\%[\-f cowfile]
+\%[\-h]
+\%[\-l]
+\%[\-n]
+\%[\-T tongue_string] 
+\%[\-W column]
+\%[\-bdgpstwy]
 .SH DESCRIPTION
 .I Cowsay
 generates an ASCII picture of a cow saying something provided by the
 user.  If run with no arguments, it accepts standard input, word-wraps
 the message given at about 40 columns, and prints the cow saying the
 given message on standard output.
-.PP
-To aid in the use of arbitrary messages with arbitrary whitespace,
-use the
-.B \-n
-option.  If it is specified, the given message will not be
-word-wrapped.  This is possibly useful if you want to make the cow
-think or speak in figlet(6).  If
-.B \-n
-is specified, there must not be any command-line arguments left
-after all the switches have been processed.
-.PP
+
+To aid in the use of arbitrary messages with arbitrary whitespace, use the
+.B -n
+option.  If it is specified, the given message will not
+be word-wrapped.  This is possibly useful if you want to make the cow
+think or speak in figlet(6).  If 
+.B -n
+is specified, there must not be any command-line arguments left after
+all the switches have been processed.  
+
 The
-.B \-W
-specifies roughly (where the message should be wrapped.  The default
-is equivalent to
-.B \-W 40
-i.e. wrap words at or before the 40th column.
-.PP
+.B -W
+specifies roughly (where the message should be wrapped.  The default is
+equivalent to 
+.B -W 40
+i.e. wrap words at or before the 40th column.  
+
 If any command-line arguments are left over after all switches have
-been processed, they become the cow's message.  The program will not
+been processed, they become the cow\'s message.  The program will not
 accept standard input for a message in this case.
-.PP
+
 There are several provided modes which change the appearance of the
 cow depending on its particular emotional/physical state.  The 
 .B \-b
@@ -68,101 +54,79 @@ makes the cow appear thoroughly stoned;
 .B \-t
 yields a tired cow;
 .B \-w
-is somewhat the opposite of 
-.BR \-t , 
-and initiates wired mode;
+is somewhat the opposite of \-t, and initiates wired mode;
 .B \-y
 brings on the cow's youthful appearance.
-.PP
+
 The user may specify the
-.B \-e
-option to select the appearance of the cow's eyes, in which case
-the first two characters of the argument string
-.I eye_string
+.B -e 
+option to select the appearance of the cow's eyes, in which
+case the first two characters of the argument string 
+.B eye_string
 will be used.  The default eyes are 'oo'.  The tongue is similarly
 configurable through
-.B \-T
+.B -T
 and
-.IR tongue_string ;
-it must be two characters and does not appear by default.  However,
-it does appear in the 'dead' and 'stoned' modes.  Any configuration
-done by
-.B \-e
+.B tongue_string; 
+it must be two characters and does not appear by
+default.  However, it does appear in the 'dead' and 'stoned' modes.
+Any configuration done by
+.B -e
 and
-.B \-T
+.B -T
 will be lost if one of the provided modes is used.
-.PP
+
 The
-.B \-f
+.B -f
 option specifies a particular cow picture file (``cowfile'') to
-use.  If the cowfile spec contains '/' then it will be interpreted
+use.  If the cowfile spec contains / then it will be interpreted
 as a path relative to the current directory.  Otherwise, cowsay
-will search the path specified in the 
-.B COWPATH 
-environment variable.
-To list all cowfiles on the current 
-.BR COWPATH , 
-invoke
-.B \*(nm
+will search the path specified in the COWPATH environment variable.
+To list all cowfiles on the current $COWPATH, invoke
+.B cowsay
 with the
-.B \-l
+.B -l
 switch.
-.PP
+
 If the program is invoked as 
 .B cowthink 
 then the cow will think its message instead of saying it.
-.PP
+
 .SH COWFILE FORMAT
-A cowfile is made up of a simple block of
-.BR perl (1)
-code, which assigns a picture of a cow to the variable
-.BR $the_cow .
-Should you wish to customize the eyes or the tongue of the cow,
-then the variables
-.B $eyes 
-and 
-.B $tongue
-may be used.  The trail leading up to the cow's message balloon is
-composed of the character(s) in the
-.B $thoughts
-variable.  Any backslashes must be reduplicated to prevent
-interpolation.  The name of a cowfile should end with
-.BR .cow ,
-otherwise it is assumed not to be a cowfile.  Also, at-signs (``@'')
-must be backslashed because that is what Perl 5 expects.
-.PP
+A cowfile is made up of a simple block of perl(1) code, which
+assigns a picture of a cow to the variable ``$the_cow''.  Should
+you wish to customize the eyes or the tongue of the cow, then the
+variables ``$eyes'' and ``$tongue'' may be used.  The trail leading
+up to the cow\'s message balloon is composed of the character(s)
+in the ``$thoughts'' variable.  Any backslashes must be reduplicated
+to prevent interpolation.  The name of a cowfile should end with
+``.cow'', otherwise it is assumed not to be a cowfile.  Also,
+at-signs (``@'') must be backslashed because that is what Perl 5
+expects.
+
 .SH COMPATIBILITY WITH OLDER VERSIONS
-.PP
-What older versions? :-)
-.PP
-Version 3.x is fully backward-compatible with 2.x versions.  If
-you're still using a 1.x version, consider upgrading.  And tell me
-where you got the older versions, since I didn't exactly put them
-up for world-wide access.
-.PP
-Oh, just so you know, this manual page documents version \*(Vn of
-cowsay.
+Version 3.0 is fully backward-compatible with 2.x versions.  If
+you're still using a 1.x version, consider upgrading.
+
 .SH ENVIRONMENT
 The COWPATH environment variable, if present, will be used to search
 for cowfiles.  It contains a colon-separated list of directories,
-much like
-.B PATH or
-.BR MANPATH .
-It should always contain the
-.B /usr/local/share/cows
-directory, or at least a directory with a file called 
-.B default.cow
-in it.
+much like PATH or MANPATH.  It should always contain the
+/usr/local/share/cows directory, or at least a directory with a
+file called ``default.cow'' in it.
+
 .SH FILES
-.B %PREFIX%/share/cows
-holds a sample set of cowfiles.  If your
-.B COWPATH
-is not explicitly set, it automatically contains this directory.
+/usr/local/share/cows holds a sample set of cowfiles.  If your
+COWPATH is not explicitly set, it automatically contains this directory.
+
 .SH BUGS
-If there are any, please notify the author at the address below.
+If there are any left, please notify the author at the address below.
+
 .SH AUTHOR
-Tony Monroe (tony@nog.net), with suggestions from Shannon
-Appel (appel@CSUA.Berkeley.EDU) and contributions from Anthony Polito
-(aspolito@CSUA.Berkeley.EDU).
+Tony Monroe (tmonroe@csua.berkeley.edu), with suggestions from Shannon
+Appel (appel@csua.berkeley.edu) and contributions from Anthony Polito
+(aspolito@csua.berkeley.edu).
+
 .SH SEE ALSO
-perl(1), wall(1), nwrite(1), figlet(6)
+perl(1), wall(1), nwrite(1), figlet(6), /csua/bin/rootcow
+
--- a/install.sh
+++ b/install.sh
@@ -1,92 +0,0 @@
-#!/bin/sh
-
-##
-## install.sh
-##
-## Installation script for cowsay.
-##
-## $Id$
-##
-## This file is part of cowsay.  (c) 1999 Tony Monroe.
-##
-
-rcs_id='$Id$'
-
-filelist='cows'
-
-cat <<DOG
-===================
-cowsay Installation
-===================
-
-Searching for useful perl executables...
-DOG
-
-backdoor=$1
-
-pathdirs=`echo $PATH | tr : " "`
-for p in $pathdirs; do
-	set $p/perl $p/perl5*
-	while [ ! -z "$1" ]; do
-		if [ -x "$1" ]; then
-			echo Found perl in $1
-			perls="$perls $1"
-		fi
-		shift
-	done
-done
-for perl in $perls; do
-	if $perl -MText::Wrap -e0 >/dev/null 2>&1; then
-		echo Found a good perl in $perl
-		goodperls="$goodperls $perl"
-	fi
-done
-echo The following perl executables will run cowsay:
-echo $goodperls
-echo I recommend the latest stable perl you can find.
-set $goodperls
-if [ -z "$1" ]; then
-	echo Ack!  You do not have Perl 5 installed correctly!
-	echo Get thee to CPAN!
-	exit 1
-fi
-usethisperl=$1
-echo I will be using $1 because I know it will work.
-
-echo Now I need an installation prefix.  I will use /usr/local unless
-printf "you give me a better idea here: "
-if [ -n "$backdoor" ]; then
-	prefix=$backdoor
-	printf "%s (specified on command line)\n" $prefix
-else
-	read prefix
-fi
-
-PREFIX=${prefix:-/usr/local}
-
-echo Okay, time to install this puppy.
-
-echo s,%BANGPERL%,!$usethisperl,\; > install.pl
-echo s,%PREFIX%,$PREFIX,\; >> install.pl
-set -x
-mkdir -p $PREFIX/bin || (mkdir $PREFIX; mkdir $PREFIX/bin)
-$usethisperl -p install.pl cowsay > $PREFIX/bin/cowsay
-chmod a+x $PREFIX/bin/cowsay
-ln -s cowsay $PREFIX/bin/cowthink
-mkdir -p $PREFIX/man/man1 || ($mkdir $PREFIX; mkdir $PREFIX/man; mkdir $PREFIX/man/man1)
-$usethisperl -p install.pl cowsay.1 > $PREFIX/man/man1/cowsay.1
-chmod a+r $PREFIX/man/man1/cowsay.1
-ln -s cowsay.1 $PREFIX/man/man1/cowthink.1
-mkdir -p $PREFIX/share/cows || (mkdir $PREFIX; mkdir $PREFIX/share; mkdir $PREFIX/share/cows)
-tar -cf - $filelist | (cd $PREFIX/share && tar -xvf -)
-set +x
-
-echo Okay, let us see if the install actually worked.
-
-if [ ! -f $PREFIX/share/cows/default.cow ]; then
-    echo The default cow file did not make it across!
-    echo Ooops, it failed...sorry!
-    exit 1
-fi
-
-echo Installation complete!  Enjoy the cows!