blows away files with the bad perl shebang

cleaner.sh

for item in /opt/**/*
do 
  if [ -f $item ]; then 
    head -n1 $item | grep -q '^#!/opt/local/bin/perl'
    if [ $? -eq 0 ]; then
      rm $item;
    fi
  fi
done