#!/bin/sh f=$1 perl -pi -e 's!(.*?)!\1!g' $f perl -pi -e 's!(.*?)!\1!g' $f perl -pi -e 's!(.*?)!\1!g' $f perl -pi -e 's!(.*?)!\1!g' $f perl -pi -e 's!(.*?)!\1!g' $f