#!/usr/bin/perl -n

# $RCSfile: rmfrom,v $$Revision: 4.2 $$Date: 1996/06/03 02:42:00 $

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

chop; unlink;