perl -Minteger -le 'printf"text%d\t%d\n",rand(100), rand(100) for 1 .. 1_000_000'