$text =~ s{(.*?)\t}{$1.(' ' x ($g_tab_width - length($1) % $g_tab_width))}ge;
에서 나는
다음 (사 개 공간의 가정 탭 폭) 아래로 내 이해와 번역을 단순화했습니다$text =~ s/(.*?)\t/' '/;
하지만 난
는 possib 일을 쉽게 확인 아인슈타인의 지시를 깨진 것 같은 느낌이 르,하지만 단순하지.
다음 입력 문자열을 테스트 중입니다.
"\t \t"
"\t\t \t"
"\t\t \t\t \t"
"\t\t \t\t \t"
이 두 결과가 일치하지 않는 입력 문자열을 보여줄 수 있습니까?
두 번째 것은 대체물에서'$ 1'을 참조하지 않으므로 작동하지 않습니다 ... 오타가 아닌 한? –
탭을 잘못 이해합니다. 탭은 가변 개수의 공백을 나타내며 일정한 공백을 나타냅니다. – tchrist
아마도 [perltidy] (http://search.cpan.org/perldoc?perltidy)와 같은 것을 찾고 계십니까? – TLP