Help for this page

Select Code to Download


  1. or download this
    $a[ $_*2 ] = $_ for 1 .. 1e5;;
$h{ $_*2 } = $_ for 1 .. 1e5;;
...
print total_size( $_ ) for \( @a, %h );;
69509024
7526431
  2. or download this
    $a[ $_ * 20 ] = $_ for 1 .. 1e5;;

...
1359141122.04252
1359141123.06596
100000