Select Code to Download

my $VAR = makeA(20000000);
sub makeA { return 'A' x (shift) }

my $VAR = make20m('A');
sub make20m { return (shift) x 20000000 }