qse/regress/awk/unr-001.awk

6 lines
88 B
Awk

BEGIN { OFS="\t"; }
{
for (i = 1; i <= NF; i = i + 1) if ($i < 0) $i = -$i;
print;
}