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