Perl: remove tab characters from lines
Ho can I remove tab characters from a line?
Thank you.
Thank you.
$infile = "input.txt";
open(DATA, $infile);
@lines_var = <DATA>;
for( $i = 0; $i < $#lines_var; $i++
{
// remove tabs from every line
}
Sorry,
// remove tabs from every line
s/\t//g;
// remove tabs from every line
s/\t//g;
Actually
foreach (@lines_var)
{
// remove tabs from every line
s/\t//g;
}
foreach (@lines_var)
{
// remove tabs from every line
s/\t//g;
}
ASKER
So, is that the following that I need to do? seems not to be working.
$infile = "input.txt";
open(DATA, $infile);
@lines_var = <DATA>;
for( $i = 0; $i < $#lines_var; $i++
{
$lines_var[$i] = s/\t//g;
}ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
s/\t//g for @lines_var;
s/\1//g