$line =~ s/\t/ /g;
$line =~ s/^/\a/;