#!/usr/bin/perl -n

# rmfrom,v1.1.1.11995/12/08 20:13:36

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

chop; unlink;
