Help for this page

Select Code to Download


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