Como multiplicar duas colunas no awk?

Eu quero multiplicar a coluna 1 pela coluna 2 (até o final do arquivo) no arquivo de entrada e deve gerar 1 coluna e 3 colunas multiplicadas no arquivo separado.

input.txt:

1 677679866
2 121867616
3 49413198
4 40415982

output.txt:

1 677679866
2 243735232
3 148239594
4 161663928

awk '{ print $1, $1 * $2 }' input.txt > output.txt

Aqui está uma awksolução:

$ awk '$0=$1" "$1*$2' input.txt 
1 677679866
2 243735232
3 148239594
4 161663928

Mas você pode fazer isso de várias maneiras, aqui está uma perlsolução:

$ perl -ape 's/$F[1]/$F[0]*$F[1]/e' input.txt
1 677679866
2 243735232
3 148239594
4 161663928

Você pode fazer alterações no local usando a -iopção:

$ perl -i.bak -ape 's/$F[1]/$F[0]*$F[1]/e' input.txt