perl -e 'print "a"x85000000' | \
perl -e 'my $line = <STDIN>; print length($line), "\n";'