C:\test>p1
Perl> # 5.6MB ;;
Perl> $h{ pack 'V3', ($_) x 3} = pack 'V10', ($_) x 10 for 1e6 .. 2e6;;
Perl> # 237MB ;;