#!/usr/bin/perl -n

# $Header: /SRCS/esmp/usr/src/nw/cmd/gnu/perl-4.036/eg/rmfrom,v 1.1.1.1 1993/10/11 20:26:18 ram Exp $

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

chop; unlink;
