[p5sagit/p5-mst-13.2.git] / eg / rmfrom

#!/usr/bin/perl -n

# $Header: rmfrom,v 2.0 88/06/05 00:16:57 root Exp $

# A handy (but dangerous) script to put after a find ... -print.

chop; unlink;
Commit	Line	Data
378cc40b	1	#!/usr/bin/perl -n
	2
	3	# $Header: rmfrom,v 2.0 88/06/05 00:16:57 root Exp $
	4
	5	# A handy (but dangerous) script to put after a find ... -print.
	6
	7	chop; unlink;