Populating a hash 

my %int_square_root = map { $_ * $_ => $_ } 1 .. 10;