1#!/usr/bin/env bash 2temp=$(tempfile 2>/dev/null) 3if [[ ! $temp ]] ; then 4 temp=/tmp/fixindent.tmp 5fi 6rm -rf $temp 7if [[ -e $1 ]] ; then 8 cat $1 | perl -pe 'if((@x = /^(?: )+/g)) { s|^( )+|"\t" x (length($x[0]) / 4)|eg; }' >> $temp 9 if [[ -e $temp ]] ; then 10 mv $temp $1 11 fi 12fi 13