Select Code to Download

use strict;
use warnings;
...

$s = ( int rand 10 ) x 1e9;     # allocate another Gb
print "2) Hit Enter"; <>;