>>105
http://perldoc.jp/docs/perl/5.12.1/perlop.pod#Multiplicative32Operators
http://perldoc.jp/func/map
http://perldoc.jp/docs/perl/5.10.0/perllol.pod
http://perldoc.jp/docs/perl/5.10.0/perldsc.pod (broken)

my @map = map [ (1) x 151 ], 0..199;