'di';
'ig00';
#
-# $Header: relink,v 4.0 91/03/20 01:11:40 lwall Locked $
+# $RCSfile: relink,v $$Revision: 4.1 $$Date: 92/08/07 17:20:29 $
#
# $Log: relink,v $
-# Revision 4.0 91/03/20 01:11:40 lwall
-# 4.0 baseline.
-#
-# Revision 3.0.1.2 90/08/09 03:17:44 lwall
-# patch19: added man page for relink and rename
-#
($op = shift) || die "Usage: relink perlexpr [filenames]\n";
if (!@ARGV) {