Text::Tabs shows in the example given that it works on lines. It also works on arrays.

#!perl
# unexpand -a
use Text::Tabs;
 
while (<>) {
  print unexpand $_;
}
[download]