{
	local @ARGV = ($file);
	local $^I = '.bac';
	while(<>){
		s/^\s+//;
		print;
	}
}