substitute tabs

[ryancomps]

I don't know if this is possible but I hope someone can help me.

I have a file read into an array. I want to replace every occurance of a tab (\t) with a space. Is there a pattern that represents a tab?

foreach $line (@program)
{
$line =~ s/TAB-PATTERN/ /g;
}

Thanks in advance

Ryan

 

[GrSw]

Isn't it just \t ?

 

[ryancomps]

I thought the same but it doesn't seem to work.

 

[rosenk]

[tt]\t[/tt] would work if the file really does contain tabs. Many text editors, though, replace tabs with appropriate numbers of spaces, so you would also want to replace multiple spaces with a single space:

[tt]$line =~ s/\s+/ /g;[/tt]
(this would replace tabs as well)