Help for this page
perl -wle '`perl -le "print q!*! x 1_000_000 while 1"`'
perl -wle '$_ = `perl -le "print q!*! x 1_000_000 while 1"`'