qse/ase/test/awk/unr-001.awk

7 lines
106 B
Awk

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