Perl> $h{ "$_ " x 3} = "$_ " x 10 for 1e6 .. 4e6;;
Perl> # 912MB ;;