タブとスペースの相互変換


 Text::Tabsモジュールを使います。
 expandでタブ→スペースに、unexpandでスペース→タブに変換します。
 $tabstopでスペースの数を設定できます。設定しない場合は8が設定されます。
use Text::Tabs;

$tabstop = 4;
my @src = <>;
my @dest = expand(@src);
foreach (@dest) {
	print;
}

関連項目

なし